Notifications
Clear all

Referenciar planilha sem utilizar o seu nome

2 Posts
2 Usuários
0 Reactions
685 Visualizações
(@bruno-sot)
Posts: 1
New Member
Topic starter
 

Olá pessoal!

Estou com o seguinte problema em mãos e não consegui encontrar um tópico ativo que se encaixasse. Espero que alguém possa me ajudar. Sou novo em VBA, por isso não reparem se a pergunta for muito tola.

Vamos lá:

Eu tenho, por exemplo as seguintes Plan's:

Jul.15 Ago.15 Set.15

Em uma célula, J11 (por exemplo), eu tenho a seguinte equação:

=SE(A1=VERDADEIRO;Jul.15!$J$11+SE(A4=VERDADEIRO;D4;0)+D5+SE(A6=VERDADEIRO;D6;0)+SE(A7=VERDADEIRO;D7;0)+SE(A8=VERDADEIRO;D8;0)-J6+SE(Set.15!$A$3=VERDADEIRO;Set.15!$D$3;0);0)+R111

Sei que é possível nomear uma Plan através de um texto qualquer em uma célula qualquer:
ActiveSheet.Name = Range("A1").Value

Bom, eu preciso de uma macro que ao ser executada ela seja capaz de montar essa equação acima, MAS, eu não quero que passar o nome das Plan's, que no caso seriam Jul.15 e Set.15. Eu preciso de uma lógica que a macro seja capaz de RECONHECER o nome da Plan ANTERIOR e POSTERIOR.

É importante que eu não tenha que passar o nome exato da minha Plan que eu quero carregar na equação. Ela precisa RECONHECER o nome da planilha anterior e posterior e carregá-los na equação apresentada.

Desde já agradeço a quem puder me ajudar!

 
Postado : 17/08/2015 5:14 pm
Fernando Fernandes
(@fernandofernandes)
Posts: 43750
Illustrious Member
 

bruno, temos alguns links interessantes sobre retornar o nome ou Index semelhante a função (OFFSET) da aba á direita ou á esquerda.
Veja que nas funções dependendo do argumento é que temos o retorno se aba da Direita ou da Esquerda.

Referenciando abas à Direita ou à Esquerda em formulas

Fontes:
Functions For Worksheets
http://www.cpearson.com/excel/SheetNameFunctions.aspx

e
A Custom Function For Relative Sheet References
http://j-walk.com/ss/excel/tips/tip63.htm

Veja se ajuda em sua questão.

[]s

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

 
Postado : 18/08/2015 8:54 am