Prob de Macro !

[hellocarioca]

Bonjour !

alors g un prob que je n'arrive pas à résoudre parce que je comprend pas ce qui ne marche pas !

J'utilise la macro suivante:

Dim NumLigne1 As Long, NumLigne2 As Long
Dim I As Long, J As Long
NumLigne1 = Sheets("Dispute_DB").Range("T65536").End(xlUp).Row
NumLigne2 = Sheets("Closed Disputes").Range("T65536").End(xlUp).Row

I = 2
Do While I <= NumLigne1
If Sheets("Dispute_DB").Range("S" & I) = "Closed" Then
NumLigne2 = NumLigne2 + 1
For J = 2 To 20
Sheets("Closed Disputes").Cells(NumLigne2, J) = Sheets("Dispute_DB").Cells(I, J)
Next
Sheets("Dispute_DB").Range("S" & I).EntireRow.Delete
Else
I = I + 1
End If
Loop

Elle a été créée sur excel 2007 mais on m'a certifié qu'elle fonctionnait très bien en XL 2000.
Mais qd je transfert la macro sur l'ordi de mon client, elle marche une fois mais pas la 2ème fois...
et si je la copie sur un autre fichier, là elle marche pas du tout alors que mes fichiers sont tous les mêmes. même nom d'onglet, mes formats, etc...

SVP est ce que qq'1 peut me dire ce qui pourrait la faire bugger, parce que la je suis perdue !

Merci bcp pour votre aide !

Maud

 

[MJ13]

Re : Prob de Macro !

Bonjour à tous.

Autrement il y aurait du débogage à faire (mettre un stop dans ton code et lancer la macros sur XL2000).

 

[hellocarioca]

Re : Prob de Macro !

Bonjour !

merci pour ton aide mais le prob vient dêtre résolu...

merci bcp

Maud

 

[MJ13]

Re : Prob de Macro !

Re bonjour,

On aurait bien aimé savoir comment car la ce n'est pas vraiment dans la démarche positive de ce forum!

 

[hellocarioca]

Re : Prob de Macro !

Pardon dsl !

en fait c juste que dans ma macro mon NumLigne faisait référence à une colonne vide !

C'etait juste ça le prob !

une erreur un peu stupide dont g un peu honte 😱

Bonne journée à tous !