Notifications
Clear all

Condicional em VBA - Colunas

4 Posts
3 Usuários
0 Reactions
767 Visualizações
(@nemenlsk)
Posts: 0
New Member
Topic starter
 

Olá pessoal, bom dia!

Gostaria de saber como fazer uma condicional em vba para verificar se todas as células de uma coluna estão preenchidas e, também, como fazer condicional com um intervalo com o "range". Poderiam me ajudar?

Agradeço desde já a ajuda.

 
Postado : 08/11/2015 11:49 am
(@mprudencio)
Posts: 0
New Member
 

Nao entendi... ficou bem confuso.

 
Postado : 08/11/2015 12:51 pm
(@nemenlsk)
Posts: 0
New Member
Topic starter
 

Eu tenho um intervalo de células em uma coluna que preciso verificar se esse intervalo não está vazio.

 
Postado : 08/11/2015 1:01 pm
(@suggos)
Posts: 0
New Member
 

Veja se a macro abaixo atende. Só funciona se a última célula for a última com dados. Para mais informações, sobre a última célula da planilha, veja o seguinte link: https://support.office.com/pt-br/articl ... c1d86e99e9

Sub teste()
Dim lin, col, i As Long
lin = Application.ActiveCell.SpecialCells(xlCellTypeLastCell).Row 'Identifica qual a última linha da planilha
col = Application.ActiveCell.SpecialCells(xlCellTypeLastCell).Column 'Identifica qual a última linha da planilha

For i = 1 To col
Cells(1, i).Select
If Application.WorksheetFunction.CountA(Cells(1, i).EntireColumn) < lin Then
MsgBox "A linha " & i & " está incompleta."
Exit Sub
End If
Next
MsgBox "Todas as colunas estão completas"
End Sub

 
Postado : 09/11/2015 8:06 pm