Bonjour,

Je viens de me mettre à essayer de faire des macros autant dire que je n'ai aucune connaissance.

Mon début de macro test un tableau afin de trouver la première cellule vide et c'est déjà là ou je suis bloqué car je ne sais pas écrire le code pour remplir cette cellule vide car son adresse est variable.

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
 
Private Sub TextBox1_Change()                           
Range("B6").Select  ' selection de la case de départ
Do While IsEmpty(ActiveCell) = False ' boucle de recherche
Selection.Offset(1, 0).Select
Loop
 
TextBox1.Value =  ' Mon problème
 
If IsNumeric(TextBox1.Value) = True Then ' Vrai si le contenu de la TextBox Numéro du bon d'intervention est un nombre
     Else
       MsgBox "Veuillez saisir un nombre !!!"  ' Affichage d'un message si le contenu de la TextBox Numéro du bon d'intervention n'est pas un nombre
End If
End Sub
Cordialement,

Le Marsu