ich möchte den Inhalt eines Textfeldes einer Zelle (sieht aus, wie ein mit der Draw- Funktion gezeichnetes Textfeld) mit einem Makro abfragen. Kennt jemand eine Lösung?
Danke im Vorraus,
René
ich möchte den Inhalt eines Textfeldes einer Zelle (sieht aus, wie ein mit der Draw- Funktion gezeichnetes Textfeld) mit einem Makro abfragen. Kennt jemand eine Lösung?
Danke im Vorraus,
René
mit dem folgenden Makro kannst Du alle Textboxen auf einer Tabelle auslesen.
x = 1 For Each tbox In ActiveSheet.TextBoxesSub TextBoxenAuslesen()
Code eingefügt mit Syntaxhighlighter 1.14
Dim tbo As Object
Sheets("Tabelle1").Select
Range("a" & x).Value = tbox.Text
x = x + 1
Next tbox
End Sub
Viele Grüße
Bernd
MVP für Microsoft Excel
Excel-Tipps, VBA in 21 Tagen mit Leseprobe(PDF) unter: http://held-office.de
Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden
Suche nach den besten AntwortenEntdecke unsere meistgeklickten Beiträge in der Google Suche
Top 100 Threads jetzt ansehen