pascal21
XLDnaute Barbatruc
bonjour à tous
dans un usf j'ai un bouton qui me fait une copie d'une cellule
j'ai un autre bouton pour faire un coller valeurs et commentaire ainsi que le format de le cellule
j'ai une erreur que je n'arrive pas à déterminer ça me met
la méthode pastespécial de la classe range a échouée
j'ai bien essayé de remplacer activecell par selection mais c'est pareil
voyez-vous où est l'erreur
merci
dans un usf j'ai un bouton qui me fait une copie d'une cellule
Code:
Private Sub CommandButton5_Click()
Set cel = ActiveCell
cel.Copy
End Sub
Code:
Private Sub CommandButton6_Click()
On Error Resume Next
ActiveCell.PasteSpecial xlPasteValues
ActiveCell.PasteSpecial xlPasteComments
ActiveCell.WrapText = cel.WrapText 'renvoi à la ligne
la méthode pastespécial de la classe range a échouée
j'ai bien essayé de remplacer activecell par selection mais c'est pareil
voyez-vous où est l'erreur
merci