Страницы: 1
RSS
Макрос ссылки на предыдущий лист., Макросы.
 
Есть такой макрос для ссылки на предыдущее листы:

Function PrevSheet(Cell As Range) As Variant
Dim i&
Application.Volatile
i = Cell.Worksheet.Index - 1
If i = 0 Then i = 1
If Sheets(i).Name = "<" Or Sheets(i).Name = ">" Then i = i - 1
If i = 0 Then i = 1
PrevSheet = Sheets(i).Range(Cell.Address)
End Function

Нужно сделать так, чтобы он ссылался не на предыдущий лист, а на следующий после него.
 
NextSheet = Sheets(Cell.Worksheet.Index + 1).Range(Cell.Address)
Во всех делах очень полезно периодически ставить знак вопроса к тому, что вы с давних пор считали не требующим доказательств (Бертран Рассел) ►Благодарности сюда◄
 
Вот отсюда можно забрать основной принцип: Имя предыдущего листа
Там и предыдущий и следующий лист рассматривается, притом именно в реализации с получением значения указанной ячейки.
Даже самый простой вопрос можно превратить в огромную проблему. Достаточно не уметь формулировать вопросы...
Страницы: 1
Наверх