Fóruns
Microsoft Excel - 2...
2024 - VBA & Macros
Definir linha no có...
 
Notifications
Clear all

Definir linha no código da MsgBox

 
2024 - VBA & Macros
Post Recente por gmendrib 6 anos atrás
4 Posts
3 Usuários
0 Reactions
1,269 Visualizações
RSS
 gmendrib
(@gmendrib)
Posts: 0
New Member
Topic starter
 

Bom dia!

Eu preciso que uma MsgBox apareça quando for inserido na célula W44 um valor > 25.

Encontrei o código abaixo, porém ele funciona para a coluna 23 inteira, enquanto eu preciso apenas na linha 44.

Imagino que seja simples, porém não entendo disso.

Muito obrigada!

Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column > 23 Then Exit Sub
   If Cells(Target.Row, 23) > 25 Then
   MsgBox "Texto aqui"
   End If
End Sub
 
Postado : 25/07/2018 8:11 am
 xlarruda
(@xlarruda)
Posts: 0
New Member
 

Segue:

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Address(0, 0) = "W44" Then
If Target.Value > 25 Then
MsgBox "Texto aqui"
End If
End If
End Sub
 
Postado : 25/07/2018 8:17 am
 klarc28
(@klarc28)
Posts: 0
New Member
 
Private Sub Worksheet_Change(ByVal Target As Range)
  If Target.Column > 23 Then Exit Sub
if target.row = 44 then
   If Cells(Target.Row, 23) > 25 Then
   MsgBox "Texto aqui"
   End If
end if
end if
End Sub
 
Postado : 25/07/2018 8:44 am
 gmendrib
(@gmendrib)
Posts: 0
New Member
Topic starter
 

Perfeito! Obrigada, André.

 
Postado : 25/07/2018 8:51 am
Forum Jump:
  Tópico Anterior
Próximo Tópico