Re : Macro pour remplir la première cellule vide en cliquant sur un bouton
Bonsoir hadswimmer et le forum,
Bienvenue sur le forum XLD
Essaye cette syntaxe pour la macro MesPoints :
Sub MesPoints()
Dim C As Long
With Sheets("DB_Points")
C = .Range("XFD2").End(xlToLeft).Column
.Cells(2, C + 1) = InputBox("Introduisez le titre du test :", "Titre du test")
.Cells(4, C + 1) = InputBox("Introduisez le max du test :", "Max du test")
End With
End Sub