title image


Smiley Format per VBA auf andere Zelle übertragen
Hey Mromar,



Du kannst den Vorgang einfach per Makrorekorder aufzeichnen und das entstandene Makro anpassen ! Das Ergebnis könnte in optimierter Form dann in etwa so aussehen :

      

Sub FormatÜbertragen()

    Sheets("Tabelle1").Range("A1").Copy 'Das Originalformat

    Sheets("Tabelle2").Range("C2").PasteSpecial Paste:=xlFormats, Operation:=xlNone, SkipBlanks:= _

        False, Transpose:=False

    Application.CutCopyMode = False

End Sub 

Das Makro überträgt die Formatierung der Zelle A1 des ersten Tabellenblattes auf die Zelle C2 des 2.Tabellenblattes.



Gruß, JerryB
Bezeichnungen der Elemente eines Excel XP Fensters (Bild, ca. 170 KB).

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: