J'ai déjà beaucoup réfléchi sur cette épine mais quelque chose m'échappe surement.
J'ai une listbox avec des valeurs qui sont extraites de ma feuille 'certificat' et j'aimerais pouvoir programmer un bouton(inclu dans mon userform) de supression totale d'une ligne dans ma feuille. J'ai essayé comme ceci mais en vain
Dim m as single
with worksheets('certificat')
if listbox1.listindex<0 then exit sub
m=listbox1.listindex +31
end with
cells(m,1)=''
cells(m,2)=''
cells(m,3)=''
Sheets('certificat').rows('m:m').delete shift:=xlup
c'est la dernière ligne qui se fache lors de l'exécution.
j'ai parcouru les fichiers tutoriaux du site mais je n'ai rien trouvé!!! Quelqu'un peut-il m'aider?????
Merci d'avance et bon appétit
J'ai une listbox avec des valeurs qui sont extraites de ma feuille 'certificat' et j'aimerais pouvoir programmer un bouton(inclu dans mon userform) de supression totale d'une ligne dans ma feuille. J'ai essayé comme ceci mais en vain
Dim m as single
with worksheets('certificat')
if listbox1.listindex<0 then exit sub
m=listbox1.listindex +31
end with
cells(m,1)=''
cells(m,2)=''
cells(m,3)=''
Sheets('certificat').rows('m:m').delete shift:=xlup
c'est la dernière ligne qui se fache lors de l'exécution.
j'ai parcouru les fichiers tutoriaux du site mais je n'ai rien trouvé!!! Quelqu'un peut-il m'aider?????
Merci d'avance et bon appétit