OVH Cloud OVH Cloud

automatiser un copier-coller

4 réponses
Avatar
remi lantin
Bonjour à tous, voici mon problème, j`ai un tableau sur ma feuille 1 et sa
copie exacte sur la feuille 2. Sur la feuille 1, j`entre des données dans
certaine cellules du lundi au dimanche.Le dimanche j`imprime les résultats et
je doit remettre en blanc les cellules de données. je fais donc un
copier-coller de la fauille 2 vers la feuille1.
Je voudrais un bouton sur ma feuille 1 pour automatiser ce copier-coller.

4 réponses

Avatar
isabelle
bonjour remi,

fait un click droit sur le bouton et selon que celui-ci provienne de la:
_________________________________________________________________
barre d'outils controle(CommandButton1)
sélectionne "Visualiser le code"
pour obtenir cette macro événementielle :

Private Sub CommandButton1_Click()

End Sub
____________________________________________________________________
ou de la barre formulaire (Bouton 1)
sélectionne "Affecter une macro" et click sur le bouton "Nouvelle"
pour obtenir cette macro :

Sub Bouton1_QuandClic()

End Sub
____________________________________________________________________


il reste maintenant a inclure les commandes de copier coller

mais là je ne sais pas s'il faut copier la feuille entière ou bien s'il
faut se limiter à une plage de cellule ?

a+
isabelle


Bonjour à tous, voici mon problème, j`ai un tableau sur ma feuille 1 et sa
copie exacte sur la feuille 2. Sur la feuille 1, j`entre des données dans
certaine cellules du lundi au dimanche.Le dimanche j`imprime les résultats et
je doit remettre en blanc les cellules de données. je fais donc un
copier-coller de la fauille 2 vers la feuille1.
Je voudrais un bouton sur ma feuille 1 pour automatiser ce copier-coller.


Avatar
remi lantin
bonjour iabelle, il faut coller la feuille entière. Mais si peut me donner
les deux possibilités de macro, ce serait gentil.(Supposons la plage A,B,C à
32


bonjour remi,

fait un click droit sur le bouton et selon que celui-ci provienne de la:
_________________________________________________________________
barre d'outils controle(CommandButton1)
sélectionne "Visualiser le code"
pour obtenir cette macro événementielle :

Private Sub CommandButton1_Click()

End Sub
____________________________________________________________________
ou de la barre formulaire (Bouton 1)
sélectionne "Affecter une macro" et click sur le bouton "Nouvelle"
pour obtenir cette macro :

Sub Bouton1_QuandClic()

End Sub
____________________________________________________________________


il reste maintenant a inclure les commandes de copier coller

mais là je ne sais pas s'il faut copier la feuille entière ou bien s'il
faut se limiter à une plage de cellule ?

a+
isabelle


Bonjour à tous, voici mon problème, j`ai un tableau sur ma feuille 1 et sa
copie exacte sur la feuille 2. Sur la feuille 1, j`entre des données dans
certaine cellules du lundi au dimanche.Le dimanche j`imprime les résultats et
je doit remettre en blanc les cellules de données. je fais donc un
copier-coller de la fauille 2 vers la feuille1.
Je voudrais un bouton sur ma feuille 1 pour automatiser ce copier-coller.





Avatar
isabelle
voilà

pour un CommandButtons,
Feuille entière:

Private Sub CommandButton1_Click()
Sheets("Feuil2").Cells.Copy _
Destination:=Sheets("Feuil1").Cells
End Sub

Plage de cellule A1:C32

Private Sub CommandButton1_Click()
Sheets("Feuil2").Range("A1:C32").Copy _
Destination:=Sheets("Feuil1").Range("A1")
End Sub

pour un Bouton 1,
Feuille entière:

Sub Bouton1_QuandClic()
Sheets("Feuil2").Cells.Copy _
Destination:=Sheets("Feuil1").Cells
End Sub

Plage de cellule A1:C32

Sub Bouton1_QuandClic()
Sheets("Feuil2").Range("A1:C32").Copy _
Destination:=Sheets("Feuil1").Range("A1")
End Sub

isabelle

bonjour iabelle, il faut coller la feuille entière. Mais si peut me donner
les deux possibilités de macro, ce serait gentil.(Supposons la plage A,B,C à
32



bonjour remi,

fait un click droit sur le bouton et selon que celui-ci provienne de la:
_________________________________________________________________
barre d'outils controle(CommandButton1)
sélectionne "Visualiser le code"
pour obtenir cette macro événementielle :

Private Sub CommandButton1_Click()

End Sub
____________________________________________________________________
ou de la barre formulaire (Bouton 1)
sélectionne "Affecter une macro" et click sur le bouton "Nouvelle"
pour obtenir cette macro :

Sub Bouton1_QuandClic()

End Sub
____________________________________________________________________


il reste maintenant a inclure les commandes de copier coller

mais là je ne sais pas s'il faut copier la feuille entière ou bien s'il
faut se limiter à une plage de cellule ?

a+
isabelle



Bonjour à tous, voici mon problème, j`ai un tableau sur ma feuille 1 et sa
copie exacte sur la feuille 2. Sur la feuille 1, j`entre des données dans
certaine cellules du lundi au dimanche.Le dimanche j`imprime les résultats et
je doit remettre en blanc les cellules de données. je fais donc un
copier-coller de la fauille 2 vers la feuille1.
Je voudrais un bouton sur ma feuille 1 pour automatiser ce copier-coller.







Avatar
remi lantin
Merci beaucoup isabelle.c`est exactement ce qu`il me fallait.