Mudar varável com If

2024 - VBA & Macros

Post Recente por Fernando Fernandes 9 anos atrás

4 Posts

2 Usuários

0 Reactions

806 Visualizações

RSS

carloshvb

(@carloshvb)

Posts: 99

Trusted Member

Topic starter

Bom dia pessoal,

Eu preciso mudar uma variável de acordo com o valor inicial dela. Eu tentei o código abaixo, mas não funcionou, a variável inicial é mantida e não muda com o comando If.

Sub SelPlan()

Set sh = ThisWorkbook.Sheets("Filtro (2)")
Nome = sh.Range("mes").Value


If Nome = Planinha1 Then

Nome = sh.Range("m1m").Value
ElseIf Nome = Planilha2 Then
Nome = sh.Range("m2m").Value
ElseIf Nome = Planilha3 Then
Nome = sh.Range("m3m").Value

End If

End Sub

Postado : 26/10/2015 7:50 am

Fernando Fernandes

(@fernandofernandes)

Posts: 43750

Illustrious Member

Bom dia!!

Oque você pretende fazer, mudar o valor de um intervalo ou célula?

Att

Existem mil maneiras de preparar Neston. Invente a sua!
http://www.youtube.com/ExpressoExcel

Postado : 26/10/2015 8:08 am

carloshvb

(@carloshvb)

Posts: 99

Trusted Member

Topic starter

Bom dia!!

Oque você pretende fazer, mudar o valor de um intervalo ou célula?

Att

Alexandre,

Eu tenho uma caixa de listagem onde pretendo colocar os 12 meses do ano e definir uma variável de acordo com o mês selecionado. Até aqui tudo bem.

Só que depois eu tenho que mudar o nome dessa variável para o nome da planilha em que a próxima sequência de código será executada. Comando If, é nessa parte que estou tendo dificuldades.

Postado : 26/10/2015 8:32 am