Cells(1, 4).Address ohne Dollar-Zeichen
15.10.2008 19:05:00
Franz
Sub Gleich_zum_testen()
'Mit...
Cells(1, 5) = "=" & Cells(1, 4).Address & "-" & Cells(1, 3).Address
'bekomme ich die Formel =$D$1-$C$1
'Mit...
Cells.Replace What:="$", Replacement:="", LookAt:=xlPart, SearchOrder:=xlByColumns, MatchCase:= _
True
'bringe ich das "$" weg.
'Wie bekomme ich aber "=D1-C1" eleganter?
End Sub
Wer weiss Bescheid?
Bis später, darf ich doch hoffen.
Franz D.