|
 Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções
Função IIf
Retorna uma das duas partes, dependendo da avaliação de uma expressão.
Sintaxe
IIf(expr, truepart, falsepart)
A sintaxe da função IIf tem os seguintes argumentos nomeados:
|
Parte
|
Descrição
|
|
expr
|
Obrigatória. Expressão que você deseja avaliar.
|
|
truepart
|
Obrigatória. Valor ou expressão retornada se expr for True.
|
|
falsepart
|
Obrigatória. Valor ou expressão retornada se expr for False.
|
Comentários
IIf sempre avalia truepart e falsepart, mesmo que retorne somente uma delas. Em razão disto, você deve observar se ocorrem efeitos colaterais indesejáveis. Por exemplo, se a avaliação de falsepart resultar em um erro de divisão por zero, ocorrerá um erro mesmo se expr for True.
' - - - - - - - - - - - - - - - - - - - - - - - - - - -'
VEJA EXEMPLO PRÁTICO. (NO FINAL DA PÁGINA BAIXE O EXEMPLO DE PLANILHA> Fiquem com Deus, Expedito Marcondes.
'Saber = IIf(C = 3, 11, C + 4)
'Saber = 11 (ou coluna "K") Se C = 3
'Saber = C + 4 (ou coluna "E") se C = 1
'como também
'Saber = C + 4 (ou coluna "F") se C = 2...
'Tudo isso em uma linha graças a IIf ...
'Sbx = IIf(sbx = 0, "Valor Nullo", "Sbx dentro especificação")
'veja a sintaxe da função IIF :IIf(expressão, truepart, falsepart)
Exemplo da função IIf
Este exemplo usa a função IIf para avaliar o parâmetro TestMe do procedimento CheckIt e retorna a palavra "Grande" se a quantidade for maior que 1000; caso contrário, retorna a palavra "Pequena".
Function CheckIt (TestMe As Integer)
CheckIt = IIf(TestMe > 1000, "Grande", "Pequena")
End Function
'- - - - - - - - - - - - - - - -
'Outros exemplos para treinamento com VBA - Saberexcel
Sub instrucao_IFF()
Set r = Range("B2")
r = IIf(r = 0, "celula[b2] é igual a zero", "Celula b2 é Maior que zero [ " & Cells(2, 2).Value) & " ]"
MsgBox r
End Sub
Sub instrucao_IFF_2()
Set r = Range("B2")
'r = IIf(r = 0, "Valor Nullo", "Sbx dentro especificação") ou adicionar célula e inserir colchetes
r = IIf(r = 0, "celula b2 = 0 ", "Celula [B2 >0 ] = [ " & Cells(2, 2).Value) & " ]"
MsgBox r, vbInformation, "Escola Saberexcel VBA Estudos®"
End Sub
Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Escola Saberexcel VBA Estudos® - Treinamentos com Macros, Fórmulas e Funções.
|