Este fórum está sendo desativado

[JOAO1234]

Boa noite!

Pessoal, tenho uma macro que abre um link, porém gostaria de colocar um comando For Next para abrir automático, sem ter que clicar na célula. EX:

A1: Link x ( Abre, copia e cola), depois fecha
A2: Link y ( Abre, copia e cola), depois fecha

Até A10. Tem algum comando para fazer isso? For Next ou Loop?

[alexandrevba]

Bom dia!!!

Código: Selecionar todos

Sub teste()
Dim iLastRow As Long
Dim i As Long
iLastRow = Cells(Rows.Count, "A").End(xlUp).Row
    For i = 1 To iLastRow
        'Seu Codigo
    Next i
End Sub

Att