S
simonico
Guest
Bonjour!!!
Je suis un étudiant en école de commerce et je doi réaliser un projet excel sur la gestion des commerciaux!!
J'arrive à supprimer une ligne dans un tableau mai ce que je ne comprends pas c'est qu'il reste toujours la ligne mais vide VBA a effacé les informations dedans mais pas la ligne. Je sais que je dois rajouter quelquechose mais je ne sais pas quoi!! Voici ce que j'ai écrit:
Private Sub CommandButton4_Click()
Sheets("NosCommerciaux").Select
Range("A2").Select
Do While ActiveCell.Value <> CStr(Me.ComboBox1.Value)
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell.Value = ""
ActiveCell.Offset(0, 1) = ""
ActiveCell.Offset(0, 2) = ""
ActiveCell.Offset(0, 3) = ""
ActiveCell.Offset(0, 4) = ""
ActiveCell.Offset(0, 5) = ""
ActiveCell.Offset(0, 6) = ""
ActiveCell.Offset(0, 7) = ""
ActiveCell.Offset(0, 8) = ""
Avec l'attente de votre réponse.
Merci et bonne journée
Je suis un étudiant en école de commerce et je doi réaliser un projet excel sur la gestion des commerciaux!!
J'arrive à supprimer une ligne dans un tableau mai ce que je ne comprends pas c'est qu'il reste toujours la ligne mais vide VBA a effacé les informations dedans mais pas la ligne. Je sais que je dois rajouter quelquechose mais je ne sais pas quoi!! Voici ce que j'ai écrit:
Private Sub CommandButton4_Click()
Sheets("NosCommerciaux").Select
Range("A2").Select
Do While ActiveCell.Value <> CStr(Me.ComboBox1.Value)
ActiveCell.Offset(1, 0).Select
Loop
ActiveCell.Value = ""
ActiveCell.Offset(0, 1) = ""
ActiveCell.Offset(0, 2) = ""
ActiveCell.Offset(0, 3) = ""
ActiveCell.Offset(0, 4) = ""
ActiveCell.Offset(0, 5) = ""
ActiveCell.Offset(0, 6) = ""
ActiveCell.Offset(0, 7) = ""
ActiveCell.Offset(0, 8) = ""
Avec l'attente de votre réponse.
Merci et bonne journée