Discussion :

[Yves2507]

Bonjour.

J'essaie de réaliser le tutorial sur "Ajouter un menu dans un formulaire".

Mais je ne sais pas programmer en VB les fonction copier et coller.

Pourriez vous me donner le code pour ces fonction.

Merci

[argyronet]

Bonjour,

Le Copier / Coller en VBA s'exploite avec un DataObject.
Il te faut référencer la bibliothèque Microsoft Forms 2.0 pour en avoir les propriétés et méthodes...

Argy

[Yves2507]

Merci.
Et ou je peux la trouver cette bibliothèque Microsoft Forms 2.0 ?

Sachant que je ne comprend pas grand chose en anglais il me faudrait des explications plus simplifier que dans les aides microsoft officiel.

[argyronet]

Bon;
Pour référencer Microsoft Form 2.0 il faut le séléctionner dans la listes des références depuis la fenêtre Visual basic...
La DLL se nomme FM20.dll

Ensuite pour le fun, dans un formulaire, créez 2 Textboxes et un Bouton nommés respectivement:
txtPourCopier, txtPourColler et cmdCopy


Enfin posez ce code pour tester...

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
Private Sub cmdCopy_Click()
  CopyPasteData Me!txtPourCopier, Me!txtPourColler
End Sub
 
Sub CopyPasteData(TextboxSource As TextBox, TargetTextbox As TextBox)
Dim oData As DataObject
 
  Set oData = New DataObject
    oData.Clear
    TextboxSource.SetFocus
    TextboxSource.SelStart = 0
    TextboxSource.SelLength = Len(TextboxSource)
    DoCmd.RunCommand acCmdCopy
    oData.GetFromClipboard
    TargetTextbox.SetFocus
    TargetTextbox.Text = oData.GetText(1)
  Set oData = Nothing
End Sub

Entrez du texte dans txtPourCopier puis appuyez sur le bouton...

Argy

[Yves2507]

merci beaucoup