Aktuelle Zeile in einem code auslesen

Question

Hallo,

mit dem code 

x = Application.VBE.ActiveCodePane.CodeModule.ProcOfLine(78, 0)

lese ich den Zeileninhalt von Zeile78 im aktuellen code aus. Wie kann ich die 78 durch eine "Variable" ersetzen, die das gleiche Ergebnis liefert. Hat jemand einen Tipp?

Danke und Gruß A.

Answer 1

Ich verstehe die Frage nicht ganz. X ist doch eine Variable.

Wenn du eine beliebige Code-Zeile auswerten willst, musst du die 78 durch eine numerische Variable ersetzen, die du vor dem Aufruf der Zeile entsprechend füllst.

Beispiel

Zeile = 60
x = Application.VBE.ActiveCodePane.CodeModule.ProcOfLine(Zeile, 0)

Gruß Flupo

Answer 2

Hallo,
Sorry, da habe ich mich nicht korrekt ausgedrückt. Ich möchte, dass mir die aktuelle Zeile ausgegeben wird. Also der Wert, der im Codefenster oben bei "Z.. S" hinter Z steht.
Gruß A.