XL 2013 VBA Recopie de données sur une même page

chatblanc · 10 Septembre 2024

Bonjour,
Je souhaite recopier des cellules b2:j2 vers la première ligne libre après b6 pour créer une BDD.
Les valeurs en B2:J2 sont évolutives.
Merci.

vgendron · 10 Septembre 2024

Hello

Comme je suis à peu près sur que la ligne 2 est destinée à être modifiée/saisie plusieurs fois
et que tu veux qu'à chaque fois, elle soit sauvegardée dans la BDD

1) créer une Table Structurée t_BDD (le tableau du bas)
2) et copier les données à chaque nouvelle ligne

job75 · 10 Septembre 2024

Bonsoir chatblanc, vgendron,

Un tableau structuré est à mon avis inutile car il n'apporte rien ici.

Affecter simplement cette macro au bouton :

VB:

Sub CommandButton1_Click()
Range("B" & Rows.Count).End(xlUp)(2).Resize(, 9) = [B2:J2].Value
End Sub

A+

vgendron · 10 Septembre 2024

job75 à dit:
Bonsoir chatblanc, vgendron,

Un tableau structuré est à mon avis inutile car il n'apporte rien ici.

Affecter simplement cette macro au bouton :

VB:

Sub CommandButton1_Click() Range("B" & Rows.Count).End(xlUp)(2).Resize(, 9) = [B2:J2].Value End Sub

A+

Hello Job

la tout de suite maintenant.. je suis d'accord.. mais... comme il est question de faire une BDD....je sens que dans un avenir proche, le besoin va vite évoluer..

chatblanc · 11 Septembre 2024

Bonjour,
La réponse correspond a mon attente
Merci pour votre aide.

XL 2013 VBA Recopie de données sur une même page

chatblanc

XLDnaute Nouveau

Pièces jointes

vgendron

XLDnaute Barbatruc

Pièces jointes

job75

XLDnaute Barbatruc

Pièces jointes

vgendron

XLDnaute Barbatruc

chatblanc

XLDnaute Nouveau

Discussions similaires