Obsah
Jasná schránka Excel VBA
Vymazání schránky v aplikaci Excel VBA vyžaduje pouze jeden řádek kódu:
| 1 | Application.CutCopyMode = False |
To se však liší od standardní schránky Windows. K vymazání schránky Windows můžete použít funkci EmptyClipboard. Zkopírujte a vložte níže uvedený kód do modulu kódu a spusťte Sub TestClipboardClear, abyste vymazali schránku Windows.
| 123456789101112131415 | Možnost ExplicitníFunkce Public Declare OpenClipboard Lib "user32" (ByVal hwnd As Long) As LongVeřejná deklarační funkce EmptyClipboard Lib "user32" () jako dlouháVeřejná deklarační funkce CloseClipboard Lib "user32" () jako dlouháVeřejná funkce ClearClipboard ()OpenClipboard (0 a)Prázdná schránkaZavřít schránkuKoncová funkceDílčí testovací schránkaClear ()Volejte ClearClipboardEnd Sub |
