Excel VBA: Armazenar parte de uma condicional (if) dentro de uma variá

[manos80]

Olá,

Preciso armazenar parte de uma condicional dentro de uma variável. Essa parte irá variar de acordo com o que o usuário selecionar em um checkbox.
Para ficar mais fácil de explicar, o código é o seguinte:
--------------------------------------------------------------------------------------------

Sub checaCores()

verde = frmCores.chkVerde.Value 'usuário seleciona o checkbox de nome chkVerde

if verde = true then
condicao = " AND Sheets(""Cores"").Cells(lin, 3) = ""Verde"""
else
condicao = " AND Sheets(""Cores"").Cells(lin, 3) = ""padrão"""
end if


If Sheets("Cores").Cells(lin, 2) = "Ativo" & condicao Then
'executa a ação
End If

End Sub

--------------------------------------------------------------------------------------------

Mas o excel ignora a parte da condição armazenada na variável condicao.
Precisaria ficar assim: If Sheets("Cores").Cells(lin, 2) = "Ativo"m AND Sheets(""Cores"").Cells(lin, 3) = ""Verde""" Then

Alguém saberia dizer o por quê disso e como eu poderia fazer para funcionar?

Grata.

[Benhur Palini]

Seria isto?

if verde = true then
condicao = "Verde"
else
condicao = "padrão"
end if

If Sheets("Cores").Cells(lin, 2) = "Ativo" AND Sheets("Cores").Cells(lin, 3) = condicao Then
'executa a ação
End If

se a primeira célula for igual a "Ativo" e a segunda célula for igual cor contida na variável condicao a ação deverá ser executada.