Notifications
Clear all

REGISTRAR CONTEÚDO DE UMACÉLULA DO EXCEL NUMA VARIÁVEL VBA

3 Posts
2 Usuários
0 Reactions
581 Visualizações
(@jumas)
Posts: 0
New Member
Topic starter
 

Olá, meu nome é Jumas e gostaria de saber se alguém pode me ajudar no seguinte:
Preciso, através do VBA, buscar o conteúdo de uma determina célula em uma planilha do Excel, a fim de registrá-lo em uma variável do VBA. A referida célula só poderá ter 2 valores: "1" ou "0". Se for "0", o VBA permitirá que uma determinada macro siga seu processamento, se for "1" o código VBA deverá exibir uma mensagem avisando o usuário que "O CADASTRO ESTÁ INCOMPLETO.". A mensagem deverá vir com um botão "OK", a fim do usuário clicar nele para cancelar o processamento e voltar para completar o cadastro.

Agradeço muito se alguém puder me ajudar.

Um abraço

 
Postado : 05/07/2014 11:37 pm
(@wagner-morel-vidal-nobre)
Posts: 4063
Famed Member
 

Jumas,

Bom Dia!

Assim:

Sub Teste ()
     Dim Variavel As Integer
     Variavel = CInt (ActiveSheet.Range("A1").Value)
     If Variavel = 1 Then
          MsgBox "O Cadastrado Está Incompleto!", vbDefaultButton1, "CADASTRAMENTO"
     Else
          'Aqui devem ser inseridos os procedimentos normais da macro que deve seguir ou chamar outra macro
     End If
End Sub
 
Postado : 06/07/2014 5:42 am
(@jumas)
Posts: 0
New Member
Topic starter
 

Olá Wagner!

Muito obrigado!
O problema foi resolvido.

Um abraço,
Jumas

 
Postado : 06/07/2014 3:43 pm