Home Excel - Downloads / Areas Restritas Excel VBA - Estrutura de Decisao

Excel VBA - Estrutura de Decisao

  • - Acesso Livre
  • Documentos

    Ordenar por : Nome | Data | Acessos [ Descendente ]

    Excel planilha vba funcao com varios ses aninhados Excel planilha vba funcao com varios ses aninhados

    popular!
    Adicionado em: 22/08/2011
    Modificado em: 22/08/2011
    Tamanho: 22.83 KB
    Downloads: 1007

    Saberexcel - o site das macros ms excel vba

    Esta função personalizada do Microsoft Excel VBA, tem por finalidade aninhar vários "SE's", de acordo com a necessidade de cada um, fiz esse exemplo para um amigo, os critérios de condição foi limitado na fórmula até 25 condição, isto é SE's Aninhados, na Função Personalizada AninhaSe(). Todos sabemos que só podemos utilizar 7 vezes a função se() dentro de uma fórmula.
    Essa Função Personalizada resolve este problema, onde poderemos utilizar vários "Se's", como mostra a função e formula abaixo.
    O uso da função é muito simples veja como suporta vários SE's

    '=AninhaSe(F11=1;"Um";F11=2;"Dois";F11=3;"Três";F11=4;"Quatro";F11=5;"Cinco";F11=6;"Seis";F11=7;"Sete";
    F11=8;"Oito";F11=9;"Nove";F11=10;"Dez";F11=11;"Onze";F11=12;"Doze";F11=13;"Treze";F11=14;"Quatorze";
    F11=15; "Quinze";F11=16;"Dezesseis";F11=17;"Dezessete";F11=18;"Dezoito";F11=19;"Dezenoves";F11=20;"Vinte";
    F11=21;"Vinte e um";F11=22;"Vinte e dois";F11=23;"Vinte e treis";F11=24;"Vinte e quatro";F11=25;"Vinte e cinco")

    Function AninhaSE(ParamArray a() As Variant) As Variant
    Dim i As Long, n As Long

    n = UBound(a)

    If n Mod 2 = 0 Then
    AninhaSE = a(UBound(a))
    n = n - 1
    Else
    AninhaSE = "Número Inexistente"
    End If


    For i = 0 To n Step 2
    If CBool(a(i)) And i < n Then
    AninhaSE = a(i + 1)
    Exit For
    End If
    Next i
    End Function







    Aprenda tudo sobre planilhas do Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel




    Baixe o exemplo de planilha contendo procedimento acima



    Publicidade
    Compre com segurança, garantia e ótimos preços
    Eletrônicos - Submarino.com.br


    Google Associados

    Depoimentos

    Adicione Saberexcel Favoritos

     
     

    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA

    Aprenda tudo sobre o Aplicativo Microsoft Excel VBA(Visual Basic Application), sozinho, com baixo custo, praticando com os produtos didáticos Saberexcel,


       Sobre as WorksheetFunctions Funções de Planilhas que retornam valores do VBA