Helpmij.nl
Helpmij.nl
Helpmij.nl
Steun Helpmij.nl! Klik hier     Computerprobleem? Klik hier!

Quote

Weergeven resultaten 1 tot 8 van 8

Onderwerp: Klembord legen

  • Vraag is niet opgelost
  1. #1
    Member
    Verenigingslid

    Geregistreerd
    26 februari 2002
    Locatie
    Bergen op Zoom
    Afstand tot server
    ±183 km

    Klembord legen

    Ik wil af en toe tijdens het uitvoeren van de macro en in ieder geval aan het einde van de macro het klembord leegmaken.
    Is hiervoor een VBA commando.?
    Alvast bedankt voor de hulp.
    Groeten,
    Bert Verberkmoes
    245LV

  2. #2
    Giga Honourable Senior Member
    Geregistreerd
    6 april 2006
    Locatie
    Mechelen
    Afstand tot server
    ±190 km

  3. #3
    Member
    Verenigingslid

    Geregistreerd
    26 februari 2002
    Locatie
    Bergen op Zoom
    Afstand tot server
    ±183 km

    Bedankt!

    Bedankt voor de reactie.
    Ik heb het bekeken maar zie nog niet hoe ik dit eenvoudig in een bestaande macro in kan voegen.
    Is het mogelijk een voorbeeldje te geven.
    Alvast bedankt.
    Groeten,
    Bert
    245LV

  4. #4
    Giga Honourable Senior Member
    Geregistreerd
    6 april 2006
    Locatie
    Mechelen
    Afstand tot server
    ±190 km
    Plak dit in een module:

    Code:
    Declare Function CloseClipboard Lib "user32" () As Long
    Declare Function EmptyClipboard Lib "user32" () As Long
    Declare Function OpenClipboard Lib "user32" (ByVal hwnd As Long) As Long
    
    Sub ClearClipboard()
        OpenClipboard 0&
        EmptyClipboard
        CloseClipboard
    End Sub
    En roep de procedure ClearClipboard aan in jouw macro.

    Wigi

  5. #5
    Alternatief

    Code:
    Sub klembord_leeg()
        Dim kl As Object
        
        Set kl = New DataObject
        kl.SetText ""
        kl.PutInClipboard
    End Sub
    VBA voor smarties

    VBA is een taal die je moet leren met een grammatica- en een woordenboek.
    Plaats svp geen bestanden op andere sites; nadat het bestand daar verwijdeerd is wordt een forumdraad onbegrijpelijk voor anderen. De bijlagen-faciliteit zit niet voor niets in dit forum !

  6. #6

    Unhappy

    Leuke code,

    Alleen werkt hij bij mij niet
    Ik krijg de fout code:
    Code:
    Compileerfout:
    Een door de gebruiker gedefineerd gegevenstype is niet gedefineerd
    OK HELP
    Als ik op OK klik selecteerd hij "New DataObject"

    Ik heb op internet al wat verder zitten te kijken maar ik krijg altijd een fout over die DataObject

    Ik zit hier met Microsoft Office 2003 Access,
    En heb de code geplakt in de "Globale code" bij "Modules"
    en roep deze aan doormiddel van een knop,
    Maar als ik de code in het Form zet bij "M$ Office Access Klassenobjecten"
    Krijg ik de zelfde fout!

    Het idee was eigenlijk om deze code te gaan gebruiken om andere gegevens in het clipboard te zetten, want het legen werkt wel met de code van Wigi

  7. #7
    Zet in de VBEditor/Extra/verwijzingen de verwijzing naar Microsoft Forms 2.0 Object Library aan.
    en gebruik dan

    Code:
    Sub leeg()
      With New DataObject
        .SetText ""
        .PutInClipboard
      End With
    End Sub
    Laatst aangepast door snb : 12 maart 2009 om 12:20
    VBA voor smarties

    VBA is een taal die je moet leren met een grammatica- en een woordenboek.
    Plaats svp geen bestanden op andere sites; nadat het bestand daar verwijdeerd is wordt een forumdraad onbegrijpelijk voor anderen. De bijlagen-faciliteit zit niet voor niets in dit forum !

  8. #8

    Thumbs up

    Thanks,
    Na wat speurwerk naar de "Microsoft Forms 2.0 object library" die doormiddel van het "fm20.dll" toegevoegd kon worden werkt het nu perfect.

Berichtenregels

  • U mag geen nieuwe vragen starten.
  • U mag niet reageren op berichten.
  • U mag geen bijlagen versturen.
  • U mag uw berichten niet bewerken.
  •  
Helpmij.nl
Helpmij.nl

Helpmij.nl en business

Partners
Sponsoren
Linkpartners
Aanbiedingen