prob code vba

[Farscape]

bonjour,

j'aimerais savoir :

on a un tableau avec x colonnes et ligne

et un userform avec un menu deroulant qui correspond a une des colonnes. (jusque la je sais faire)

maintenant une fois choisi l'infos dans le menu deroulant j'aimerais savoir comment en cliquant sur un bouton on puissent supprimer la ligne entière correspondant au choix désiré.

ci joint un exemple

Merci. [file name=essai_20051206173931.zip size=12619]http://www.excel-downloads.com/components/com_simpleboard/uploaded/files/essai_20051206173931.zip[/file]

 

[Hervé]

Bonsoir farscape

Tu peux essayer comme ceci :

Private Sub CommandButton1_Click()
With ComboBox1
        Rows(.List(.ListIndex, 1)).Delete
        .RemoveItem .ListIndex 'supprime aussi l'item de la combobox
        .ListIndex = -1 ''déselectionne' la combobox
End With
End Sub

salut

 

[justine]

sub commandbutton1_clic() 'bouton supprimer
dim mot as string
mot = combobox1.value 'mot prend la valeur de ta combobox
range('a2').select 'selection de ta cellule de depart
while isempty(activecell)=false ' tant que ta cellule active non vide
if activecell=mot then
rows(activecell.row).delete
else
activecell.offset(1,0).select 'selection de la ligne suivante
end if
wend

 

[Farscape]

bonsoir a vous deux,

Merci pour vos réponses, cela fonctionne nikel ( les deux methodes )

A+