1 1 1 1 1 1 1 1 1 1 Rating 4.00 (2 Votes)

Problemstellung:

MS hat es immer wieder versäumt eine Möglichkeit in Access zu schaffen
das man vernünftig mit der Zwischenablage arbeiten kann.

Im Notfall könnte man ja mit SendKeys arbeiten (pfui).

Es geht auch anders.

1. Im VBA-Editor im Menü -> Extras -> Verweise auf "Durchsuchen" klicken.
2. Dann im WinSystem-Verzeichnis die FM20.dll suchen und auswählen.

3. Verweisfenster mit OK schliessen.

 

4. Code

Im Formularkopf diesen Code einfügen

Option Compare Database
Option Explicit
 
Dim clp As New MSForms.DataObject

Jetzt nur ein einfaches Bsp.
Das Formular hat 2 Textfelder (Text0 und Text2) sowie
2 Buttons (cmd_Copy und cmd_Paste)

Im Formular soll der Text das Feld Text0 ind das Feld Text2 kopiert werden. 

Private Sub cmd_Copy_Click()
     Dim sData As String
     sData = Me.Text0
     With clp
         .SetText sData
         .PutInClipboard
     End With
 End Sub
 
Private Sub cmd_Paste_Click()
     Dim sData As String
     With clp
         .GetFromClipboard
         sData = .GetText
         Me.Text2 = sData
     End With
 End Sub

So das wars auch schon.
Wie gesagt das ist nur ein einfaches Bsp.
Richtig Sinn macht es erst wenn die Zwischenablage in der ganzen DB zur Verfügung steht.

Dann solltet Ihr ein neues Modul erstellen.

Dann habt Ihr in der ganzen DB Zugriff.

Ähnliche Artikel

Kommentar schreiben

Sicherheitscode
Aktualisieren

Login Form

1.png1.png9.png3.png2.png6.png1.png
Heute77
Gestern57
Diese Woche190
Dieser Monat1320
Total1193261

  • IP: 54.80.183.100
  • Browser: Unknown
  • Version:
  • OS: Unknown

Online

1
Online

23. Mai 2018