Bonjour a tous,=20
je voudrais savoir s'il est possible de faire , a partir=20
d'un bouton, un control-c sur champ texte en=20
affichage/modification.
Je d=E9taille un peu plus:
j'appuie sur le bouton, cela grise le champ concerner puis=20
cela envoi le ctrl-c sur ce texte gris=E9 et cela fini par=20
une mise a jour de champ.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
Xavier HUE
Bonjour ephec2,
Sur clic de ton bouton:
If Not (IsNull(Me.TonControle.Value)) Then 'Sélectionner le texte dans le controle Me.TonControle.SetFocus Me.TonControle.SelStart = 0 Me.TonControle.SelLength = Len(Me.TonControle.Value) 'Copier dans le presse papier DoCmd.RunCommand acCmdCopy End If
Pour la mise à jour du champ??? Si c'est l'enregistrement que tu souhaites sauvegarder, tu peux ajouter au code précédent: Me.Dirty = False
Cordialement.
Bonjour ephec2,
Sur clic de ton bouton:
If Not (IsNull(Me.TonControle.Value)) Then
'Sélectionner le texte dans le controle
Me.TonControle.SetFocus
Me.TonControle.SelStart = 0
Me.TonControle.SelLength = Len(Me.TonControle.Value)
'Copier dans le presse papier
DoCmd.RunCommand acCmdCopy
End If
Pour la mise à jour du champ???
Si c'est l'enregistrement que tu souhaites sauvegarder, tu
peux ajouter au code précédent:
Me.Dirty = False
If Not (IsNull(Me.TonControle.Value)) Then 'Sélectionner le texte dans le controle Me.TonControle.SetFocus Me.TonControle.SelStart = 0 Me.TonControle.SelLength = Len(Me.TonControle.Value) 'Copier dans le presse papier DoCmd.RunCommand acCmdCopy End If
Pour la mise à jour du champ??? Si c'est l'enregistrement que tu souhaites sauvegarder, tu peux ajouter au code précédent: Me.Dirty = False
