Ниспадающее меню с отображением данных

Старая форма входа

Страница 1 из 1 1
Модератор форума: китин, _Boroda_

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Ниспадающее меню с отображением данных (Формулы/Formulas)

kastroma

Дата: Среда, 06.06.2018, 12:16 | Сообщение № 1

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

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

Ответить

китин

Дата: Среда, 06.06.2018, 13:04 | Сообщение № 2

Группа: Модераторы

Ранг: Экселист

Сообщений: 7015

Репутация: 1073 ±

Замечаний: 0% ±

Excel 2007;2010;2016

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

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Ответить

kastroma

Дата: Среда, 06.06.2018, 13:33 | Сообщение № 3

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

Цитата китин, 06.06.2018 в 13:04, в сообщении № 2 ()

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

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

К сообщению приложен файл: 1820838.xlsx (12.2 Kb)

Ответить

китин

Дата: Среда, 06.06.2018, 13:37 | Сообщение № 4

Группа: Модераторы

Ранг: Экселист

Сообщений: 7015

Репутация: 1073 ±

Замечаний: 0% ±

Excel 2007;2010;2016

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

Не судите очень строго:я пытаюсь научиться
ЯД 41001877306852

Ответить

kastroma

Дата: Среда, 06.06.2018, 13:39 | Сообщение № 5

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

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

Ответить

китин

Дата: Среда, 06.06.2018, 14:11 | Сообщение № 6

Группа: Модераторы

Ранг: Экселист

Сообщений: 7015

Репутация: 1073 ±

Замечаний: 0% ±

Excel 2007;2010;2016

быстренько на коленке
[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

Ответить

_Boroda_

Дата: Среда, 06.06.2018, 14:15 | Сообщение № 7

Группа: Модераторы

Ранг: Местный житель

Сообщений: 16675

Репутация: 6481 ±

Замечаний: 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

Ответить

kastroma

Дата: Среда, 06.06.2018, 15:13 | Сообщение № 8

Группа: Пользователи

Ранг: Прохожий

Сообщений: 4

Репутация: 0 ±

Замечаний: 0% ±

Excel 2007

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

Ответить

Мир MS Excel » Вопросы и решения » Вопросы по Excel » Ниспадающее меню с отображением данных (Формулы/Formulas)

Страница 1 из 1
1