Vídeo recomendado
https://youtu.be/diWPPPhW-9E

Estrutura de repetição

Fórum para dúvidas sobre os fundamentos da linguagem de programação Visual Basic no contexto do VBA
RodrigoAraujo
Colaborador
Colaborador
Mensagens: 15
Registrado em: Sex Nov 22, 2019 9:28 am

Estrutura de repetição

Mensagem por RodrigoAraujo »

Bom dia Senhores,

Estou enrolado para fazer esse Loop.

Que seria ele contar até 10 porém quando chegar em 5 ele desce a linha volta para a coluna inicial e mantem a contagem.
Anexos
Capturar.PNG
Capturar.PNG (2.51 KiB) Exibido 1346 vezes


Disable adblock

This site is supported by ads and donations.
If you see this text you are blocking our ads.
Please consider a Donation to support the site.


RodrigoAraujo
Colaborador
Colaborador
Mensagens: 15
Registrado em: Sex Nov 22, 2019 9:28 am

Re: RESOLVIDO Estrutura de repetição

Mensagem por RodrigoAraujo »

Resolvido!

Sub RetânguloCantosArredondados1_Clique()

Dim linha, coluna, i As Integer
linha = 1
coluna = 1

For i = 1 To 10
If coluna > 4 Then
coluna = 1
linha = linha + 1
Cells(linha, coluna) = i
coluna = coluna + 1
Else
Cells(linha, coluna) = i
coluna = coluna + 1
End If
Next i
End Sub


Responder