Bonsoir à tous,
j'ai encore besoin d'aide,
je ne sais pas copier le contenu d'une variable pour pouvoir la coller
après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une
cellule.
Est ce possible ?
Finopat
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
MichDenis
Bonsoir Finopat,
Dim MyVar as String
MyVar = "un test"
et pour copier le contenu de la variable MyVar dans une cellule.
worksheets("feuil1").range("A1") = MyVar
Salutations!
"Finopat" a écrit dans le message de news:
Bonsoir à tous, j'ai encore besoin d'aide, je ne sais pas copier le contenu d'une variable pour pouvoir la coller après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une cellule. Est ce possible ? Finopat
Bonsoir Finopat,
Dim MyVar as String
MyVar = "un test"
et pour copier le contenu de la variable MyVar dans une cellule.
worksheets("feuil1").range("A1") = MyVar
Salutations!
"Finopat" <finoapt@wanadoo.fr> a écrit dans le message de news: opsns1shpsso7j0p@news.microsoft.com...
Bonsoir à tous,
j'ai encore besoin d'aide,
je ne sais pas copier le contenu d'une variable pour pouvoir la coller
après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une
cellule.
Est ce possible ?
Finopat
et pour copier le contenu de la variable MyVar dans une cellule.
worksheets("feuil1").range("A1") = MyVar
Salutations!
"Finopat" a écrit dans le message de news:
Bonsoir à tous, j'ai encore besoin d'aide, je ne sais pas copier le contenu d'une variable pour pouvoir la coller après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une cellule. Est ce possible ? Finopat
Finopat
Salut Denis, merci de ta réponse mais en fait, je me suis mal exprimé : je ne souhaite pas donner la valeur d'une variable à une cellule, mais c'est pour faire en quelque sorte une aide à la saisie.
Mon code s'articule de cette façon :
MyVarA = Left(Range("A1").Value, Len(Range("A1").Value) - 2) MyVarB=inputbox("Saisir le bon N° de ref","Attention ref incorrecte")
pour trouver le n° de ref (MyVarB), il faut aller dans une appli autre que excel, et que je ne souhaite pas commander depuis excel. Pour faciliter la recherche dans la deuxième appli je pensais mettre MyVarA dans le presse papier pour n'avoir qu'à faire un coller au lieu de saisir à la mano.
Le Thu, 17 Mar 2005 19:00:20 -0500, MichDenis a écrit:
Bonsoir Finopat,
Dim MyVar as String
MyVar = "un test"
et pour copier le contenu de la variable MyVar dans une cellule.
worksheets("feuil1").range("A1") = MyVar
Salutations!
"Finopat" a écrit dans le message de news:
Bonsoir à tous, j'ai encore besoin d'aide, je ne sais pas copier le contenu d'une variable pour pouvoir la coller après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une cellule. Est ce possible ? Finopat
Salut Denis,
merci de ta réponse mais en fait, je me suis mal exprimé :
je ne souhaite pas donner la valeur d'une variable à une cellule,
mais c'est pour faire en quelque sorte une aide à la saisie.
Mon code s'articule de cette façon :
MyVarA = Left(Range("A1").Value, Len(Range("A1").Value) - 2)
MyVarB=inputbox("Saisir le bon N° de ref","Attention ref incorrecte")
pour trouver le n° de ref (MyVarB), il faut aller dans une appli autre que
excel,
et que je ne souhaite pas commander depuis excel.
Pour faciliter la recherche dans la deuxième appli je pensais mettre
MyVarA dans
le presse papier pour n'avoir qu'à faire un coller au lieu de saisir à la
mano.
Le Thu, 17 Mar 2005 19:00:20 -0500, MichDenis <michdenis@hotmail.com> a
écrit:
Bonsoir Finopat,
Dim MyVar as String
MyVar = "un test"
et pour copier le contenu de la variable MyVar dans une cellule.
worksheets("feuil1").range("A1") = MyVar
Salutations!
"Finopat" <finoapt@wanadoo.fr> a écrit dans le message de news:
opsns1shpsso7j0p@news.microsoft.com...
Bonsoir à tous,
j'ai encore besoin d'aide,
je ne sais pas copier le contenu d'une variable pour pouvoir la coller
après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une
cellule.
Est ce possible ?
Finopat
Salut Denis, merci de ta réponse mais en fait, je me suis mal exprimé : je ne souhaite pas donner la valeur d'une variable à une cellule, mais c'est pour faire en quelque sorte une aide à la saisie.
Mon code s'articule de cette façon :
MyVarA = Left(Range("A1").Value, Len(Range("A1").Value) - 2) MyVarB=inputbox("Saisir le bon N° de ref","Attention ref incorrecte")
pour trouver le n° de ref (MyVarB), il faut aller dans une appli autre que excel, et que je ne souhaite pas commander depuis excel. Pour faciliter la recherche dans la deuxième appli je pensais mettre MyVarA dans le presse papier pour n'avoir qu'à faire un coller au lieu de saisir à la mano.
Le Thu, 17 Mar 2005 19:00:20 -0500, MichDenis a écrit:
Bonsoir Finopat,
Dim MyVar as String
MyVar = "un test"
et pour copier le contenu de la variable MyVar dans une cellule.
worksheets("feuil1").range("A1") = MyVar
Salutations!
"Finopat" a écrit dans le message de news:
Bonsoir à tous, j'ai encore besoin d'aide, je ne sais pas copier le contenu d'une variable pour pouvoir la coller après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une cellule. Est ce possible ? Finopat
kribot
Salut, pour récupérer les données contenu dans le Presse Papier i suffit de faire ceci :
Code -------------------
Sub PasteFromClipboard() Dim MyDataObj As New DataObject Dim MyVar As Variant
MyDataObj.GetFromClipboard MyVar = MyDataObj.GetText Range("A1").Value = MyVar End Sub
-------------------
Cet exemple copiera le contenu du presse papier dans la cellule A1 pour pouvoir se servir de DataObject il faut que tu ajoutes un référence à ton projet VBA la démarche à suivre est la suivante : - Appuyez sur ALT+F11 pour démarrer Visual Basic Editor. - Dans le menu Outils, cliquez sur Références. - Ensuite si tu cherches Microsoft Forms 2.0 object et tu le coches s tu ne le trouves pas tu fais Parcourir dans la fenêtre de référence e tu ajoutes le fichier Fm20.dll voila ! :)
Je te donne le code pour coller dans le Presse Papier en même temps :
Code -------------------
Sub PutOnClipboard(Obj As Variant) Dim MyDataObj As New DataObject MyDataObj.SetText Format(Obj) MyDataObj.PutInClipboard End Sub
-------------------
Voila en espérant t'avoir aider bonne journée :
-- kribo ----------------------------------------------------------------------- kribot's Profile: http://www.msusenet.com/member.php?userid View this thread: http://www.msusenet.com/t-331405
Salut, pour récupérer les données contenu dans le Presse Papier i
suffit de faire ceci :
Code
-------------------
Sub PasteFromClipboard()
Dim MyDataObj As New DataObject
Dim MyVar As Variant
MyDataObj.GetFromClipboard
MyVar = MyDataObj.GetText
Range("A1").Value = MyVar
End Sub
-------------------
Cet exemple copiera le contenu du presse papier dans la cellule A1
pour pouvoir se servir de DataObject il faut que tu ajoutes un
référence à ton projet VBA
la démarche à suivre est la suivante :
- Appuyez sur ALT+F11 pour démarrer Visual Basic Editor.
- Dans le menu Outils, cliquez sur Références.
- Ensuite si tu cherches Microsoft Forms 2.0 object et tu le coches s
tu ne le trouves pas tu fais Parcourir dans la fenêtre de référence e
tu ajoutes le fichier Fm20.dll voila ! :)
Je te donne le code pour coller dans le Presse Papier en même temps :
Code
-------------------
Sub PutOnClipboard(Obj As Variant)
Dim MyDataObj As New DataObject
MyDataObj.SetText Format(Obj)
MyDataObj.PutInClipboard
End Sub
-------------------
Voila en espérant t'avoir aider bonne journée :
--
kribo
-----------------------------------------------------------------------
kribot's Profile: http://www.msusenet.com/member.php?userid
View this thread: http://www.msusenet.com/t-331405
Salut, pour récupérer les données contenu dans le Presse Papier i suffit de faire ceci :
Code -------------------
Sub PasteFromClipboard() Dim MyDataObj As New DataObject Dim MyVar As Variant
MyDataObj.GetFromClipboard MyVar = MyDataObj.GetText Range("A1").Value = MyVar End Sub
-------------------
Cet exemple copiera le contenu du presse papier dans la cellule A1 pour pouvoir se servir de DataObject il faut que tu ajoutes un référence à ton projet VBA la démarche à suivre est la suivante : - Appuyez sur ALT+F11 pour démarrer Visual Basic Editor. - Dans le menu Outils, cliquez sur Références. - Ensuite si tu cherches Microsoft Forms 2.0 object et tu le coches s tu ne le trouves pas tu fais Parcourir dans la fenêtre de référence e tu ajoutes le fichier Fm20.dll voila ! :)
Je te donne le code pour coller dans le Presse Papier en même temps :
Code -------------------
Sub PutOnClipboard(Obj As Variant) Dim MyDataObj As New DataObject MyDataObj.SetText Format(Obj) MyDataObj.PutInClipboard End Sub
-------------------
Voila en espérant t'avoir aider bonne journée :
-- kribo ----------------------------------------------------------------------- kribot's Profile: http://www.msusenet.com/member.php?userid View this thread: http://www.msusenet.com/t-331405
Zygoman
Bonsoir à tous, j'ai encore besoin d'aide, je ne sais pas copier le contenu d'une variable pour pouvoir la coller après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une cellule. Est ce possible ? Finopat essai de copier simplement avec Ctrl+c mais collage spéciale du menu
edition et la tu demamnde la valeur @+ ********************** * Z Y G O M A N * 62 * **********************
Bonsoir à tous,
j'ai encore besoin d'aide,
je ne sais pas copier le contenu d'une variable pour pouvoir la coller
après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu
d'une cellule.
Est ce possible ?
Finopat
essai de copier simplement avec Ctrl+c mais collage spéciale du menu
edition et la tu demamnde la valeur
@+
**********************
* Z Y G O M A N * 62 *
**********************
Bonsoir à tous, j'ai encore besoin d'aide, je ne sais pas copier le contenu d'une variable pour pouvoir la coller après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une cellule. Est ce possible ? Finopat essai de copier simplement avec Ctrl+c mais collage spéciale du menu
edition et la tu demamnde la valeur @+ ********************** * Z Y G O M A N * 62 * **********************
Finopat
Bonsoir, c'est exactement ce que je cherchais merci beaucoup. Finopat
Le Fri, 18 Mar 2005 02:56:13 -0500, kribot a écrit:
-------------------- Sub PasteFromClipboard() Dim MyDataObj As New DataObject Dim MyVar As Variant MyDataObj.GetFromClipboard MyVar = MyDataObj.GetText Range("A1").Value = MyVar End Sub --------------------
Bonsoir, c'est exactement ce que je cherchais
merci beaucoup.
Finopat
Le Fri, 18 Mar 2005 02:56:13 -0500, kribot
<kribot.1m3065@no-mx.msusenet.com> a écrit:
--------------------
Sub PasteFromClipboard()
Dim MyDataObj As New DataObject
Dim MyVar As Variant
MyDataObj.GetFromClipboard
MyVar = MyDataObj.GetText
Range("A1").Value = MyVar
End Sub
--------------------
Bonsoir, c'est exactement ce que je cherchais merci beaucoup. Finopat
Le Fri, 18 Mar 2005 02:56:13 -0500, kribot a écrit:
-------------------- Sub PasteFromClipboard() Dim MyDataObj As New DataObject Dim MyVar As Variant MyDataObj.GetFromClipboard MyVar = MyDataObj.GetText Range("A1").Value = MyVar End Sub --------------------
Finopat
Bonsoir, merci de ta réponse, kribot a répondu à mes attentes. Finopat
Le Fri, 18 Mar 2005 17:18:08 +0100, Zygoman a écrit:
Bonsoir à tous, j'ai encore besoin d'aide, je ne sais pas copier le contenu d'une variable pour pouvoir la coller après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une cellule. Est ce possible ? Finopat essai de copier simplement avec Ctrl+c mais collage spéciale du menu
edition et la tu demamnde la valeur @+ ********************** * Z Y G O M A N * 62 * **********************
Bonsoir,
merci de ta réponse,
kribot a répondu à mes attentes.
Finopat
Le Fri, 18 Mar 2005 17:18:08 +0100, Zygoman <zygoman@neuf.fr> a écrit:
Bonsoir à tous,
j'ai encore besoin d'aide,
je ne sais pas copier le contenu d'une variable pour pouvoir la coller
après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu
d'une cellule.
Est ce possible ?
Finopat
essai de copier simplement avec Ctrl+c mais collage spéciale du menu
edition et la tu demamnde la valeur
@+
**********************
* Z Y G O M A N * 62 *
**********************
Bonsoir, merci de ta réponse, kribot a répondu à mes attentes. Finopat
Le Fri, 18 Mar 2005 17:18:08 +0100, Zygoman a écrit:
Bonsoir à tous, j'ai encore besoin d'aide, je ne sais pas copier le contenu d'une variable pour pouvoir la coller après en faisant un ctrl+v , copy ne fonctionne qu'avec le contenu d'une cellule. Est ce possible ? Finopat essai de copier simplement avec Ctrl+c mais collage spéciale du menu
edition et la tu demamnde la valeur @+ ********************** * Z Y G O M A N * 62 * **********************
