ich habe eigentlich ein einfaches Problem:
mit folgendem Code kopiere ich einen Bereich als Werte in eine andere Tabelle. Dabei bleibt der "UsedRange" markiert. Um diese Markierung aufzuheben muss ich die entsprechende Tabelle - die ich anderen zur Verfügung stelle - selektieren, um dort z.B. die Zelle A1 auszuwählen und damit die Selektion aufzuheben. Gibt es einen anderen Weg, um ohne Select bzw. Activate auszukommen?
ws.UsedRange.ClearContents
wsA.UsedRange.Copy
ws.Range("A1").PasteSpecial Paste:=xlValues
Application.CutCopyMode = False
ws.Activate
ws.Range("A1").Select
Danke für Eure Bemühungen
Heinz