Excel 2007, Textbox unbenennen

abgemeldet26 · 12. November 2019 um 16:06

Hallo Excelianer/Experten,

früher (noch in Excel 2003) konnte ich auf einem Diagrammblatt eine Textbox erstellen. Wenn ich dann links oben in das Namemsfeld geklickt habe, konnte ich dort den Namen der Textbox ändern.
In Excel 2007 scheint das nicht mehr zu gehen: Wenn ich in das Namesfeld klicke, kann ich dort zwar etwas eintragen, nach Drücken der Eingabetaste steht aber wieder der ursprüngliche Name dort.
Per VBA lässt sich der Name ändern. Das ist aber umständlich.

Da ich oft mit VBA Textboxen anspreche, ist es sehr unanschaulich immer mit „Shapes(„TexBox1“)“ zu arbeiten.

Gibt’s ne Möglichkeit, die Boxen ohne VBA umzubenennen?

Danke und Gruß,
Andreas

abgemeldet26 · 12. November 2019 um 16:07

Nachtrag - Kurios!
Ich habe gerade festgestellt: Wenn ich die Textbox auf einem Tabellenblatt erstelle, kann ich sie ohne Probleme umbenennen! Was ist das denn für eine Logik?
Und wenn ich diese Textbox dann auf ein Diagrammblatt kopiere, behält sie auch den neuen Namen. Allerdings wird der dann wiederum nicht im Namensfeld angezeigt (das ist leer), sondern kann nur über VBA gelesen werden.
Höchst merkwürdig das Ganze.
Was sagen denn die Experten dazu?

Gruß, Andreas

Reinhard_fb8cb7 · 12. November 2019 um 16:07

Sicher ein MS-Feature *grins*
Hallo Andreas,

Was sagen denn die Experten dazu?

k.A., ich bin noch am Staunen was da so läuft bzw. nicht mit der TB.

Wie schaffst du es eigentlich in das Namenfeld etwas einzugeben?
Ich komme nur so weit:
http://www.uploadagent.de/show-191011-1363347205.html

Der Cursor ist über dem Namenfeld aber eingeben kann ich nichts.
Egal Links- oder Rechtsklick. Klicke auf die TB bringen auch nix.
(Excel 2007)

Man könnte ein Makro (Benennen) auf eine Tastenkombi wie Strg+t legen
oder oben links ein Symbol mit dem Makro verbinden.
Dazu dann im Code nicht Selection.Name = „huhu“ benutzen sondern eine
InputBox. Damit kannst du einfach TBs benennen.

Dummerweise klappt das nicht so wie gedacht Die Prozedur test
zeigt an daß für Excel dann zwei TBs existieren.
Eine mit dem Namen TextBox 1 und eine mit dem Namen huhu.

Alles nur kurz getestet, ich teste nachher nochma damit.

Gruß
Reinhard

Sub Benennen()
If TypeName(Selection) = "TextBox" Then
 Selection.Name = "huhu"
End If
End Sub

Sub test()
Dim T
For Each T In ActiveSheet.TextBoxes
 MsgBox T.Name
Next T
End Sub

abgemeldet26 · 12. November 2019 um 16:07

Hallo Andreas,

Hallo Reinhard,

Wie schaffst du es eigentlich in das Namenfeld etwas
einzugeben?
Ich komme nur so weit:
http://www.uploadagent.de/show-191011-1363347205.html

Der Cursor ist über dem Namenfeld aber eingeben kann ich
nichts.
Egal Links- oder Rechtsklick. Klicke auf die TB bringen auch
nix.
(Excel 2007)

Hmm, äußerst denkwürdig. Ich hab’s eben noch mal probiert. Jetzt krieg’ ich’s auch nicht mehr hin. Es geht mir genau so, wie du es beschreibst.
Ich hab auch mal versucht, die Textbox über verschiedene Menüs/Methoden zu erzeugen:

