Pastespecial

A

ArnaudEIC

Guest

• 21 Juin 2006

• #2

Salut,
Pour coller il faut d'abord avoir copier quelque chose et apparement si tu ne le fais pas ça explose. J'ai rajouter une ligne de copie avant le PasteSpecial et ton code fonctionne.

 

Vote positif 0 Vote négatif

JC de Lorient

XLDnaute Impliqué

• 21 Juin 2006

• #3

salut Arnaud
je l'ai ma copie
en mode pas à pas quand j'arrive sur cette ligne
et que je fasse un CTRL V en manuel ça fonctionne
C'est là que je pige pas

 

Vote positif 0 Vote négatif

A

ArnaudEIC

Guest

• 21 Juin 2006

• #4

je comprend pas tout. La copie que tu fais, c'est àla main ou par programation ?
Si c'est à la main avant de lancer la macro c'est normal que cela ne fonctionne pas.

 

Vote positif 0 Vote négatif

JC de Lorient

XLDnaute Impliqué

• 21 Juin 2006

• #5

re
non c'est la macro qui le fait
moi j'ai simplement tester en manuel pour voir ce que j'avais dans mon presse papier
et j(ai bien ma copie VBA
c'est un grand mystère !!

 

Vote positif 0 Vote négatif

A

ArnaudEIC

Guest

• 21 Juin 2006

• #6

tu pourrai mettre un peu plus de ton code que ça soit plus simple de reproduire comme sur ton poste ?

 

Vote positif 0 Vote négatif

JC de Lorient

XLDnaute Impliqué

• 21 Juin 2006

• #7

re
impossible de le joindre en live (le forum plante quand je soumets)

et impossible de joindre fichier
plus de lien içi

 

Vote positif 0 Vote négatif

M

MichelXld

XLDnaute Barbatruc

• 21 Juin 2006

• #8

bonjour JC , bonjour Arnaud

tu peux faire un essai en precisant le nom de la feuille lors de la recherche de la 1ere ligne vide

With Sheets('Feuil1')
b = .Range('A65536').End(xlUp).Row + 1
.Range('A' & b).PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
End With


bonne soiree
MichelXld

 

Vote positif 0 Vote négatif