Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Microsoft Office и VBA программирование > Microsoft Office Excel
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 18.03.2009, 07:52   #1
tae1980
Форумчанин
 
Регистрация: 02.02.2009
Сообщений: 842
По умолчанию Копирование форм

Описание: есть шаблон оформления таблицы, в котором присутствует форма "Список" (выпадающее меню). Данные для списка берутся из переменной, результат выбора выводить в соседнюю ячейку (в шаблоне это V7). Шаблон размещен на отдельном листе откуда копируется в другие листы.
Задача: При копировании шаблона, копировать так же и форму "список" с изменением ячейки ссылки в зависимости от места вставки.

На данные момент те способы которые я использую в VBA не копируют форму, вручную через буфер обмена форма копируется, но ссылка на ячейку выбора не изменяется.

Вопрос: реально ли решить задачу с изменением ячейки ссылки в форме? Саму форму видно скопировать можно, нужно только подобрать нужные параметры.
С уважением, Алексей.
tae1980 вне форума Ответить с цитированием
Старый 18.03.2009, 08:28   #2
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
Вопрос: реально ли решить задачу с изменением ячейки ссылки в форме?
НЕРЕАЛЬНО.
По крайней мере, до тех пор, пока Вы не прикрепите к сообщению файл.

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

Вопроса не понял (честно говоря, особо не разбирался)
Будет файл - сделаем (независимо от того, возможно это или невозможно)
EducatedFool вне форума Ответить с цитированием
Старый 18.03.2009, 13:03   #3
tae1980
Форумчанин
 
Регистрация: 02.02.2009
Сообщений: 842
По умолчанию

Цитата:
Сообщение от EducatedFool Посмотреть сообщение
НЕРЕАЛЬНО.
По крайней мере, до тех пор, пока Вы не прикрепите к сообщению файл.

Вы же не первый день на форуме - должны уже понимать, что никто не будет воссоздавать структуру Вашего файла, предусматривать все возможные варианты хранения и обработки данных, лишь для того, чтобы ответить на простенький вопрос...
Ну все это лишнее... думаю было бы достаточно просто пнуть в нужном направлении. Обычно помогало...
Цитата:
Сообщение от EducatedFool Посмотреть сообщение
НЕРЕАЛЬНО.
Вопроса не понял (честно говоря, особо не разбирался)
Будет файл - сделаем (независимо от того, возможно это или невозможно)
Файл идет.
Вложения
Тип файла: rar Книга1.rar (6.1 Кб, 14 просмотров)
С уважением, Алексей.

Последний раз редактировалось tae1980; 18.03.2009 в 13:05.
tae1980 вне форума Ответить с цитированием
Старый 18.03.2009, 13:26   #4
EducatedFool
Программист VBA
СуперМодератор
 
Аватар для EducatedFool
 
Регистрация: 13.07.2008
Сообщений: 6,856
По умолчанию

Цитата:
есть шаблон оформления таблицы, в котором присутствует форма "Список" (выпадающее меню)
Не нашёл формы СПИСОК...

Цитата:
те способы которые я использую в VBA не копируют форму
какие способы Вы используете?
Не нашел в файле ни строчки кода...

Вам надо скопировать лист вместе с комбобоксом (который в ячейке E7)?
EducatedFool вне форума Ответить с цитированием
Старый 18.03.2009, 14:51   #5
tae1980
Форумчанин
 
Регистрация: 02.02.2009
Сообщений: 842
По умолчанию

Цитата:
Сообщение от EducatedFool Посмотреть сообщение
Не нашёл формы СПИСОК...
какие способы Вы используете?
Не нашел в файле ни строчки кода...
Вам надо скопировать лист вместе с комбобоксом (который в ячейке E7)?
На листе "Шаблон", находиться таблица, которая используется как шаблон. В ней в нижнем левом углу имеется выпадающий список, позволяющий выбрать название участка. В ексле элемент которые позволяет это сделать называется "форма", а тип элемента список. Поэтому я так и назвал.
В данном случае нужно скопировать этот шаблон на лист "Лист 3".

У меня копируется кодом:
Код:
    'Берем шаблон в буфер обмена.
    Шаблоны.Range("Участки.шаблон").Copy
    'Копируем содержание шаблона для нового участка.
    Участки.Cells(0 + 1, Смещение_уч + 1).PasteSpecial
    'Копируем размер столцов шаблона.
    Участки.Cells(0 + 1, Смещение_уч + 1).PasteSpecial Paste:=xlPasteColumnWidths
Я попробовал адаптировать свою процедуру к примеру.
Вложения
Тип файла: rar Книга1.rar (9.3 Кб, 20 просмотров)
С уважением, Алексей.
tae1980 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Копирование форм. vlad73ko Microsoft Office Excel 2 13.03.2009 15:27
Заполнение форм StasSv Microsoft Office Excel 1 16.10.2008 15:22
Обработка форм igoist Помощь студентам 2 21.03.2008 22:23
Анимация форм Volkogriz Общие вопросы Delphi 5 20.11.2007 00:32
Общение форм Rapid Общие вопросы Delphi 9 17.11.2007 17:56