PROBLEMAS COM IF

SACOFRITO 29/10/2010 16:43:25
#356295
Eita,
Esse erro é quanto esta faltando o objeto.
Estranho, verifica o nome dos seus checkboxes se estao de acordo com oq vc digitou
LUIZCOMINO 29/10/2010 16:48:58
#356297
então agora parece ser erro de conexão, faça um teste simples para ver se os ifs estão ok agora:


Sub WellPlanCheck_Show()
If wellcheck.value = True Then [ô] ou If wellcheck.value = 1
msgbox([Ô]o valor está como true[Ô])
Else
msgbox([Ô]o valor está como false[Ô])
End If
End Sub
SAMUKA 29/10/2010 16:49:07
#356298
Tenta isso:

  if wellcheck.Value = vbChecked then

end if
LUIZCOMINO 29/10/2010 16:50:06
#356299
ops é
Sub WellPlanCheck_Show()
If wellcheck.value = True Then [ô] ou If wellcheck.value = 1
msgbox [Ô]o valor está como true[Ô]
Else
msgbox [Ô]o valor está como false[Ô]
End If
End Sub
MARCELGARCIA 29/10/2010 16:57:47
#356301
Citação:

:
Tenta isso:

  if wellcheck.Value = vbChecked then

end if

Citação:

:
então agora parece ser erro de conexão, faça um teste simples para ver se os ifs estão ok agora:


Sub WellPlanCheck_Show()
If wellcheck.value = True Then [ô] ou If wellcheck.value = 1
msgbox([Ô]o valor está como true[Ô])
Else
msgbox([Ô]o valor está como false[Ô])
End If
End Sub



Galera, misturei os dois codigos.... se eu usar o .value ele continua com o error 454.
Tirei ele e copiei os msgbox do Luiz e botei o vbChecked do Samuka e [Ô]funfou[Ô]... ou seja... ele agora soh identifica o true... independente de estar marcado ou não...

o cenário anterior foi invertido...

brigado pela ajuda de todos ai!
MARCELGARCIA 29/10/2010 17:27:52
#356304
Galera, consegui...

Oq eu fiz:

Sub WellCheck_Show()
Dim wcvalue As Range

Set wcvalue = Range([Ô]AE5[Ô])

If wcvalue = True Then
Rows([Ô]19:27[Ô]).Select
Selection.EntireRow.Hidden = True
Else
Rows([Ô]18:28[Ô]).Select
Selection.EntireRow.Hidden = False
End If
End Sub

Fui nas propriedades do checkbox e [Ô]linkei[Ô] ele a essa celula AE5, pq nela mostrava [Ô]True[Ô] e [Ô]False[Ô] quando eu marcava ou não!

Não é a forma correta... mas funfa!

Brigado a todo mundo pela ajuda e presteza!

Abs
Página 2 de 2 [16 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar