Discussion :

[aptagud]

bonjour le forum

Cela fait trés longtemps que je n'ai pas fais de VBA et bein j'ai tt oublié

Je cherche un ptit bout de code qui me permettrait...

- au clique sur un bouton (situé Feuil2) d'enregister le contenu d une ou plusieurs celulles situé Feuil4... (Pourquoi la Feuil 4 car je stock ici question de practicité toutes les informations saisient en Feuil 1 2 3)
- Les informations apparaisent alors dans la 1ere ligne vide de mon tableau

Est ce que qq un aurait cela sous la main

En esperant avoir été clair

Merci et bonne soirée

[Daniel.C]

Bonjour,

Quelles cellules faut-il copier; sur quelles feuilles sont-elles ?

[clementmarcotte]

Bonjour,

Est ce que qq un aurait cela sous la main

Oui, toi.

Tu peux enregistrer une macro et élaguer par après.

Une fois que tu as mis ton bouton sur ta feuille, tu fais un clic-droit dessus et tu lui assigne ta macro.

[aptagud]

Bonjour et merci pour vos réponses

clementmarcotte comment une macro va-t-elle me permettre d'enregistrer chaque nouvelle enregistrement sur une nouvelle ligne ???

Daniel.C, les données saisies sur les différentes feuil sont rapatriés sur une feuille nomée "Sauvegarde" par un simple =MaCellule ces cellule se trouvent de ma celluleA2 : celluleP2

[Daniel.C]

Bonjour,

Sauf à compliquer la macro, si tu mets un bouton, sur "Feuil2", tu ne pourras copier que des données de cette feuille (sinon, il faut poser un contrôle RefEdit sur la feuille ou sur un userform). Vu ta connaissance de VBA, je te propose une macro simple que tu pourras appeler avec un raccourci clavier (si tu ne sais pas comment affecter un raccourci à une macro, dis-le).

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
Sub test()
    With Sheets("Sauvegarde")
        If Selection.Areas.Count > 1 Then
            MsgBox "Veuillez sélectionner une plage continue"
            Exit Sub
        End If
        Selection.Copy .Cells(.Rows.Count, 1).End(xlUp).Offset(1)
    End With
End Sub