Zelle links neben aktiver auswählen
25.08.2021 06:52:23
Lenny
Dank diesem Forum konnte ich schon etliche Probleme lösen. Auch bei meinem aktuellen Problem habe ich bereits Unterstützung erhalten.
Mit folgendem Code lese ich Links aus Zellen aus und lege sie in den Zwischenspeicher damit diese an anderer Stelle verwendet werden können.
Sub CommandButton1_Click()
Dim objClipboard As DataObject
Set objClipboard = New DataObject
'Falls Link in Zelle einfach >>als Text>als HyperlinkMit ActiveCell.Offset(0, -1) sollte das aber doch gehen? Der Button, der die Zelle ausliest, steht immer eine Zelle rechts derjenigen in der der Link steht. Das [Range("B3")] einfach durch ActiveCell.Offset(0, -1) ersetzten funktioniert nicht.
Bedanke mich schon mal in voraus für die Unterstützung.
Gruss
Björn