Автоматическая замена исходного значения по названию вкладки
Окся
Дата: Вторник, 04.09.2018, 12:07 |
Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 71
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
Добрый день ! Подскажите пожалуйста возможно ли вообще переместить все данные ( с формулами ) на другой лист , так чтобы искомое по которому всё бы просчитывалось ( копировалось , вставлялось ) с названия соответствующей вкладки ? пример во вложении , весь пример не прикрепить очень тяжёлый. Заранее благодарна!
Добрый день ! Подскажите пожалуйста возможно ли вообще переместить все данные ( с формулами ) на другой лист , так чтобы искомое по которому всё бы просчитывалось ( копировалось , вставлялось ) с названия соответствующей вкладки ? пример во вложении , весь пример не прикрепить очень тяжёлый. Заранее благодарна! Окся
(*_*)
Сообщение отредактировал Окся - Вторник, 04.09.2018, 12:16
Ответить
Сообщение Добрый день ! Подскажите пожалуйста возможно ли вообще переместить все данные ( с формулами ) на другой лист , так чтобы искомое по которому всё бы просчитывалось ( копировалось , вставлялось ) с названия соответствующей вкладки ? пример во вложении , весь пример не прикрепить очень тяжёлый. Заранее благодарна! Автор - Окся Дата добавления - 04.09.2018 в 12:07
StoTisteg
Дата: Вторник, 04.09.2018, 13:12 |
Сообщение № 2
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Окся , простите, но по Вашему примеру можно только посоветовать [vba]Код
Private Sub Workbook_SheetActivate(ByVal Sh As Object) Sh.Cells(1, 1).Value = Sh.Name End Sub
[/vba]в модуль книги. И что-то мне подсказывает, что это не совсем то, что вам нужно...
Окся , простите, но по Вашему примеру можно только посоветовать [vba]Код
Private Sub Workbook_SheetActivate(ByVal Sh As Object) Sh.Cells(1, 1).Value = Sh.Name End Sub
[/vba]в модуль книги. И что-то мне подсказывает, что это не совсем то, что вам нужно...StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Сообщение отредактировал StoTisteg - Вторник, 04.09.2018, 13:16
Ответить
Сообщение Окся , простите, но по Вашему примеру можно только посоветовать [vba]Код
Private Sub Workbook_SheetActivate(ByVal Sh As Object) Sh.Cells(1, 1).Value = Sh.Name End Sub
[/vba]в модуль книги. И что-то мне подсказывает, что это не совсем то, что вам нужно...Автор - StoTisteg Дата добавления - 04.09.2018 в 13:12
_Boroda_
Дата: Вторник, 04.09.2018, 13:25 |
Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 16888
Репутация:
6611
±
Замечаний:
±
2003; 2007; 2010; 2013 RUS
по Вашему примеру можно только посоветовать
Ну почему же? Не только, еще и вот так можноКод
=ПСТР(ЯЧЕЙКА("filename";A1);ПОИСК("]";ЯЧЕЙКА("filename";A1))+1;33)
по Вашему примеру можно только посоветовать
Ну почему же? Не только, еще и вот так можноКод
=ПСТР(ЯЧЕЙКА("filename";A1);ПОИСК("]";ЯЧЕЙКА("filename";A1))+1;33)
_Boroda_
Скажи мне, кудесник, любимец ба’гов... Платная помощь: Boroda_Excel@mail.ru Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
Ответить
Сообщение по Вашему примеру можно только посоветовать
Ну почему же? Не только, еще и вот так можноКод
=ПСТР(ЯЧЕЙКА("filename";A1);ПОИСК("]";ЯЧЕЙКА("filename";A1))+1;33)
Автор - _Boroda_ Дата добавления - 04.09.2018 в 13:25
Окся
Дата: Вторник, 04.09.2018, 13:52 |
Сообщение № 4
Группа: Пользователи
Ранг: Участник
Сообщений: 71
Репутация:
0
±
Замечаний:
0% ±
Excel 2016
StoTisteg , _Boroda_ , Спасибо Вам ОГРОМНЕЙШЕЕ , Вы даже не представляете как упростится моя задача ! Благодарю)
StoTisteg , _Boroda_ , Спасибо Вам ОГРОМНЕЙШЕЕ , Вы даже не представляете как упростится моя задача ! Благодарю) Окся
(*_*)
Ответить
Сообщение StoTisteg , _Boroda_ , Спасибо Вам ОГРОМНЕЙШЕЕ , Вы даже не представляете как упростится моя задача ! Благодарю) Автор - Окся Дата добавления - 04.09.2018 в 13:52
StoTisteg
Дата: Вторник, 04.09.2018, 14:01 |
Сообщение № 5
Группа: Авторы
Ранг: Старожил
Сообщений: 1161
Репутация:
103
±
Замечаний:
0% ±
Excel 2010
Окся , не за что. Ибо я, например, вижу в своём решении множество подводных камней...
Окся , не за что. Ибо я, например, вижу в своём решении множество подводных камней...StoTisteg
Интуитивно понятный код - это когда интуитивно понятно, что это код.
Ответить
Сообщение Окся , не за что. Ибо я, например, вижу в своём решении множество подводных камней...Автор - StoTisteg Дата добавления - 04.09.2018 в 14:01