Bonjour à tous,

Pouvez-vous me dire quelle est le problème sur ce VB sur excel (déso je suis novice dans la progrmmation).

Je vous remercie d'avance


Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
Private Sub TextBox10_Change()
    Dim Plage As String
 
    Plage = RefEdit1.Value
    'Vérifie s'il y a eu une sélection
    If Plage = "" Then
        MsgBox "Opération annulée"
        Exit Sub
    End If
 
    'Insère une croix dans toutes les cellules de la plage
    Range(Plage) = TextBox10.Value
End Sub