Распечатывание формы в которую вставляются данные из файла

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

Распечатывание формы в которую вставляются данные из файла (Иное)

NoProfi

Дата: Суббота, 02.11.2013, 10:50 | Сообщение № 1

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

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

Сообщений: 2

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

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

Excel 2007

Приветствую всех. Имеется 2 файла Excel.
Первый это Данные (DB-02112013.xlsx), второй это Форма (FORMA.xlsx).
Нужно чтобы в форму вставлялись данные, распечатывались, вставлялись следующие данные, распечатывались, и так пока есть данные.
Примеры этих файлов прилагаю.

К сообщению приложен файл: 1596007.xlsx (14.4 Kb) · 3411754.xlsx (13.1 Kb)

Ответить

AndreTM

Дата: Суббота, 02.11.2013, 16:22 | Сообщение № 2

Группа: Друзья

Ранг: Старожил

Сообщений: 1762

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

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

2003 & 2010

Может, Вам проще сделать ФОРМУ в Word? Особенно, если Вы почитаете хоть что-нибудь про "Слияние".

Skype: andre.tm.007
Donate: Qiwi: 9517375010

Ответить

gling

Дата: Суббота, 02.11.2013, 20:42 | Сообщение № 3

Группа: Друзья

Ранг: Участник клуба

Сообщений: 2643

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

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

2010

NoProfi,
А почему имено два файла? После создания листов выделить их ручками и отправить на печать. Они распечатаются пачкой, далее все выделенные листы можно удалить. Можно конечно прописать это макросом, но я не знаю как выделить листы начиная с третьего (вновь созданного) и до последнего.

К сообщению приложен файл: 9444373.xlsm (20.0 Kb)

ЯД-41001506838083

Ответить

Hugo

Дата: Суббота, 02.11.2013, 20:56 | Сообщение № 4

Группа: Друзья

Ранг: Участник клуба

Сообщений: 3856

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

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

365

Там где подсказкой не воспользовался, отписался что сделал так, как тут подсказали

А тут молчок...
Я там предложил
[vba]

Код

Sub forCyber()
     Dim i&
     For i = 1 To 2
         [c3] = i
         ActiveSheet.PrintOut Copies:=1    ' печатаем
     Next
End Sub

[/vba]
Ну а в форме 3 раза ВПР() по ячейке [c3]

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD

Ответить

NoProfi

Дата: Суббота, 02.11.2013, 21:18 | Сообщение № 5

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

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

Сообщений: 2

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

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

Excel 2007

Цитата Hugo, 02.11.2013 в 20:56, в сообщении № 4

Там где подсказкой не воспользовался, отписался что сделал так, как тут подсказали

Спасибо всем кто отписался, вариант со слиянием как раз для меня, так как много данных и огромная форма.

Ответить

Hugo

Дата: Суббота, 02.11.2013, 23:18 | Сообщение № 6

Группа: Друзья

Ранг: Участник клуба

Сообщений: 3856

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

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

365

Ну прописать один раз пусть и много ВПР() тоже ведь можно? А потом только подставлять в цикле номера строк и печатать - можно кодом, можно вручную только именно нужные формы.

webmoney: E265281470651 Z422237915069
USDT TRC20: TN8XeEF17o5KPBD9pNwYzNyruycuAc2mVD

Ответить

Распечатывание формы в которую вставляются данные из файла (Иное)

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