Select de la classe Range a échoué

[antoine5274]

Bjr,
je débute sur VBA et je ne comprends pas pourquoi je n'arrice pas a copier une ligne dans une feuille puis a le coller dans une autres feuilles du meme classeur en passant par un bouton. La méthode select de la classe range a échoué.

 

[porcinet82]

Re : Select de la classe Range a échoué

Salut,

Je ne sais pas bien ou se situais ton problème, mais je t'ai modifié le code afin qu'il soit plus simple :

Private Sub XC38_70_Click()
    Range("A6:N6").Copy Destination:=Sheets("XC38_70").Range("A4")
    Sheets("XC38_70").Range("A4").Insert Shift:=xlDown
    Range("N6").Copy
    Range("C6").PasteSpecial Paste:=xlPasteValues
    Range("E6:M6").ClearContents
End Sub

Une petite remarque si je peux me permettre, il faut eviter les Select qui ne servent en général a rien et font perdre du temps lors de l'execution du code.

@+

 

[mutzik]

Re : Select de la classe Range a échoué

bonjour antoine, le forum

- j'ai collé ta procédure dans un module et non dans le code de la feuille et cela fonctionne impec
- un code que tu places en private sub dans une feuille ne doit concerner que cette feuille et pas de select sur une autre feuille
ou alors tu mets range("...).copy destination:=feuille("...").range(" etc

arf, salut Romain

 

[antoine5274]

Re : Select de la classe Range a échoué

Merci ça marche comme je le souhaite;
je pense que c'est le code select qui deviat me poser probleme.

Encore merci,

 

[antoine5274]

Re : Select de la classe Range a échoué

Message pour mutzig,

J'avais remarqué que si je plaicais ma procedure adns le module, elle fonctionnait.

Mais pourquoi alors le bouton que j'ai créer ne dépent que de la feuille.

Peux t'on appliquer un bouton à un module?

 

[porcinet82]

Re : Select de la classe Range a échoué

re,

Non, tu ne peux pas faire dependre un bouton à un module. Par contre, la solution est d'appeler dans le bouton, la macro placée dans le module.
Soit un truc de ce genre :

Private Sub XC38_70_Click()
  Call Le_nom_de_la_macro
End Sub

@+

 

[ninajams]

Re : Select de la classe Range a échoué

salut,

Merci grace a vous j'ai arreter d'essayer en vain d'affecter a un bouton une macro concernant une autre feuille.

Je comprenait pas pourquoi ce fonctionnait pas !! tant pis.

Vive call nom_de_la_macro.

salut