VBA-Programmierung in Microsoft Excel

Tutorial: Excel-Beispiele

Prüfung, ob die Zwischenablage leer ist

Gruppe

Allgemein

Bereich

Ansicht

Thema

Prüfung, ob die Zwischenablage leer ist

Problem

Es soll überprüft werden, ob die Zwischenablage leer ist.

Lösung

Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.





StandardModule: Modul1

Sub TestClipBoard()
   Dim bln As Boolean
   If bln Then
      MsgBox "Die Zwischenablage ist leer!"
   Else
      MsgBox "Die Zwischenablage ist nicht leer!"
   End If
End Sub

Private Function ClipboardEmpty() As Boolean
    ClipboardEmpty = (Application.ClipboardFormats(1) = -1)
End Function

    


Beiträge aus dem Excel-Forum zu den Themen Allgemein und Ansicht