Домашняя страница Undo Do New Save Карта сайта Обратная связь Поиск по форуму
МИР MS EXCEL - Гость.xls

Вход

Регистрация

Напомнить пароль

 

= Мир MS Excel/Как быстро перейти из листа в лист в одну и ту же ячейку? - Мир MS Excel

Старая форма входа
  • Страница 1 из 2
  • 1
  • 2
  • »
Модератор форума: китин, _Boroda_  
Как быстро перейти из листа в лист в одну и ту же ячейку?
limonnoe_nebo Дата: Вторник, 29.05.2012, 18:58 | Сообщение № 1
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 5 ±
Замечаний: 0% ±

И снова всем привет! Есть файлик с несколькими десятками одинаковых листов. При проверке данных на этих листах необходимо быстро переходить из одного в другой на одну и ту же ячейку, например, смотрю данные на Листе1 в ячейке С55, перехожу на Лист2, нужно потратить время на то, чтобы опуститься вниз на ячейку С55. И так 30 раз, чтобы проверить 30 листов. Как можно (если можно) переходить быстро между листами в одну ячейку? Пример прилагается. Заранее спасибо!
К сообщению приложен файл: 1842001.xls (21.0 Kb)
 
Ответить
СообщениеИ снова всем привет! Есть файлик с несколькими десятками одинаковых листов. При проверке данных на этих листах необходимо быстро переходить из одного в другой на одну и ту же ячейку, например, смотрю данные на Листе1 в ячейке С55, перехожу на Лист2, нужно потратить время на то, чтобы опуститься вниз на ячейку С55. И так 30 раз, чтобы проверить 30 листов. Как можно (если можно) переходить быстро между листами в одну ячейку? Пример прилагается. Заранее спасибо!

Автор - limonnoe_nebo
Дата добавления - 29.05.2012 в 18:58
Serge_007 Дата: Вторник, 29.05.2012, 21:56 | Сообщение № 2
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Кликайте по ячейке с текстом
К сообщению приложен файл: limonnoe_nebo.xls (31.5 Kb)


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеКликайте по ячейке с текстом

Автор - Serge_007
Дата добавления - 29.05.2012 в 21:56
limonnoe_nebo Дата: Вторник, 29.05.2012, 22:15 | Сообщение № 3
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 5 ±
Замечаний: 0% ±

спасибо, Serge_007, то есть выход один: в 700 (примерно) ячейках каждого из 30 листов в файле сделать гиперссылки?
 
Ответить
Сообщениеспасибо, Serge_007, то есть выход один: в 700 (примерно) ячейках каждого из 30 листов в файле сделать гиперссылки?

Автор - limonnoe_nebo
Дата добавления - 29.05.2012 в 22:15
Serge_007 Дата: Вторник, 29.05.2012, 22:26 | Сообщение № 4
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (limonnoe_nebo)
выход один?

Нет. Это первое что пришло мне на ум smile

Quote (limonnoe_nebo)
в 700 (примерно) ячейках каждого из 30 листов в файле сделать гиперссылки?

Про 21 000 ячеек разговора не было. Было про 30 (30 листов умножить на одну ячейку):
Quote (limonnoe_nebo)
И так 30 раз, чтобы проверить 30 листов. Как можно (если можно) переходить быстро между листами в одну ячейку?


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (limonnoe_nebo)
выход один?

Нет. Это первое что пришло мне на ум smile

Quote (limonnoe_nebo)
в 700 (примерно) ячейках каждого из 30 листов в файле сделать гиперссылки?

Про 21 000 ячеек разговора не было. Было про 30 (30 листов умножить на одну ячейку):
Quote (limonnoe_nebo)
И так 30 раз, чтобы проверить 30 листов. Как можно (если можно) переходить быстро между листами в одну ячейку?

Автор - Serge_007
Дата добавления - 29.05.2012 в 22:26
limonnoe_nebo Дата: Вторник, 29.05.2012, 22:50 | Сообщение № 5
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 5 ±
Замечаний: 0% ±

