Sub CommandButton1_Click()
Range("B" & Rows.Count).End(xlUp)(2).Resize(, 9) = [B2:J2].Value
End Sub
Hello JobBonsoir chatblanc, vgendron,
Un tableau structuré est à mon avis inutile car il n'apporte rien ici.
Affecter simplement cette macro au bouton :
A+VB:Sub CommandButton1_Click() Range("B" & Rows.Count).End(xlUp)(2).Resize(, 9) = [B2:J2].Value End Sub