Copie de ligne automatique

S

salsitawapa

XLDnaute Occasionnel

• 23 Juillet 2006

• #2

Re : Copie de ligne automatique

Avec une petite macro sa doit être possible. Je fais des essaie et te post sa

 

Vote positif 0 Vote négatif

petithomme

XLDnaute Occasionnel

• 23 Juillet 2006

• #3

Re : Copie de ligne automatique

Marci ! 😛
Par contre me dire comment mettre la macro, car je suis un vrai newbie (dsl)

 

Vote positif 0 Vote négatif

K

Kobaya

XLDnaute Occasionnel

• 23 Juillet 2006

• #4

Re : Copie de ligne automatique

salut petithomme,

voici une solution. elle suppose que la ligne 1 contienne des cellules non-vides sur toutes les colonnes qui ont été recopiés (j'espère que je m'exprime clairement...).

Code:

Public Sub Recopie()
    Columns("A:E").Copy
    
    Range("A1").End(xlToRight).Offset(0, 1).Select
    ActiveSheet.Paste
    Application.CutCopyMode = False
End Sub

colle ce code dans un module, créé un bouton sur ta feuille, auquel tu affectes cette macro, et le tour est joué 🙂

 

Vote positif 0 Vote négatif

petithomme

XLDnaute Occasionnel

• 23 Juillet 2006

• #5

Re : Copie de ligne automatique

comment affecter la macro au bouton (^^) ?

 

Vote positif 0 Vote négatif

S

salsitawapa

XLDnaute Occasionnel

• 23 Juillet 2006

• #6

Re : Copie de ligne automatique

Pour enregistrer la macro, sur ta feuille tu fait un clic droit et visualiser le code. Tu fais un copier coller de celle de Kobaya.
Tu reviens a ta feuille et tu clique droit après l'aide, tu clic sur formulaire.
Tu mets un bouton (sur la barre de formulaire il est normalement en 4ième). Tu le dessine puis clic droit et affecter une macro.
La macro se nomme Recopie.

 

Vote positif 0 Vote négatif

petithomme

XLDnaute Occasionnel

• 23 Juillet 2006

• #7

Re : Copie de ligne automatique

MMMMMMEEEEEEEEEEERRRRRRRRRRRRRCCCCCCCCCCCCIIIIIIIIIIIIIII !


une derniere chose, avec cette macro je peux cliquer sur le bouton et créer non seulement ces colonnes mais les meme dans une autre feuille (feuil3) ?

 

Vote positif 0 Vote négatif