Serge_007, прошу прощения, я неверно поставила задачу) Там заполненная таблица с данными, которые нужно сверять с документами, и удобнее сверять по очереди все 30 листов по одной определенной ячейке. Потом по другой, и так далее. Более наглядный пример (только без данных): Пример.xls


Сообщение отредактировал limonnoe_nebo - Вторник, 29.05.2012, 22:53
 
Ответить
СообщениеSerge_007, прошу прощения, я неверно поставила задачу) Там заполненная таблица с данными, которые нужно сверять с документами, и удобнее сверять по очереди все 30 листов по одной определенной ячейке. Потом по другой, и так далее. Более наглядный пример (только без данных): Пример.xls

Автор - limonnoe_nebo
Дата добавления - 29.05.2012 в 22:50
Serge_007 Дата: Вторник, 29.05.2012, 23:00 | Сообщение № 6
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Пример больше 100 Кб, поэтому посмотреть не могу, да и наверное не надо
Вопрос: Зачем Вам необходимо "скакать" по листам?
Вы слышали про инструмент Excel Окно контрольного значения?
Прочитайте шесть постов по ссылке, может именно это Вам надо?

ЗЫ Вот ещё инструмент для сбора информации с разных листов.


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
СообщениеПример больше 100 Кб, поэтому посмотреть не могу, да и наверное не надо
Вопрос: Зачем Вам необходимо "скакать" по листам?
Вы слышали про инструмент Excel Окно контрольного значения?
Прочитайте шесть постов по ссылке, может именно это Вам надо?

ЗЫ Вот ещё инструмент для сбора информации с разных листов.

Автор - Serge_007
Дата добавления - 29.05.2012 в 23:00
Jhonson Дата: Среда, 30.05.2012, 16:52 | Сообщение № 7
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
Репутация: 169 ±
Замечаний: 0% ±

Может так нужно?
К сообщению приложен файл: cells.xls (36.0 Kb)


"Ничто не приносит людям столько неприятностей, как разум."

Сообщение отредактировал Jhonson - Среда, 30.05.2012, 16:54
 
Ответить
СообщениеМожет так нужно?

Автор - Jhonson
Дата добавления - 30.05.2012 в 16:52
RAN Дата: Среда, 30.05.2012, 17:12 | Сообщение № 8
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
А зачем строчку
[vba]
Code
a = Target.Address
[/vba]по листам раскидал?


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеА зачем строчку
[vba]
Code
a = Target.Address
[/vba]по листам раскидал?

Автор - RAN
Дата добавления - 30.05.2012 в 17:12
Jhonson Дата: Среда, 30.05.2012, 17:57 | Сообщение № 9
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
Репутация: 169 ±
Замечаний: 0% ±

Quote (RAN)
А зачем строчку
a = Target.Address
по листам раскидал?

Для универсальности, чтобы можно было
Quote (limonnoe_nebo)
переходить быстро между листами в одну ячейку
с любого листа.


"Ничто не приносит людям столько неприятностей, как разум."
 
Ответить
Сообщение
Quote (RAN)
А зачем строчку
a = Target.Address
по листам раскидал?

Для универсальности, чтобы можно было
Quote (limonnoe_nebo)
переходить быстро между листами в одну ячейку
с любого листа.

Автор - Jhonson
Дата добавления - 30.05.2012 в 17:57
RAN Дата: Среда, 30.05.2012, 21:25 | Сообщение № 10
Группа: Друзья
Ранг: Экселист
Сообщений: 5660
Репутация: 1163 ±
Замечаний: 0% ±

2010
Для универсальности
[vba]
Code
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
a = Target.Address
End Sub
[/vba]
А по листам зачем? biggrin cool


Быть или не быть, вот в чем загвоздка!
 
Ответить
СообщениеДля универсальности
[vba]
Code
Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
a = Target.Address
End Sub
[/vba]
А по листам зачем? biggrin cool

Автор - RAN
Дата добавления - 30.05.2012 в 21:25
Jhonson Дата: Среда, 30.05.2012, 21:41 | Сообщение № 11
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
Репутация: 169 ±
Замечаний: 0% ±

