Saberexcel - site das macros

Essas macros do Aplicativo Microsoft Excel VBA, inserem uma autonumeração em diferentes posições na folha de planilha, esses exemplos tem a finalidade didática. Espero que lhe sejam úteis em seu aprendizado. Fiquem com Deus, E_Marcondes

Public i As Integer
'insere uma autonumeração transversal descendente
Sub transversal()
For i = 1 To 10
Cells(i i ) = i
Next
End Sub

'insere contagem na linha 10 até coluna 10
Sub Linha_10()
For i = 1 To 10
Cells(10, i) = i
Next
End Sub

'insere contagem na linha 10 até coluna 10
Sub Linha1_1()
For i = 1 To 10
Cells(1, i ) = i
Next
End Sub

'insere contagem na coluna 1 a1:A10
Sub Coluna_1()
For i = 1 To 10
Cells(i , 1) = i
Next
End Sub

'insere contagem na linha 10 até coluna 10
Sub Coluna_10()
For i = 1 To 10
Cells(i , 10) = i
Next
End Sub



Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel




   Baixe o exemplo de planilha contendo os loops acima
Excel planilha vba loops inserem autonumeracao diferentes posicoes planilha (34.5 kB)

Compre com segurança garantia e baixos preços. Lojas SubMarino