Datos variables en un loop

[Insolit]

Buenas tardes, en primer lugar me presento ya que soy nuevo por aqui, llevo mucho tiempo leyendo y recibiendo ayuda de todos vuestros consejos pero hasta hoy no he tenido que solicitar vuestra ayuda.
Estoy completamente atascado en una tonteria, tengo que hacer un loop con una serie de datos y todavia soy muy novato y no encuentro la solución por mas que busco, mas o menos lo que quiero hacer es lo siguiente.

Tengo varias personas a las que tengo que hacer supervisión diaria de una información que me da una base de datos por lo que hago un loop del mismo codigo pero que me cambie el codigo de trabajador por el siguiente cada vez

Código: Seleccionar todo

$persona1 = '0025'
$Persona2 = '0016'
$Persona3 = '0039'

While 1
MouseClick("left",435,85,1)                ;								DATOS
Send("{HOME}{SHIFTDOWN}{END}{SHIFTUP}{BACKSPACE}")
Send("{SHIFTDOWN}{TAB}{SHIFTUP}c{TAB}")

Send($Persona1)   <---------- Aqui es donde quiero que vaya cambiando la siguiente $Persona2, $Persona3, $Persona4, Etc... hasta 15 personas o mas

Wend

Os agradezco mucho vuestra ayuda y consejos en este foro

[Dany]

Hola. para ello solo tienes que usar un arreglo y un ciclo for.
Algo así.

Código: Seleccionar todo

$persona1 = '0025'
$Persona2 = '0016'
$Persona3 = '0039'

Local $aPersonas[]=[$persona1, $Persona2, $Persona3]
Local $iNumeroDePersonas = UBound($aPersonas) ;3 Persoans

For $i = 0 To $iNumeroDePersonas - 1
	MouseClick("left", 435, 85, 1) ;DATOS
	Send("{HOME}{SHIFTDOWN}{END}{SHIFTUP}{BACKSPACE}")
	Send("{SHIFTDOWN}{TAB}{SHIFTUP}c{TAB}")

	Send($aPersonas[$i])

Next

Saludos