Quote (RAN)
Workbook_SheetSelectionChange

Согласен, забыл про это событие, в конце рабочего дня на скорую руку делал wacko
Так действительно лучше!


"Ничто не приносит людям столько неприятностей, как разум."
 
Ответить
Сообщение
Quote (RAN)
Workbook_SheetSelectionChange

Согласен, забыл про это событие, в конце рабочего дня на скорую руку делал wacko
Так действительно лучше!

Автор - Jhonson
Дата добавления - 30.05.2012 в 21:41
Jhonson Дата: Четверг, 31.05.2012, 08:08 | Сообщение № 12
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
Репутация: 169 ±
Замечаний: 0% ±

С учетом замечаний от RAN, в модуль ЭтаКнига:
[vba]
Code
Option Explicit
Public a As String

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
On Error Resume Next
Range(a).Activate
End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
a = Target.Address
End Sub
[/vba]
К сообщению приложен файл: cells_1.xls (31.0 Kb)


"Ничто не приносит людям столько неприятностей, как разум."

Сообщение отредактировал Jhonson - Четверг, 31.05.2012, 08:10
 
Ответить
СообщениеС учетом замечаний от RAN, в модуль ЭтаКнига:
[vba]
Code
Option Explicit
Public a As String

Private Sub Workbook_SheetActivate(ByVal Sh As Object)
On Error Resume Next
Range(a).Activate
End Sub

Private Sub Workbook_SheetSelectionChange(ByVal Sh As Object, ByVal Target As Range)
a = Target.Address
End Sub
[/vba]

Автор - Jhonson
Дата добавления - 31.05.2012 в 08:08
limonnoe_nebo Дата: Четверг, 31.05.2012, 12:18 | Сообщение № 13
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 5 ±
Замечаний: 0% ±

Jhonson, RAN, вы волшебники!! Спасибо! Теперь очень прошу подсказать, как это чудо расчудесное (в файлике "cells 1") скопировать в другую книгу, чтоб пользоваться? Зайти в Сервис - Макрос - Редактор Visual Basic, кнопка "программа", и скопировать текст с "Option Explicit" по "End Sub" из файла сells 1 в каждый лист?..
 
Ответить
СообщениеJhonson, RAN, вы волшебники!! Спасибо! Теперь очень прошу подсказать, как это чудо расчудесное (в файлике "cells 1") скопировать в другую книгу, чтоб пользоваться? Зайти в Сервис - Макрос - Редактор Visual Basic, кнопка "программа", и скопировать текст с "Option Explicit" по "End Sub" из файла сells 1 в каждый лист?..

Автор - limonnoe_nebo
Дата добавления - 31.05.2012 в 12:18
Serge_007 Дата: Четверг, 31.05.2012, 12:28 | Сообщение № 14
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (Jhonson)
в модуль ЭтаКнига


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (Jhonson)
в модуль ЭтаКнига

Автор - Serge_007
Дата добавления - 31.05.2012 в 12:28
limonnoe_nebo Дата: Четверг, 31.05.2012, 14:45 | Сообщение № 15
Группа: Пользователи
Ранг: Новичок
Сообщений: 25
Репутация: 5 ±
Замечаний: 0% ±

Всё, готово, всем вам огромаднейшее спасибо!
 
Ответить
СообщениеВсё, готово, всем вам огромаднейшее спасибо!

Автор - limonnoe_nebo
Дата добавления - 31.05.2012 в 14:45
alexeiei Дата: Среда, 18.07.2012, 02:11 | Сообщение № 16
Группа: Гости
Здравствуйте Serge_007! Скачал пример cells_1.xls(31Kb) подготовленный Вами для limonnoe_nebo. Но в моем случае надпись на Листе 1 "нахожусь в этой ячейке, хочу перейти на Лист2 в ячейку С55" не кликабельна, как и на остальных двух листах. Что-то не так в настройках Excel? Что я делаю не так? С уважением.
 