Auf dem Diagrammblatt mit Einfügen - Textfeld
Auf dem Diagrammblatt mit Einfügen - Formen - Textfeld
Auf dem Tabellenblatt mit Einfügen - Textfeld und rüberkopieren auf das Diagrammblatt
Auf dem Tabellenblatt mit Einfügen - Formen - Textfeld und rüberkopieren auf das Diagrammblatt
Hat alles den selben Effekt: Ich kann jetzt nicht mehr ins Namensfeld klicken. Keine Ahnung, wie ich das heute Morgen gemacht habe.
Übrigens, so wie man in Excel2003 eine Textbox in einem Diagramm erzeugen konnte (einfach Klick ins Diagramm und drauflos schreiben) geht garnicht mehr.

Ich werde mal noch ein Bisschen weiter experimentieren.

Gruß, Andreas

Reinhard_fb8cb7 · 12. November 2019 um 16:07

Hallo Andreas,

Wie schaffst du es eigentlich in das Namenfeld etwas
einzugeben?
Ich komme nur so weit:
http://www.uploadagent.de/show-191011-1363347205.html

Der Cursor ist über dem Namenfeld aber eingeben kann ich
nichts.

Hmm, äußerst denkwürdig. Ich hab’s eben noch mal probiert.
Jetzt krieg’ ich’s auch nicht mehr hin. Es geht mir genau so,
wie du es beschreibst.

aha, wie eben dir geschrieben, ein fliegender Holländer

Übrigens, so wie man in Excel2003 eine Textbox in einem
Diagramm erzeugen konnte (einfach Klick ins Diagramm und
drauflos schreiben) geht garnicht mehr.

Meine Idee dies mit Tastenkombination oder Symbol zu „machen“
gefällt dir nicht? Oder klappt der Code nicht?

Ich werde mal noch ein Bisschen weiter experimentieren.

Solang sich kein Wissender hier beteiligt bleibt dir/uns nix anderes
übrig. Mir fällt ein was ich noch nicht testete, Entwicklertools—
Entwurfsmodus…
Ich nehme an du kannst das fix testen.
Innerlich glaube ich nicht daß dies der Bringer ist aber Gottes manche Wege sind sonderbar.

Gruß
Reinhard

Gruß, Andreas

abgemeldet26 · 12. November 2019 um 16:07

… und noch 'ne Bitte …
Hallo Reinhard,

ich denke, ich werde es jetzt so machen: Ich markiere die TextBox die ich umbenennen will, und starte dann den Makro

Sub TextBoxName()
 If TypeName(Selection) = "TextBox" Then Selection.Name = InputBox("Neuer Name für Textbox " & Chr(34) & Selection.Name & Chr(34), "TextBox umbenennen")
End Sub

Und noch eine Bitte: Hast du gerade Excel2007 da? Falls ja, mach doch mal folgendes:
Starte den Makro-Rekorder und dann füge in ein Diagrammblatt eine Textbox ein. Was zeichnet der Makro-Rekorder auf? Als ich das heute Morgen in der Firma mit Excel2007 gemacht habe, bestand der aufgezeichnete Makro nur aus dem Kommentar, dass er von mir ist. Sonst nix, keine Textbox, garnix.

Eben hier zu Hause mit Excel2010 kommt

Sub Makro1()
'
' Makro1 Makro
'

'
 ActiveChart.Shapes.AddTextbox(msoTextOrientationHorizontal, 111.9642519685, \_
 144.1071653543, 114.1071653543, 53.5714173228).Select
End Sub

Also auch wieder Unterschiede von 2007 zu 2010.
Es wird immer misteriöser.

Gruß, Andreas

abgemeldet26 · 12. November 2019 um 16:07

Hallo Andreas,

Hallo Reinhard,

aha, wie eben dir geschrieben, ein fliegender Holländer

Meine Idee dies mit Tastenkombination oder Symbol zu „machen“
gefällt dir nicht? Oder klappt der Code nicht?

Siehe mein Posting eins weiter oben.

Ich werde mal noch ein Bisschen weiter experimentieren.

Solang sich kein Wissender hier beteiligt bleibt dir/uns nix
anderes
übrig. Mir fällt ein was ich noch nicht testete,
Entwicklertools—
Entwurfsmodus…
Ich nehme an du kannst das fix testen.

Nö, geht garnix.

Gruß
Reinhard

Gruß, Andreas

Gruß, Andreas

