Twitter iPhone pliant OnePlus 11 PS5 Disney+ Orange Livebox Windows 11

Debug.Assert

4 réponses
Avatar
Daniel
Bonjour.
Je veux suspendre l'exécution d'une boucle à la ligne n° 18 :
For Each c In sh.Range("E6", sh.Range("E65536").End(xlUp))
var1 = c.Row
var2 = c.Row = 18
Debug.Assert var2
Next
L'exécution s'arrête au premier passage sur la ligne Debug.Assert. Les
valeurs sont :
Var1=6
Var2=Faux
J'obtiens le même résultat avec Debug.Assert c.Row = 18.
Quelqu'un a-t-il une idée ?
Merci d'avance.
Daniel

4 réponses

Avatar
JB
Bonjour,

Debug.Assert Not var2 ???

JB


On 17 août, 12:21, "Daniel" wrote:
Bonjour.
Je veux suspendre l'exécution d'une boucle à la ligne n° 18 :
For Each c In sh.Range("E6", sh.Range("E65536").End(xlUp))
var1 = c.Row
var2 = c.Row = 18
Debug.Assert var2
Next
L'exécution s'arrête au premier passage sur la ligne Debug.Assert. Les
valeurs sont :
Var1=6
Var2úux
J'obtiens le même résultat avec Debug.Assert c.Row = 18.
Quelqu'un a-t-il une idée ?
Merci d'avance.
Daniel


Avatar
tissot.emmanuel
Bonjour,

If c.Row = 18 Then Stop

Cordialement,

Manu/

"Daniel" a écrit dans le message de news:

Bonjour.
Je veux suspendre l'exécution d'une boucle à la ligne n° 18 :
For Each c In sh.Range("E6", sh.Range("E65536").End(xlUp))
var1 = c.Row
var2 = c.Row = 18
Debug.Assert var2
Next
L'exécution s'arrête au premier passage sur la ligne Debug.Assert. Les
valeurs sont :
Var1=6
Var2úux
J'obtiens le même résultat avec Debug.Assert c.Row = 18.
Quelqu'un a-t-il une idée ?
Merci d'avance.
Daniel



Avatar
Daniel
C'est si simple.
Merci.
"tissot.emmanuel" a écrit dans le message de news:

Bonjour,

If c.Row = 18 Then Stop

Cordialement,

Manu/

"Daniel" a écrit dans le message de news:

Bonjour.
Je veux suspendre l'exécution d'une boucle à la ligne n° 18 :
For Each c In sh.Range("E6", sh.Range("E65536").End(xlUp))
var1 = c.Row
var2 = c.Row = 18
Debug.Assert var2
Next
L'exécution s'arrête au premier passage sur la ligne Debug.Assert. Les
valeurs sont :
Var1=6
Var2úux
J'obtiens le même résultat avec Debug.Assert c.Row = 18.
Quelqu'un a-t-il une idée ?
Merci d'avance.
Daniel







Avatar
Daniel
Exact, j'avais compris de travers. A ma décharge, l'aide n'est pas un
exemple de clarté...
Merci.
Daniel
"JB" a écrit dans le message de news:

Bonjour,

Debug.Assert Not var2 ???

JB


On 17 août, 12:21, "Daniel" wrote:
Bonjour.
Je veux suspendre l'exécution d'une boucle à la ligne n° 18 :
For Each c In sh.Range("E6", sh.Range("E65536").End(xlUp))
var1 = c.Row
var2 = c.Row = 18
Debug.Assert var2
Next
L'exécution s'arrête au premier passage sur la ligne Debug.Assert. Les
valeurs sont :
Var1=6
Var2úux
J'obtiens le même résultat avec Debug.Assert c.Row = 18.
Quelqu'un a-t-il une idée ?
Merci d'avance.
Daniel