Bonjour Arnaud et le forum,
Option Explicit t'impose de déclarer tes variables avant de les utiliser, c'est uns sécurité qui t'évite tout d'abord
de prendre plus de place qu'il n'en faut car à chaque déclaration tu détermines le type (ex: byte, integer, long, single, string, date ou encore range, worksheet...) et donc la taille de ta variable
d'utiliser une variable à la place d'une autre (erreur de saisie entre autre)
Ce qui veut dire que tu aurais pu garder Option Explicit en rajoutant
Dim L_deb, L_fin, C_deb, C_fin as Byte 'Pas plus de 255
Dim combine$ as String
Sinon moi j'aurai plutôt fais :
Private Sub CommandButton1_Click()
Dim CELLULE As Range, MESSAGE As String
For Each CELLULE In Range("B8
11")
If CELLULE = "" Then MESSAGE = MESSAGE & WorksheetFunction.Substitute(CELLULE.Address, "$", "") & ", "
Next
If MESSAGE <> "" Then
MsgBox "La ou les cellules suivantes ne sont pas remplies : " & vbCrLf & Left(MESSAGE, Len(MESSAGE) - 2)
Else
TONCODE
End If
End Sub
@ bientôt
Valérie