VBA Application.CutCopyMode = False
Wenn Sie beim Kopieren und Einfügen Makros aufgezeichnet haben, haben Sie wahrscheinlich die folgende Codezeile gesehen:
| 1 | Application.CutCopyMode = False |
Diese Codezeile „löscht“ die Zwischenablage*. Wenn Sie eine Excel-Zelle kopiert haben, wird durch Ausführen dieser Codezeile die Animation um die kopierte Zelle entfernt:
CutCopyMode ist eine Eigenschaft auf Anwendungsebene, die angibt, ob sich ein Microsoft Office-Programm (z. B. Excel) im Ausschneide- oder Kopiermodus befindet. Im Kopiermodus (oder Ausschneidemodus) hat Excel etwas in seiner Zwischenablage gespeichert, das eingefügt werden kann.
Mir ist kein Zeitpunkt bekannt, zu dem Sie Application.CutCopyMode jemals auf True setzen müssen.
Vermeidung von CutCopyMode = False
Sie können normalerweise vermeiden, Application CutCopyMode = False festlegen zu müssen, indem Sie die bewährten Methoden von VBA Copy+Paste verwenden. Als Beispiel kopiert die folgende Codezeile eine Zelle und fügt sie in eine einzelne Zeile ein, wodurch die Notwendigkeit entfällt, CutCopyMode auf False zu setzen:
| 123 | Sub CopyPaste_OneLine()Range("a1").Copy Range("b1")End Sub |
Application.CutCopyMode-Status abrufen
Gelegentlich möchten Sie möglicherweise den Status von Application.CutCopyMode abrufen. Möglicherweise um Fehler beim Einfügen zu vermeiden, wenn sich nichts in der Zwischenablage befindet. Um den Status abzurufen, verwenden Sie den folgenden Code:
| 123456789101112 | Unter Get_Application_CutCopyMode_Status()Wählen Sie Fallanwendung.CutCopyModeFall ist = xlCopyMsgBox "Kopiermodus"Fall ist = xlCutMsgBox "Schneidemodus"Fall ist = falschMsgBox "Nicht im Ausschneide- oder Kopiermodus"Auswahl beendenEnd Sub |
*Application.CutCopyMode löscht nur die Zwischenablage der Microsoft Office-App (z. B. Excel). Die Zwischenablage von Windows wird nicht gelöscht. Klicken Sie auf den Link, um mehr darüber zu erfahren, wie Sie die Zwischenablage von Windows mit VBA löschen.
