PROBLEMAS COM IF

MARCELGARCIA 29/10/2010 15:00:11
#356277
Senhores, estou com um problema no seguinte bloco:

Citação:

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



Esse bloco eh para exibir/ocultar determinadas linhas, o wellcheck que está no IF é um checkbox que possui este nome, porém independente de qualquer valor que eu coloque no checkbox ele sempre executa o Else. Ou seja: ele não esconde as celulas, soh mostra... alquem sabe como solucionar isso?

Abs
SACOFRITO 29/10/2010 15:15:08
#356279
pro check box vc usa 1 para true e 0 para false
MARCELGARCIA 29/10/2010 15:25:36
#356280
Citação:

:
pro check box vc usa 1 para true e 0 para false



Independente disso, ele continua executando somente o else...

Mas grato msm assim!
LUIZCOMINO 29/10/2010 15:38:34
#356284
tenta inverter assim

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


ou

Sub WellPlanCheck_Show()
If wellcheck = True Then
Rows([Ô]19:27[Ô]).Select
Selection.Rows.Hidden = True
if wellcheck = false Then [ô] ou if wellcheck = [Ô][Ô] Then
Rows([Ô]18:28[Ô]).Select
Selection.Rows.Hidden = False
End If
End Sub

MARCELGARCIA 29/10/2010 15:48:36
#356286
Citação:

:
tenta inverter assim

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


ou

Sub WellPlanCheck_Show()
If wellcheck = True Then
Rows([Ô]19:27[Ô]).Select
Selection.Rows.Hidden = True
if wellcheck = false Then [ô] ou if wellcheck = [Ô][Ô] Then
Rows([Ô]18:28[Ô]).Select
Selection.Rows.Hidden = False
End If
End Sub



Já havia tentado e não havia funcionado!

Valeu pela moral ae!

Abs
LUIZCOMINO 29/10/2010 16:04:36
#356288
Você está colocando o código no evento certo?, não seria no evento click?
MARCELGARCIA 29/10/2010 16:06:57
#356289
Mudei para click e nada....

O que eu creio que esteja acontecendo é que não o IF não consegue interpretar o valor [Ô]True[Ô] do Checkbox... ele interpreta como se estivesse sempre em false... independente da seleção...
MARCELO.TREZE 29/10/2010 16:14:58
#356290
tenta assim


Sub WellPlanCheck_Show()
  If wellcheck = 1Then
   Rows([Ô]19:27[Ô]).Select
   Selection.Rows.Hidden = True
  Else
 If wellcheck = 0 Then
   Rows([Ô]18:28[Ô]).Select
   Selection.Rows.Hidden = False
End If
  End If
End Sub
MARCELGARCIA 29/10/2010 16:24:15
#356292
o problema esta no primeiro IF....

Tentei isso tbm mas... a msma coisa...

Ele não consegue validar o checkbox se for true
soh compreende o checkbox como false

Abs
LUIZCOMINO 29/10/2010 16:35:51
#356293
por padrão ele assume a propriedade value mas tenta ai:

Sub WellPlanCheck_Show()
If wellcheck.value = True Then [ô] ou If wellcheck.value = 1
Rows([Ô]19:27[Ô]).Select
Selection.Rows.Hidden = True
Else
Rows([Ô]18:28[Ô]).Select
Selection.Rows.Hidden = False
End If
End Sub
MARCELGARCIA 29/10/2010 16:38:54
#356294
quando eu insiro o .value eu recebo:

Runtime Error [ô]424[ô] Object Require
Página 1 de 2 [16 registro(s)]
Tópico encerrado , respostas não são mais permitidas
Voltar