Bonjour,
Je souhaiterais savoir si il et possible grâce a un formulaire qui contient une textbox et une CheckBox de remplir un tableau avec du texte (colonne P) par le combobox et un chiffre 1 si cocher (colonne Q), de plus il faudrait que cela mette un 0 dans les autre ligne de la colonne Q du tableau ou il y a une donner dans la colonne P. C'est pas trop évident a explique je peux préparer un exemple si il faut...
Je coince au niveau de la CheckBox. (Le bouton de lancement de l'userform et sur la feuil1 et les données vont dans la feuille "BASE")
Mon code actuel :
Merci
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18 'Pour le bouton Nouvelle campagne Private Sub CommandButton2_Click() Dim L As Integer If MsgBox("Confirmez-vous linsertion de cette nouvelle campagne ?", vbYesNo, "Demande de confirmation dajout") = vbYes Then L = Sheets("Base").Activate L = Range("p65536").End(xlUp).Row + 1 'Pour placer le nouvelenregistrement à la première ligne de tableau non vide Range("p" & L).Value = TextBox1 Sheets("Feuil1").Activate End If Unload Me End Sub 'Pour le bouton Quitter Private Sub CommandButton1_Click() Unload Me End Sub
Partager