Bug macro depuis windows 7

[olive323]

Bonjour a tous

La macro ci dessous bug depuis l'instalation de Windows7. Sub Trackingliste() devient Jaune avec le message proprieté ou objet introuvable.

Est ce que quelqu'un a une idée

Merci de votre aide

Public i As Integer
Sub TrackingListe()

Dim n As Integer
Dim vStr

quot = Chr(34)i = 1
n = 0
Call Eingabe_Löschen
For Each z In Worksheets("TOTO").Range("A7:A10007").Cells
If z <> "" Then n = n + 1
Next
For i = 1 To n
Worksheets("xml").Cells(17, 2) = Worksheets("TOTO").Cells(6 + i, 1)
Worksheets("TOTO").Cells(4, 1).Value = i & " von " & n
Call Tracking_Liste
Next

Exit Sub
End Sub

 

[Pierrot93]

Re : Bug macro depuis windows 7

Bonjour,

regarde peut être si tu n'as pas une référence manquante, dans l'éditeur vba => barre de menu => référence, si c'est le cas décoches la et relance Excel....

bonne journée
@+

 

[olive323]

Re : Bug macro depuis windows 7

Merci pierrot je regarde ca et je te fais un retour.

Bonne journée

 

[Misange]

Re : Bug macro depuis windows 7

Bonjour

heu pas terrible le jaune !
quot = Chr(34)i = 1
je ne comprends pas cette écriture qu'est-elle supposée faire ?