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

Вход

Регистрация

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

 

= Мир MS Excel/отображение-сокрытие фигур и расстановка картинок с текстом - Мир MS Excel

Регистрация · Логин: · Пароль: · · Забыли пароль?
  • Страница 1 из 1
  • 1
Модератор форума: _Boroda_, Manyasha, SLAVICK, китин  
Мир MS Excel » Вопросы и решения » Вопросы по VBA » отображение-сокрытие фигур и расстановка картинок с текстом (Макросы/Sub)
отображение-сокрытие фигур и расстановка картинок с текстом
SkyGreen Дата: Четверг, 19.09.2019, 04:04 | Сообщение № 1
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Доброго времени суток.
Помогите решить задачу.

На листе изображено несколько фигур в виде ветвей MindMap.
Рядом стоит таблица.
В таблице указано - если в названиях фигур имеется данный текстовый фрагмент - то они должны быть невидимы или видимы (если невидимы - то в столбцах AB и AF стоит 0, если видимы то 1).
Напротив конечных узлов конкретной ветви - нужно как-то расставить текст, прописав его в ячейки и картинки (чуть повыше этой ячейки)
К сообщению приложен файл: 8838677.rar(80.1 Kb)
 
Ответить
СообщениеДоброго времени суток.
Помогите решить задачу.

На листе изображено несколько фигур в виде ветвей MindMap.
Рядом стоит таблица.
В таблице указано - если в названиях фигур имеется данный текстовый фрагмент - то они должны быть невидимы или видимы (если невидимы - то в столбцах AB и AF стоит 0, если видимы то 1).
Напротив конечных узлов конкретной ветви - нужно как-то расставить текст, прописав его в ячейки и картинки (чуть повыше этой ячейки)

Автор - SkyGreen
Дата добавления - 19.09.2019 в 04:04
SkyGreen Дата: Суббота, 28.09.2019, 06:59 | Сообщение № 2
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Помогите.
 
Ответить
СообщениеПомогите.

