Format kopieren ohne die Tabelle zu wechseln

  • Excel

Es gibt 1 Antwort in diesem Thema. Der letzte Beitrag () ist von gifti09.

    Format kopieren ohne die Tabelle zu wechseln

    Hallo,

    ich muss mit einem VBA Makro das "Format" von einer Zelle in eine andere Zelle kopieren. Das ganze ist ja an sicht nicht schwer, gäbe ist da nicht einige kleine Einschränkungen:

    1. Zelle A befindet sich auf einem anderen Blatt als Zelle B
    2. Der Makro darf das Tabellenblatt zum kopieren nicht wechseln, da er sonst mit anderen Makros konfrontiert.
    Wie Ihr vermutlich alle schon gemerkt habt, ist 2 die größere Einschränkung, da das kopieren des Formates ohne diese Einschränkung problemlos möglich wäre.

    Mein Ansatz:
    Ich befinde mich in Tabelle B und möchte das Format von F3 auf Tabellenblatt A-F3 kopieren:

    Visual Basic-Quellcode

    1. Sheets("TabelleA").Range("F3").Format = Range("F3")


    Da mein Ansatz nicht funktioniert und ich noch blutiger VB Anfänger bin würde ich mich über eure Hilfe sehr freuen.

    Gruß

    jpaetzold
    Hallo jpaetzold!

    Das "Format" einer Zelle überträgt man so:

    Quellcode

    1. Sheets("TabelleB").Range("F3").Copy
    2. Sheets("TabelleA").Range("F3").PasteSpecial xlPasteFormats


    Prinzpiell schadet es nicht, vor der Ausführung von VBA Code Events zu deaktivieren, was dein Problem 2 wohl umgehen würde.

    Quellcode

    1. Application.EnableEvents = False


    Am Ende deiner Funktion musst du Events natürlich wieder aktiviren.

    Quellcode

    1. Application.EnableEvents = True