Ответить
СообщениеЗдравствуйте Serge_007! Скачал пример cells_1.xls(31Kb) подготовленный Вами для limonnoe_nebo. Но в моем случае надпись на Листе 1 "нахожусь в этой ячейке, хочу перейти на Лист2 в ячейку С55" не кликабельна, как и на остальных двух листах. Что-то не так в настройках Excel? Что я делаю не так? С уважением.

Автор - alexeiei
Дата добавления - 18.07.2012 в 02:11
Serge_007 Дата: Среда, 18.07.2012, 02:26 | Сообщение № 17
Группа: Админы
Ранг: Местный житель
Сообщений: 16475
Репутация: 2749 ±
Замечаний: ±

Excel 2016
Quote (alexeiei)
Здравствуйте Serge_007! Скачал пример cells_1.xls(31Kb) подготовленный Вами для limonnoe_nebo

Ткните пальцем - где я выкладывал такой файл?


ЮMoney:41001419691823 | WMR:126292472390
 
Ответить
Сообщение
Quote (alexeiei)
Здравствуйте Serge_007! Скачал пример cells_1.xls(31Kb) подготовленный Вами для limonnoe_nebo

Ткните пальцем - где я выкладывал такой файл?

Автор - Serge_007
Дата добавления - 18.07.2012 в 02:26
Jhonson Дата: Среда, 18.07.2012, 09:46 | Сообщение № 18
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
Репутация: 169 ±
Замечаний: 0% ±

alexeiei, Что значит не кликабельна? Объясните поподробнее.


"Ничто не приносит людям столько неприятностей, как разум."
 
Ответить
Сообщениеalexeiei, Что значит не кликабельна? Объясните поподробнее.

Автор - Jhonson
Дата добавления - 18.07.2012 в 09:46
alexeiei Дата: Четверг, 19.07.2012, 09:20 | Сообщение № 19
Группа: Гости
Здравствуйте! В посте: Дата: Вторник, 29.05.2012, 21:56 | Сообщение № 2 уважаемый Serge_007 прикрепил вложение, в котором с помощью КЛИКАНЬЯ по гиперссылке был реализован переход по аналогичным ячейкам разных листов. Однако в примерах уважаемого Jhonson, прикрепленных к сообщениям 7 и 12 такой вариант (нажатие/клик) на ячейку С55 не приводят у меня к переходу на соседние листы. Прошу помочь.
 
Ответить
СообщениеЗдравствуйте! В посте: Дата: Вторник, 29.05.2012, 21:56 | Сообщение № 2 уважаемый Serge_007 прикрепил вложение, в котором с помощью КЛИКАНЬЯ по гиперссылке был реализован переход по аналогичным ячейкам разных листов. Однако в примерах уважаемого Jhonson, прикрепленных к сообщениям 7 и 12 такой вариант (нажатие/клик) на ячейку С55 не приводят у меня к переходу на соседние листы. Прошу помочь.

Автор - alexeiei
Дата добавления - 19.07.2012 в 09:20
Jhonson Дата: Четверг, 19.07.2012, 09:41 | Сообщение № 20
Группа: Друзья
Ранг: Ветеран
Сообщений: 514
Репутация: 169 ±
Замечаний: 0% ±

alexeiei, на соседние листы и не должно переходить! Здесь все от обратного, переходишь на лист выбирается нужная ячейка!
Вы опишите конкретно свою задачу.


"Ничто не приносит людям столько неприятностей, как разум."
 
Ответить
Сообщениеalexeiei, на соседние листы и не должно переходить! Здесь все от обратного, переходишь на лист выбирается нужная ячейка!
Вы опишите конкретно свою задачу.

Автор - Jhonson
Дата добавления - 19.07.2012 в 09:41
  • Страница 1 из 2
  • 1
  • 2
  • »
Поиск:

Яндекс.Метрика Яндекс цитирования
© 2010-2024 · Дизайн: MichaelCH · Хостинг от uCoz · При использовании материалов сайта, ссылка на www.excelworld.ru обязательна!