aide complement macro

James007

XLDnaute Barbatruc

• 30 Décembre 2010

• #2

Re : aide complement macro

Bonjour,

Si j'ai bien compris ...

Code:

Sub Copie()
Sheet1.Range("E3").Copy Destination:=Sheet3.Range("D3")
Sheet1.Range("E9").Copy Destination:=Sheet3.Range("F9")
End Sub

A+
🙂

 

Vote positif 0 Vote négatif

M

Mitch

XLDnaute Occasionnel

• 30 Décembre 2010

• #3

Re : aide complement macro

Je te remercie James007 c'est exactement ce que je voulais j'ai juste modifie pour que la destination ce fasse a la suite de ma liste
une autre petite question stp quand je clique sur mon bouton serait il possible de remettre mes cellules vide
Merci

 

Vote positif 0 Vote négatif

James007

XLDnaute Barbatruc

• 30 Décembre 2010

• #4

Re : aide complement macro

Re,

Content que cela fonctionne pour toi ...
Je ne sais aps de quel bouton tu parles ... mais oui, on peut effacer le contenu de cellules ... ( avec .ClearContents )

A +

 

Vote positif 0 Vote négatif

M

Mitch

XLDnaute Occasionnel

• 30 Décembre 2010

• #5

Re : aide complement macro

en piece jointe j'ai mon fichier dans la feuille (clients) j'ai un bouton enregister qui declenche la macro j'aurais voulu q"une fois cliquer tout ce mette a zero

 

Vote positif 0 Vote négatif

James007

XLDnaute Barbatruc

• 30 Décembre 2010

• #6

Re : aide complement macro

Re,

Je pense qu'il te suffit de rajouter cette ligne, à la fin de ton code existant:

Code:

Sheet1.Range("E3:I19").ClearContents

A +
🙂

 

Vote positif 0 Vote négatif