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

Вход

Регистрация

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

 

= Мир MS Excel/Ниспадающее меню с отображением данных - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Pelena, Manyasha, SLAVICK  
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Ниспадающее меню с отображением данных (Формулы/Formulas)
Ниспадающее меню с отображением данных
kastroma Дата: Среда, 06.06.2018, 12:16 | Сообщение № 1
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Добрый день!
Мне нужна помощь в таком вопросе:
1) У меня есть фаил Exel, в данном файле есть несколько листов, в каждом листе отображены регионы принадлежащие к континентам, (например лист1 это африка и там отображены регионы только африки). Мне надо на первом листе сделать ниспадающее меню в котором будут перечислены континенты (листы) и при выборе какого то значения (листа) отображаются данные выбранного листа! Расписал как смог, заранее спасибо!!
К моему сожалению не могу выложить данный файл в сеть
 
Ответить
СообщениеДобрый день!
Мне нужна помощь в таком вопросе:
1) У меня есть фаил Exel, в данном файле есть несколько листов, в каждом листе отображены регионы принадлежащие к континентам, (например лист1 это африка и там отображены регионы только африки). Мне надо на первом листе сделать ниспадающее меню в котором будут перечислены континенты (листы) и при выборе какого то значения (листа) отображаются данные выбранного листа! Расписал как смог, заранее спасибо!!
К моему сожалению не могу выложить данный файл в сеть

Автор - kastroma
Дата добавления - 06.06.2018 в 12:16
китин Дата: Среда, 06.06.2018, 13:04 | Сообщение № 2
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4885
Репутация: 780 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
без файла просто открываем и читаем
тут много всего


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщениебез файла просто открываем и читаем
тут много всего

Автор - китин
Дата добавления - 06.06.2018 в 13:04
kastroma Дата: Среда, 06.06.2018, 13:33 | Сообщение № 3
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
без файла просто открываем и читаем
тут много всего

Вот пример файла который мне надо сделать из того что перечислено по ссылке очень долго искать, а мне после того как разберусь еще долго форматировать
Очень прошу помощи!
К сообщению приложен файл: 1820838.xlsx(12.2 Kb)
 
Ответить
Сообщение
без файла просто открываем и читаем
тут много всего

Вот пример файла который мне надо сделать из того что перечислено по ссылке очень долго искать, а мне после того как разберусь еще долго форматировать
Очень прошу помощи!

Автор - kastroma
Дата добавления - 06.06.2018 в 13:33
китин Дата: Среда, 06.06.2018, 13:37 | Сообщение № 4
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4885
Репутация: 780 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
надо всю таблицу переносить с листов 2 и 3 ?


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщениенадо всю таблицу переносить с листов 2 и 3 ?

Автор - китин
Дата добавления - 06.06.2018 в 13:37
kastroma Дата: Среда, 06.06.2018, 13:39 | Сообщение № 5
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Да всю таблицу надо перести, хотя бы сделать так чтобы при выборе с контекстного меню значения перебрасывало на тот лист который выбран
 
Ответить
СообщениеДа всю таблицу надо перести, хотя бы сделать так чтобы при выборе с контекстного меню значения перебрасывало на тот лист который выбран

Автор - kastroma
Дата добавления - 06.06.2018 в 13:39
китин Дата: Среда, 06.06.2018, 14:11 | Сообщение № 6
Группа: Друзья
Ранг: Участник клуба
Сообщений: 4885
Репутация: 780 ±
Замечаний: 0% ±

Excel 2007;Excel 2010
быстренько на коленке
[vba]
Код
Sub pren()
Dim tt&, dd&, tt1&, dd1&
tt1 = Sheets("Лист1").Cells(Rows.Count, 1).End(xlUp).Row
dd1 = Sheets("Лист1").Cells(4, Columns.Count).End(xlToLeft).Column
    Sheets("Лист1").Range("A4").Resize(tt1, dd1).Clear
    Nams = Range("A1").Value
tt = Sheets(Nams).Cells(Rows.Count, 1).End(xlUp).Row
dd = Sheets(Nams).Cells(1, Columns.Count).End(xlToLeft).Column
     Sheets(Nams).Range("A1").Resize(tt, dd).Copy
     Sheets("Лист1").Range("A4").PasteSpecial
End Sub
[/vba]
выбрать лист и нажать кнопку
К сообщению приложен файл: kastroma.xlsm(22.1 Kb)


Не судите строго:я пытаюсь научиться
ЯД 41001877306852/WM R249698041931; Z239672726538
 
Ответить
Сообщениебыстренько на коленке
[vba]
Код
Sub pren()
Dim tt&, dd&, tt1&, dd1&
tt1 = Sheets("Лист1").Cells(Rows.Count, 1).End(xlUp).Row
dd1 = Sheets("Лист1").Cells(4, Columns.Count).End(xlToLeft).Column
    Sheets("Лист1").Range("A4").Resize(tt1, dd1).Clear
    Nams = Range("A1").Value
tt = Sheets(Nams).Cells(Rows.Count, 1).End(xlUp).Row
dd = Sheets(Nams).Cells(1, Columns.Count).End(xlToLeft).Column
     Sheets(Nams).Range("A1").Resize(tt, dd).Copy
     Sheets("Лист1").Range("A4").PasteSpecial
End Sub
[/vba]
выбрать лист и нажать кнопку

Автор - китин
Дата добавления - 06.06.2018 в 14:11
_Boroda_ Дата: Среда, 06.06.2018, 14:15 | Сообщение № 7
Группа: Модераторы
Ранг: Местный житель
Сообщений: 12353
Репутация: 5079 ±
Замечаний: 0% ±

2003; 2007; 2010; 2013 RUS
Так нужно?
Код
=ЕСЛИ(ДВССЫЛ("'"&$A$2&"'!R[-2]C";0)="";"";ДВССЫЛ("'"&$A$2&"'!R[-2]C";0))
К сообщению приложен файл: 1820838_1.xlsx(14.1 Kb)


Скажи мне, кудесник, любимец ба’гов...
Платная помощь:
Boroda_Excel@mail.ru
Яндекс-деньги: 41001632713405 | Webmoney: R289877159277; Z102172301748; E177867141995
 
Ответить
СообщениеТак нужно?
Код
=ЕСЛИ(ДВССЫЛ("'"&$A$2&"'!R[-2]C";0)="";"";ДВССЫЛ("'"&$A$2&"'!R[-2]C";0))

Автор - _Boroda_
Дата добавления - 06.06.2018 в 14:15
kastroma Дата: Среда, 06.06.2018, 15:13 | Сообщение № 8
Группа: Пользователи
Ранг: Прохожий
Сообщений: 4
Репутация: 0 ±
Замечаний: 0% ±

Excel 2007
Спасибо! оба варианта хороши, первый подходит больше!
китин, написал вам ЛС
 
Ответить
СообщениеСпасибо! оба варианта хороши, первый подходит больше!
китин, написал вам ЛС

Автор - kastroma
Дата добавления - 06.06.2018 в 15:13
Мир MS Excel » Вопросы и решения » Вопросы по Excel » Ниспадающее меню с отображением данных (Формулы/Formulas)
  • Страница 1 из 1
  • 1
Поиск:

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