clipboard à décharger dans une colonne

job75

XLDnaute Barbatruc

• 14 Octobre 2008

• #2

Re : clipboard à décharger dans une colonne

Bonjour fifi,

Je ne comprends pas bien où est le problème.

Clipboard est le terme anglais pour "presse-papier". Le presse-papier est rempli par une opération couper ou copier.

Pour décharger le presse-papier sur une feuille de calcul, utiliser la méthode Paste, donc dans votre exemple :

Code:

With Sheets("listes")
.Paste .Range("listes_importation_data").Cells(1, 1)
End With

A+

 

Vote positif 0 Vote négatif

F

fifi

XLDnaute Occasionnel

• 14 Octobre 2008

• #3

Re : clipboard à décharger dans une colonne

héhé oui oui pour ca il n'y a pas de pb ..le pb c'est pour le décharger dans une colonne unique :s
chaque enregistremnt les uns après les autres

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Octobre 2008

• #4

Re : clipboard à décharger dans une colonne

Bonsoir fifi, Job

essaye peut être comme ci dessous, mais sans voir les données copiées difficile d'en dire plus :

Code:

Option Explicit
Sub test()
'activer la reference Microsoft Forms 2.0 Object Library
Dim x As New DataObject, z, i As Byte
Application.ScreenUpdating = False
x.GetFromClipboard
z = Split(x.GetText(1), vbTab)
For i = LBound(z) To UBound(z)
    Cells(i + 1, 1) = z(i)
Next i
Application.ScreenUpdating = True
End Sub

bonne soirée
@+

 

Vote positif 0 Vote négatif

F

fifi

XLDnaute Occasionnel

• 14 Octobre 2008

• #5

Re : clipboard à décharger dans une colonne

merci ..je test cela mais pour l'instant je n'arrive pas à le faire fonctionner.

normalement les données copiées proviennent d'une plage de cellule excel et son du format texte


(excel 2003)

 

Vote positif 0 Vote négatif

F

fifi

XLDnaute Occasionnel

• 14 Octobre 2008

• #6

Re : clipboard à décharger dans une colonne

humm j'ai une erreur jamais vu encore :s

DataObjetc :getstructure FORMATETC non valide.

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Octobre 2008

• #7

Re : clipboard à décharger dans une colonne

Re

as tu activé la référence :

Code:

Microsoft Forms 2.0 Object Library

comme précisé en commentaire dans le code ?

@+

 

Vote positif 0 Vote négatif

F

fifi

XLDnaute Occasionnel

• 14 Octobre 2008

• #8

Re : clipboard à décharger dans une colonne

oui oui :s

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Octobre 2008

• #9

Re : clipboard à décharger dans une colonne

Re

je viens de tester, ce message est renvoyé lorsque le presse papier est vide... il faut bien évidement qu'il y ait quelque chose à l'intérieur.

@+

 

Vote positif 0 Vote négatif

F

fifi

XLDnaute Occasionnel

• 14 Octobre 2008

• #10

Re : clipboard à décharger dans une colonne

j'essaye la macro dans un nouveau classeur et la j'ai ce message d'erreur
sur cette ligne :
Dim x As New DataObject, z, i As Byte

message : type défini pa rl'utilisateur non défini

 

Vote positif 0 Vote négatif

F

fifi

XLDnaute Occasionnel

• 14 Octobre 2008

• #11

Re : clipboard à décharger dans une colonne

humm pourtant j'essaye après avoir copié quelque chose :/

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Octobre 2008

• #12

Re : clipboard à décharger dans une colonne

Re

pour ton nouveau classeur la référence ne doit pas être activée, une référence est active pour un classeur donné, sinon mets un petit fichier en pièce jointe, avec résultat attendu, sans données confidentielles, mais reproduisant le problème.

@+

 

Vote positif 0 Vote négatif

F

fifi

XLDnaute Occasionnel

• 14 Octobre 2008

• #13

Re : clipboard à décharger dans une colonne

humm ok , dans le fichier vide ou j'ai essayé la réf n'étaot pas activée effectivement.

le collage se fait mais il y a des petit carré en plus.
je vais essayer de m'en sortir avec.

 

Vote positif 0 Vote négatif

F

fifi

XLDnaute Occasionnel

• 14 Octobre 2008

• #14

Re : clipboard à décharger dans une colonne

humm ok , dans le fichier vide ou j'ai essayé la réf n'étaot pas activée effectivement.

le collage se fait mais il y a des petit carré en plus.
je vais essayer de m'en sortir avec.



après vérification la macro rajoute des "petits carré quand la plage copié comporte plusieurs lignes ( un carré par ligne)

ca fait le faire , je vais faire un rempalcement
merci beaucoup ca va marcher 😀

 

Vote positif 0 Vote négatif

Pierrot93

XLDnaute Barbatruc

• 14 Octobre 2008

• #15

Re : clipboard à décharger dans une colonne

Re

pour enlever les éventuels sauts de paragraphes :

Code:

Sub test()
'activer la reference Microsoft Forms 2.0 Object Library
Dim x As New DataObject, z, i As Byte, y, w
Application.ScreenUpdating = False
x.GetFromClipboard
z = Split(x.GetText(1), vbTab)
For i = LBound(z) To UBound(z)
    Cells(i + 1, 1) = Split(z(i), vbCr)
Next i
Application.ScreenUpdating = True
End Sub

si ce sont des sauts de lignes, remplaces "vbCr" dans le code par ""vblf"

@+

 

Vote positif 0 Vote négatif