Notifications
Clear all

Mudar varável com If

4 Posts
2 Usuários
0 Reactions
806 Visualizações
(@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)
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
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

Pelo descrito e o trecho colocado, não há motivo dificuldade. Sem poder ver seu modelo, acredito que o erro/dificuldade se deva a outros fatores

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

 
Postado : 27/10/2015 2:31 pm