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
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