ich markiere einen Bereich, drücke danach einen Button und möchte gerne in A1 angezeigt haben, von wo bis wo ich markiert habe.
(z.b. von B3:D8)
Wie kann man sowas umsetzen?
Gruß
Steve
Sub test()
[A1] = Selection.Address
End Sub
Sub test()
[A1] = Selection.Address 'Bereich in A1
[A2] = Selection.Columns.Count ' Anzahl Spalten in A2
[A3] = Selection.Rows.Count ' Anzahl Zeilen in A3
End Sub
Sub test()
Dim letzte_Spalte
[A1] = Selection.Address
[A2] = ActiveCell.Column
letzte_Spalte = Right(Selection.AddressLocal(False, False), WorksheetFunction.Find(":", Selection.AddressLocal(False, False), 1) - 1)
[A3] = Range(letzte_Spalte).Column
End Sub
Sub test()
strAdresse = Selection.Address(RowAbsolute:=False, ColumnAbsolute:=False)
FirstRow = Range(Selection.Address).Row
LastRow = Range(Selection.Address).Row + Selection.Rows.count - 1
FirstColumn = Range(Selection.Address).Column
LastColumn = Range(Selection.Address).Column + Selection.Columns.count - 1
End Sub