Bonjour,

J'ai un programme ou j'utilise un "boolean" avec un compteur de ligne lorsque le boolean est faux. Lorsque le boolean est faux j'aimerais que les lignes soient copiées dans une autre feuille.
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
 
Dim l as integer
Dim frs as boolean
 
l=0
 
If frsexiste=true
then ( procédure x,y,z.....)
End if
'si frsexiste est faux alors j'incrémente un compteur pour identifier le nb de lignes que je n'ai pas pris en compte'If frsexiste=false then l=l+1
' C'est à ce moment précis lorsque le boolean est faux que je souhaiterais copier toutes les lignes non prises en compte dans une autre feuille'

Si quelqu'un a une idée je suis preneur de sa solution!