pauli_441 · 12. November 2019 um 16:08

Hallo Andreas,

ich habe den Gedankenaustausch mit Reinhard gelesen und wurde neugierig, was mein Excel denn so macht (Excel unter Office 2010 mit Windows 7 prof 64bit).

Ich weiß jetzt nicht, was Du mit Diagrammnblatt meinst. Ist es, wenn Du aus Daten ein Diagramm zeichnest? Das habe ich mal gemacht. An die Textfeldoption komme ich über „Entwicklertools“ --> Einfügen und kann dort zwischen Active-X und Formular unterscheiden.
Das Formularsteuerelement „Textfeld“ funktioniert überhaupt nicht (ist ausgegraut). Das Active-X Steuerelement „Textfeld“ läßt sich problemlos auf dem Tabellenblatt zeichnen. Mit Maus rechts angeklickt sehe ich in den Eigenschaften den Namen Textbox1. Das Ändern des Namens geht nicht, es kommt die Meldung „Unzulässiger Name“ (oder so ähnlich).
ABER: wenn ich in den Eigenschaften unter „Text“ Text eingebe, wird der Text in der Textbox angezeigt. Ändere ich nun den Namen (oberstes Feld bei „Eigenschaften“) kommt keine Fehlermeldung und der Name ist geändert.

Klicke ich mein Diagramm an, sind alle Active-X Steuerlelemente unter „Einfügen“ ausgegraut. Ich kann höchstens einen Schaltknopf in das Diagramm setzen.

Gruß
Pauli

abgemeldet26 · 12. November 2019 um 16:09

Hallo Andreas,

Hallo Pauli,

ich habe den Gedankenaustausch mit Reinhard gelesen und wurde
neugierig, was mein Excel denn so macht (Excel unter Office
2010 mit Windows 7 prof 64bit).

Danke für deine Versuche und Hinweise.

Ich weiß jetzt nicht, was Du mit Diagrammnblatt meinst. Ist
es, wenn Du aus Daten ein Diagramm zeichnest?

Ja, richtig. Das Diagramm kann aber entweder in ein Tabellenblatt eingebettet werden, oder (und das meinte ich) auf einem eigenständigen Diagrammblatt sein.

Das habe ich mal
gemacht. An die Textfeldoption komme ich über
„Entwicklertools“ --> Einfügen und kann dort zwischen Active-X
und Formular unterscheiden.
Das Formularsteuerelement „Textfeld“ funktioniert überhaupt
nicht (ist ausgegraut). Das Active-X Steuerelement „Textfeld“
läßt sich problemlos auf dem Tabellenblatt zeichnen. Mit Maus
rechts angeklickt sehe ich in den Eigenschaften den Namen
Textbox1. Das Ändern des Namens geht nicht, es kommt die
Meldung „Unzulässiger Name“ (oder so ähnlich).
ABER: wenn ich in den Eigenschaften unter „Text“ Text eingebe,
wird der Text in der Textbox angezeigt. Ändere ich nun den
Namen (oberstes Feld bei „Eigenschaften“) kommt keine
Fehlermeldung und der Name ist geändert.

Das, was du beschreibst, funktioniert bei mir genauso. Es geht aber nur dann, wenn das Diagramm in das Tabellenblatt eingebettet ist. Dann liegt die Textbox praktisch auf der Tabelle, auch, wenn sie sich auf das Diagramm schieben lässt.
Aber wenn das Diagramm auf einem eigenstädigen Blatt ist, kann ich über Entwicklertools - Einfügen keine Textbox erzeugen. Es ist alles ausgegraut.

Klicke ich mein Diagramm an, sind alle Active-X
Steuerlelemente unter „Einfügen“ ausgegraut. Ich kann
höchstens einen Schaltknopf in das Diagramm setzen.

Genau.
Wenn das Diagramm auf einem eigenen Blatt ist, kann ich nur über Einfügen-Textfeld oder Einfügen-Formen-Textfeld ein Textfeld auf dem Diagramm erzeugen. Dessen Name lässt sich aber nur über VBA ändern.

Gruß
Pauli

Danke für deine Ideen und Gruß,
Andreas