...Q = 1 to 27
cod_sname = sname(Q)
Enviar(cod_sname, 0, 1, 17,23)
Captura.Tela
Converte.Tela
adress = Extra.dados
cells(2, 3).value
Next y
End Sub
*****
I`m going to send the Variable sName to another program(Extra Personal Client) , that when the program to receive this "input"...