will in einer Zelle den Bezug einer Formel darstellen, die in einer anderen Zelle steht. Also z.B. steht in der Formel "...!E20" und ich würde gerne die 20 da rausbekommen.
Hat dazu jemand ne Idee?
Vielen Dank
Martin
will in einer Zelle den Bezug einer Formel darstellen, die in einer anderen Zelle steht. Also z.B. steht in der Formel "...!E20" und ich würde gerne die 20 da rausbekommen.
Hat dazu jemand ne Idee?
Vielen Dank
Martin
range("...!E20").row
MsgBox (Range("[DeineDatei.xls]Tabelle1!E20").Row)
erscheint eine Box die dir dir Zeilenzahl 20 angibt. Hab halt keine Ahnung was du dann mit der Zahl anstellen willst.
Wenn du etwas anderes meinst solltest du die Frage vielleicht noch etwas genauer stellen.
##aber - durch z.B. eingefügte Zeilen in Blatt 1 - dies nicht immer so ist##
jetzt fügst du in Blatt1 1 Zeile hinzu.
##Nun will ich in Tabellenblatt 2 die aktuelle Zelle mit der Formel vergleichen, da diese übereinstimmen sollten##
Jetzt steht in Blatt2 Zelle "A1" =Tabelle1!A2, da sich die Bezüge automatisch anpassen.
Und jetzt willst du aus Blatt2 Zelle "A1" die Zeile des Bezuges auslesen also die 2.
Hoffe ich komme annähnernd dahin was du meinst.
Wende mal folgenden Code auf den Bezug in Blatt2 an.
sub x()
Dim formel, format As String
format = ActiveCell.Formula
format = WorksheetFunction.Substitute(Right(format, Len(format) - InStr(1, format, "!")), "$", "")
formel = format
MsgBox (Range(formel).Row)
end sub
Dies gibt dir aus dem Bezug =Tabelle1!A2 die 2 zurück.