AW: Kommentar + Formatierung kopieren + einf
25.03.2023 14:09:02
Oberschlumpf
Hi alle,
dieses Makro...
Sub Makro1()
'
' Makro1 Makro
'
'
Range("A13").Select
Selection.Copy
Range("C3").Select
Selection.PasteSpecial Paste:=xlPasteFormats, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Selection.PasteSpecial Paste:=xlPasteComments, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
End Sub
...hab ich gerade genau nach meiner vorher beschriebenen "Anleitung" mit dem Makrorecorder aufgenommen.
Wegen Test alle Änderungen in Bsp-Datei rückgängig gemacht und obiges Makro einfach gestartet ---- Ergebnis: genau Zelle A13 wird mit Format aus A3 formatiert und auch der Kommentar aus A3 wird hinzugefügt.
GANZ GENAU SO, WIE ICH ES VOM FRAGENDEN ERBETEN HATTE!
Ja, ich weiß, im gezeigten Makro werden nur die Zellen A13 + C3 behandelt - und auch genau deswegen wollte ich, dass der Fragende das obige Makro erstellt, wie beshcrieben und hier erneut per Upload in Datei zur Verfügung stellt - damit wir eben das Makro so anpassen können, dass es auch auf andere Zell-Paare anwendbar ist.
Aber ok, ok...der Fragende "grrrrt" vor sich hin, weil er nich einsehen will, dass seine Erst-Beschreibungen - nicht - sooo eindeutig sind, wie er gedacht hat.
Nun denn, ich wünsch weiter viel Erfolg...beim Anpassen des Grund-Makros.
Ciao
Thorsten