Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Macro/VBA inserir n...
 
Notifications
Clear all

Macro/VBA inserir número em uma coluna

 
2024 - VBA & Macros
Post Recente por Wagner Morel 7 anos atrás
5 Posts
4 Usuários
0 Reactions
690 Visualizações
RSS
 tallissonn
(@tallissonn)
Posts: 2
New Member
Topic starter
 

Boa noite galera!

Sou novo em macro e ví esse Fórum a pouco tempo, mas pude perceber que só possui gente fera ajudando. Estou precisando demais.

Criei uma planilha de controle de cheques e gostaria de saber se é possível sempre que a coluna B for preenchida, na coluna A seja enumerada (1,2,3,4...) como se fossem números de Protocolos.

To anexando a planilha.

Alguém me ajuda!

 
Postado : 13/12/2017 4:06 pm
 MPrudencio
(@mprudencio)
Posts: 2749
Famed Member
 

Pode tentar assim

Se (B2="";"";A1+1)

Arraste

Leve em conta que o primeiro numero vc digite.

Marcelo Prudencio
Microsoft Excel Brasil no Facebook

"Começar já é a metade do caminho."
Autor Desconhecido

Simplifica que simples fica.
Nicole Tomazella.

"O Simples é Sempre Melhor Que o Complicado"
Jorge Paulo Lemann.

 
Postado : 13/12/2017 6:53 pm
 tallissonn
(@tallissonn)
Posts: 2
New Member
Topic starter
 

cara vlw, mas eu precisava realmente que fosse código e não fórmulas.
Mas vlw a intenção...

 
Postado : 13/12/2017 7:27 pm
Fernando Fernandes
 Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Seria isso?

Sub Enumerar()
Dim I   As Integer
Dim k   As Integer
Dim j   As Integer

k = 1
j = Plan1.Cells(Rows.Count, 2).End(xlUp).Row
Plan1.Range("A3:A" & j).Value = ""

For I = 3 To j
If Plan1.Cells(I, 2) <> "" Then Plan1.Cells(I, 1) = k
k = k + 1
Next I
End Sub

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

 
Postado : 13/12/2017 10:04 pm
Wagner Morel
 Wagner Morel
(@wagner-morel-vidal-nobre)
Posts: 0
Illustrious Member
 

tallissonn,

Bom dia!

Segue minha contribuição com VBA (basta digitar uma data na coluna B que o sistema insere o número na coluna A). Veja se é assim.

Controle-de-Cheques.zip

Desenvolvo pequenas soluções em VBA Excel a valores que variam entre R$ 50,00 a R$ 200,00. Se te interessar, entre no meu instagran (vba_excel_desenvolvimento)

Atenciosamente
Wagner Morel

 
Postado : 14/12/2017 9:57 am
Forum Jump:
  Tópico Anterior
Próximo Tópico