Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
976to980
976to980
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Textfeld mit VBA unterhalb letzte Zelle einfügen

Textfeld mit VBA unterhalb letzte Zelle einfügen
16.05.2008 19:12:00
Harald
Hallo im Excelforum,
ich möchte ein Textfeld mit vba unterhalb der letzten Zelle einfügen, die Anzahl der Zellen ist dabei variabel und auch die Höhen der Zellen sind variabel.
Wie kann ich die Länge von der ersten bis zur letzten Zeile ermittel
x = ?
ActiveSheet.Shapes.AddTextbox(msoTextOrientationHorizontal, 50, xxx, 400, 50).Select
mfg
Harald K

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Textfeld mit VBA unterhalb letzte Zelle einfügen
16.05.2008 19:30:16
MAS
Zuerst die Anzahl der Zeilen ermitteln
Von der ersten freien Zeile die Eigenschaft top ermitteln.

Sub test()
Dim anzZeilen
Dim xx
anzZeilen = Cells(65536, Range("A1").Column).End(xlUp).Row
xx = ActiveSheet.Rows(anzZeilen+1 ).Top
End Sub


AW: Textfeld mit VBA unterhalb letzte Zelle einfügen
16.05.2008 19:51:00
Harald
Hallo MAS,
Vielen Dank für deine schnelle Antwort und gute Lösung.
Vielen Dank auch an alle Helfer die dieses Forum am Leben halten
Gruß
Harald K
Anzeige

331 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige
Anzeige

Links zu Excel-Dialogen

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige