Mit
ActiveSheet.Shapes(Application.Caller).Select
Worksheets("FD").Range("KEH").Value = Selection.Text
überschreibe ich Range("KEH") mit dem aktiven Shapes-Text.
Ich möchte nun aber zuvor prüfen, ob in Range("KEH") bereits der gleiche Text steht (dann Exit Sub).
Wie kann ich den Selection.Text an eine String-Variable übergeben, die ich dann
Range("KEH").Value vergleichen kann?
Danke für Antworten
Klaus