Vba exel bouton supprimer

Fermé
cabridous Messages postés 3 Date d'inscription jeudi 26 novembre 2009 Statut Membre Dernière intervention 28 novembre 2009 - 26 nov. 2009 à 23:55
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 - 27 nov. 2009 à 11:17
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 .
A voir également:

3 réponses

Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 293
27 nov. 2009 à 09:30
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
0
cabridous Messages postés 3 Date d'inscription jeudi 26 novembre 2009 Statut Membre Dernière intervention 28 novembre 2009
27 nov. 2009 à 11:16
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
0
Bidouilleu_R Messages postés 1181 Date d'inscription mardi 27 mai 2008 Statut Membre Dernière intervention 12 juillet 2012 293
27 nov. 2009 à 11:17
c'est ça!
Bonne journée.
0