Vba exel bouton supprimer

Question

Bonjour,
J'ai un problème dans le codage de mon bouton supprimer dans VBA exel.
Si je clique dessus il me supprime pas que l'information sélectionné dans la combobox il me supprime toute les informations de ma ligne exel aligné avec mon information que je veus supprimer.
Le code est :

Private Sub Suprtech_Click()
Sheets("infos").Rows(Listetech.ListIndex + 2).Delete
End Sub

Si vous aviez une petite astuce pour arranger ça.
Merci d'avance .

Bidouilleu_R · Answer

bonjour,

il est normal que la ligne soit supprimée car c'est ce que tu demandes

Private Sub Suprtech_Click() 
Sheets("infos").Rows(Listetech.ListIndex + 2).Delete  
End Sub 

je te propose ce code qui effacera une seule cellule 
mais il tu peut aussi utiliser .clearcontents ( pour effacer le contenu ) la cellule reste à sa place
A toi de voir.


Private Sub Suprtech_Click() 
Sheets("infos").Rows(Listetech.ListIndex + 2).Delete  
End Sub

cabridous · Answer

Merci beaucoup d'avoir répondu j'ai trouvé ce code aussi qui répond mieux a mes attentes

Private Sub Suprtech_Click()

Sheets("infos").Cells(Listetech.ListIndex + 2, 1).Delete
End Sub

Bidouilleu_R · Answer

c'est ça!
Bonne journée.

Vba exel bouton supprimer

3 réponses

Discussions similaires

Newsletters