Página 1 de 1

retornar texto do if na planilha

Enviado: 21 Mar 2021 às 20:28
por 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
Imagem

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

-o que eu quero que retorne na planilha

Imagem

Re: retornar texto do if na planilha

Enviado: 22 Mar 2021 às 00:47
por 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

Re: retornar texto do if na planilha

Enviado: 22 Mar 2021 às 11:17
por 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.