Inhalt von Textfelder auslesen

05/10/2008 - 15:16 von Christian Hahn | Report spam
Hallo,
ich habe ein Tabellenblatt mit ganz vielen Textboxes bekommen und müsste nun
den Text-Inhalt der einzelnen Textbox auslesen.

mit:
Dim sh As Shape
For Each sh In Sheets("Links").Shapes
msgbox sh.Name
Next
kann ich zwar alle Textboxes ansprechen, als Name bekommen ich aber z.B.
"Text Box 34" (mit Leerzeichen).
Aus der Shapes-Auflistung kann ich aber offenbar nicht auf eine .Value oder
.Text-Eigenschaft zugreifen.

Frage: Was für eine Art Objekt ist denn eigentlich die Textbox und in
welcher Auflistung finde ich einen Objekt-Bezeichner, über den ich an die
.Vlaue-Eigenschaft herankomme?
besten Dank und Grüße, Christian Hahn.
 

Lesen sie die antworten

#1 Claus Busch
05/10/2008 - 15:45 | Warnen spam
Hallo Christian,

Am Sun, 5 Oct 2008 15:16:03 +0200 schrieb Christian Hahn:

ich habe ein Tabellenblatt mit ganz vielen Textboxes bekommen und müsste nun
den Text-Inhalt der einzelnen Textbox auslesen.



probiers mal so:
Dim objText As OLEObject

For Each objText In Sheets("Links").OLEObjects
MsgBox objText.Object.Value
Next


Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP2 / Vista Ultimate
Office 2003 SP2 / 2007 Ultimate

Ähnliche fragen