bug dans macro

[darib52]

bonsoir à tous,
dans un prog excel que j'utilise, la macro bug tjours au même endroit.

If rejet = '**' Or rejet = '--' Or rejet1 = '--' Or rejet1 = '**' Then
ligne = Str(i)
lligne = Len(ligne)
ligne = Right(ligne, lligne - 1)
Worksheets('transpoa4').Rows(ligne).Select[/size]
Selection.Delete shift:=xlUp
rejet = ''
rejet1 = ''
End If


n'arrivant pas à trouver la solution, je vous soumets l'extrait de la macro qui pose pb.

je suis preneur de toutes vos idées.
merci d'avance.
amicalement

 

[Robert]

Bonsoir Darib, bonsoir le forum,

Avec : ligne = Str(i), la variable ligne est de type Variant (String).

Essaie en modifiant comme ça :

Worksheets('transpoa4').Rows(CInt(ligne)).Select

 

[darib52]

ne fonctionne pas non plus.

merci quand même