Este fórum está sendo desativado

[mrkiraz]

estou aprendendo a mexer no VBA e queria retornar um texto na planilha de acordo com as condições

Exemplo: joao>plano comum>acesso comum dentro da planilha


-codigo que estou fazendo^^^^^^^^^^^^

-o que eu quero que retorne na planilha

[babdallas]

Tente isso

Código: Selecionar todos

Public Function Assinatura(strTipoAss As String) As String
    Dim strAss      As String
    
    Application.Volatile
    
    Select Case strTipoAss
        Case "Plano Comum"
            strAss = "Acesso Comum"
        Case "Plano Mensal"
            strAss = "Acesso Intermediário"
        Case "Plano anual"
            strAss = "Acesso Premium"
        Case Else
            strAss = "Acesso Teste"
    End Select
    Assinatura = strAss
End Function

[osvaldomp]

#
Experimente:

Código: Selecionar todos

Function Acesso(c As Range)
 Select Case c.Value
  Case "Plano Comum": Acesso = "Acesso comum"
  Case "Plano mensal": Acesso = "Acesso intermediário"
  Case "Plano anual": Acesso = "Acesso Premium"
  Case Else: Acesso = "Acesso Teste"
 End Select
End Function

#
1. complete os dados na coluna B
2. em C2 coloque =Acesso(B2) e arraste para baixo.