Автор - SkyGreen
Дата добавления - 28.09.2019 в 06:59
Pelena Дата: Суббота, 28.09.2019, 11:43 | Сообщение № 3
Группа: Админы
Ранг: Местный житель
Сообщений: 14585
Репутация: 3196 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Не совсем поняла с картинками.
Сделала для первой ветки. Думаю, основная идея понятна
К сообщению приложен файл: 9268576.xlsm(29.8 Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеНе совсем поняла с картинками.
Сделала для первой ветки. Думаю, основная идея понятна

Автор - Pelena
Дата добавления - 28.09.2019 в 11:43
SkyGreen Дата: Суббота, 28.09.2019, 13:49 | Сообщение № 4
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Pelena, поменял содержимое ячейки AC4, но на фигуре "Ветка1-2т" - ничего не изменилось (даже после срабатывания макроса).

Также насчет картинок - после срабатывания макроса - они не отображаются.
Я имею ввиду - сами картинки, а не адреса с ними.
Сейчас отображаются не сами картинки - а адреса.
К сообщению приложен файл: 9268576-.xlsm(29.8 Kb)


Сообщение отредактировал SkyGreen - Суббота, 28.09.2019, 13:51
 
Ответить
СообщениеPelena, поменял содержимое ячейки AC4, но на фигуре "Ветка1-2т" - ничего не изменилось (даже после срабатывания макроса).

Также насчет картинок - после срабатывания макроса - они не отображаются.
Я имею ввиду - сами картинки, а не адреса с ними.
Сейчас отображаются не сами картинки - а адреса.

Автор - SkyGreen
Дата добавления - 28.09.2019 в 13:49
Pelena Дата: Суббота, 28.09.2019, 20:08 | Сообщение № 5
Группа: Админы
Ранг: Местный житель
Сообщений: 14585
Репутация: 3196 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
содержимое ячейки AC4
относится к Ветка1, а не Ветка1-2

Сейчас отображаются не сами картинки - а адреса
Сделайте заливку надписи нужной картинкой


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
Сообщение
содержимое ячейки AC4
относится к Ветка1, а не Ветка1-2

Сейчас отображаются не сами картинки - а адреса
Сделайте заливку надписи нужной картинкой

Автор - Pelena
Дата добавления - 28.09.2019 в 20:08
SkyGreen Дата: Суббота, 28.09.2019, 20:56 | Сообщение № 6
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Pelena, да все верно - это "Ветка1-2"
Сделайте заливку надписи нужной картинкой

Да, можно и так.
А как это макросом сделать ?
К сообщению приложен файл: 9268576-2.xlsm(41.4 Kb)
 
Ответить
СообщениеPelena, да все верно - это "Ветка1-2"
Сделайте заливку надписи нужной картинкой

Да, можно и так.
А как это макросом сделать ?

Автор - SkyGreen
Дата добавления - 28.09.2019 в 20:56
Pelena Дата: Суббота, 28.09.2019, 22:45 | Сообщение № 7
Группа: Админы
Ранг: Местный житель
Сообщений: 14585
Репутация: 3196 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
А зачем макросом? Они будут меняться?
Запишите макрорекодером, будет макрос


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеА зачем макросом? Они будут меняться?
Запишите макрорекодером, будет макрос

Автор - Pelena
Дата добавления - 28.09.2019 в 22:45
SkyGreen Дата: Воскресенье, 29.09.2019, 06:07 | Сообщение № 8
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Запишите макрорекодером, будет макрос


Макрорекордер - формирует заливку для одной конкретной фигуры и для одного конкретного адреса.
[vba]
Код

Sub Макрос1()

    ActiveSheet.Shapes.Range(Array("Ветка1-2р")).Select
    With Selection.ShapeRange.Fill
        .Visible = msoTrue
        .UserPicture _
        "C:\1\1 - копия.jpg"
        .TextureTile = msoFalse
    End With
    Range("U18").Select
    Application.CommandBars("Format Object").Visible = False
End Sub
[/vba]

Но там же десятки ячеек в столбцах AD, AA и AH,AE.
Как под остальные ячейки этот макрос подстроить ?
 
Ответить
Сообщение
Запишите макрорекодером, будет макрос


Макрорекордер - формирует заливку для одной конкретной фигуры и для одного конкретного адреса.
[vba]
Код

Sub Макрос1()

    ActiveSheet.Shapes.Range(Array("Ветка1-2р")).Select
    With Selection.ShapeRange.Fill
        .Visible = msoTrue
        .UserPicture _
        "C:\1\1 - копия.jpg"
        .TextureTile = msoFalse
    End With
    Range("U18").Select
    Application.CommandBars("Format Object").Visible = False
End Sub
[/vba]

Но там же десятки ячеек в столбцах AD, AA и AH,AE.
Как под остальные ячейки этот макрос подстроить ?

Автор - SkyGreen
Дата добавления - 29.09.2019 в 06:07
Pelena Дата: Воскресенье, 29.09.2019, 10:38 | Сообщение № 9
Группа: Админы
Ранг: Местный житель
Сообщений: 14585
Репутация: 3196 ±
Замечаний: ±

Excel 2010, 2016 & Mac Excel
Примерно так
К сообщению приложен файл: 9779559.xlsm(51.6 Kb)


"Черт возьми, Холмс! Но как??!!"
ЯД 41001765434816
 
Ответить
СообщениеПримерно так

Автор - Pelena
Дата добавления - 29.09.2019 в 10:38
SkyGreen Дата: Воскресенье, 29.09.2019, 11:23 | Сообщение № 10
Группа: Пользователи
Ранг: Участник
Сообщений: 55
Репутация: 0 ±
Замечаний: 0% ±

Excel 2016
Pelena, большое спасибо за ответ.
 
Ответить
СообщениеPelena, большое спасибо за ответ.

Автор - SkyGreen
Дата добавления - 29.09.2019 в 11:23
Мир MS Excel » Вопросы и решения » Вопросы по VBA » отображение-сокрытие фигур и расстановка картинок с текстом (Макросы/Sub)
  • Страница 1 из 1
  • 1
Поиск:

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