Devolve um valor Booleano que indica se foi passado um argumento Variant opcional para um procedimento.
Sintaxe
IsMissing(argname)
O argumento argname necessário contém o nome de um argumento opcional do procedimento Variant .
Observações
Utilize a função IsMissing para detetar se foram fornecidos argumentos Variant opcionais na chamada de um procedimento. IsMissing devolve Verdadeiro se não tiver sido passado nenhum valor para o argumento especificado; caso contrário, devolve False. Se IsMissing devolver True para um argumento, a utilização do argumento em falta noutro código pode causar um erro definido pelo utilizador. Se IsMissing for usado em um argumento ParamArray , ele sempre retornará False. Para detectar um ParamArray vazio, teste para ver se o limite superior da matriz é menor que seu limite inferior.
Nota
IsMissing não funciona em tipos de dados simples (como Integer ou Double) porque, ao contrário das Variantes, elas não têm uma provisão para um bit de sinalizador "ausente". Por este motivo, a sintaxe de argumentos opcionais escritos permite-lhe especificar um valor predefinido. Se o argumento for omitido quando o procedimento for chamado, o argumento terá este valor predefinido, como no exemplo abaixo:
Nota
Os exemplos seguintes demonstram a utilização desta função no módulo VBA (Visual Basic for Applications). Para obter mais informações sobre como trabalhar com o VBA, selecione Referência para Programadores na lista pendente junto a Procurar e introduza um ou mais termos na caixa de pesquisa.
Sub MySub(Optional MyVar As String = "specialvalue")
If MyVar = "specialvalue" Then
' MyVar was omitted.
Else
...
End Sub
Em muitos casos, você pode omitir completamente o If MyVar teste tornando o valor padrão igual ao valor que você deseja MyVar conter se o usuário omiti-lo da chamada de função. Isto torna o seu código mais conciso e eficiente.
Exemplo
Este exemplo usa a função IsMissing para verificar se um argumento opcional foi passado para um procedimento definido pelo usuário. Tenha em atenção que os argumentos Opcionais podem agora ter valores predefinidos e tipos diferentes de Variant.
Dim ReturnValue
' The following statements call the user-defined
' function procedure.
ReturnValue = ReturnTwice() ' Returns Null.
ReturnValue = ReturnTwice(2) ' Returns 4.
' Function procedure definition.
Function ReturnTwice(Optional A)
If IsMissing(A) Then
' If argument is missing, return a Null.
ReturnTwice = Null
Else
' If argument is present, return twice the value.
ReturnTwice = A * 2
End If
End Function