tracer un chemin suivant ses coordonnéesRésolu

Question

Bonjour,
dans une feuille excel, j'ai une liste de coordonnées, Colonne A PosX et colonne B PosY
j'ai une fonction qui me trace un e flêche entre deux points TRACE, mais j'aimerais savoir comment je peux parcourir mes lignes  pour que cela me trace à la suite les flêches.

Du genre PosX=Range("A1")
                  PosY= Range("B1")
TRACE

PosX=Range("A2")
PosY= Range("B2")
TRACE
............... et ainsi de suite

Merci d'avance
Je viens de découvrir le bonheur de programmer et le VB me le rend bien

mortalino · Accepted Answer

salut,

utilise cells et une boucle For To Next

For i = 1 To 1000
    PosX = Cells(i, 1).Value
    PosY = Cells(i, 2).Value
TRACE
Next i

@++ 

<hr size="2" width="100%" />( Nouveau forum : Exclusivement Office & VBA

taj88 · Answer

Bonjour, merci pour ta réponse, par contre j'aimerais que ma boucle s'arrete une fois que je n'ai plus de valeur
un truc du genre for i = 1 to End(x1down) (je sais pas si ca marche)

et sinon j'aimerais que lorsqu'il me dessine la flêche avec TRACE, ensuite il attend 2spuis il fait l'autre flêche etc...(pour décomposer le dessin)

Voilà si quelqu'un peut me donner des précisions sur ceci je l'en remercie
@+

Je viens de découvrir le bonheur de programmer et le VB me le rend bien

mortalino · Answer

pour le derniere ligne : 
Last = Range("A65536").End(xlUp).Row

pour une pause, tu as la procédure Sleep (Api) :
Declare Sub Sleep Lib "kernel32" Alias "Sleep" (ByVal dwMilliseconds As Long)

@++ 

<hr size="2" width="100%" />( Nouveau forum : Exclusivement Office & VBA

Tracer un chemin suivant ses coordonnées

3 réponses

Votre réponse

Discussions similaires