Здравствуйте.
Я не программист, но есть вопрос. У меня есть макросв excel, его задача взять данные из таблицы в excel и перенести их в шаблон word. Проблема в том, что если данных на одну страницу, то всё нормально, Таблица рисуется в Word по заданным координатам. А вот если данных в excel на две страницы, то в шаблоне word на первой странице таблица с данными рисуется по заданным координатам, а на второй и следующих страницах я задать координаты вывода таблицы с данными не могу.
Как задавать координаты вывода таблицы с данными в шабоне word на второй и прочих страницах?
Файлы макроса приложил

Здравствуйте
Столкнулся с такой проблемой. Написал макрос в экселе, который создаёт документ ворд, и переносит данные из таблицы эксель в документ ворд и при этом рисует таблицу в ворде. И в эту таблицу вставляет данные. Писал макрос в 2003 экселе и заполнение 5 страниц занимало около 15 минут. Когда попробовал этот макрос в 2007, время построения не изменилось. А вот когда попробывал в 2010, то всё сразу затормозило и на эти же 5 страниц надо около 5 часов. (пробывал макрос на новом компе, на котором установлен был только 2010 и другие версии не устанавливались)  После того как я поставил на комп 2007 эксель, то на построение стало тратится снова 15 минут. Причём как в 2007 экселе, так и в 2010.
Скажите в чём может быть причина и как сделать так, чтобы не устанавливая эксели более старые (2003, 2007) макрос работал быстрее в 2010?

Здравствуйте
Возникла проблема. Я копирую таблицу из excel в Word. Так как у меня в Excel большая таблица, то мне надо в Word копировать таблицы по 10 строчек на страницу. Я на первую страницу могу скопировать, но как перейти на вторую и начать там делать не знаю. Мне кажется где-то на форуме я встречал что-то подобное, но никак не могу найти.
Я вначале думал строкой
Но не получилось. Я могу перейти в конец документа, но перейди на вторую не получилось
Подскажите как переходить на вторую страницу в Word?

P.S. (приложил файл моего кода, если кому-то надо глянуть на код, того что я делаю)

Здравствуйте
Вопрос покажется кому-то простым, но накрыл ступор.
Из эксела переношу данные в ворд. Там рисую TextBox
Но вот вопрос. Текст выводится, но мешают "внутренние поля"[img]d:\1111.png[/img] .
Картинка в приложенном файле.

Помогите установить поля в ноль или выровнять текст по рамке.
(какое это свойство)

Здравствуйте.
У меня эта тема возникла из темы "Автофигуры- линия-длинна, Не могу разобраться как задать длину лиинии"
Я научился задавать в см линии, но когда начал печатать рамку для чертёжного листа А4, то возникла проблема.
Приложил файл  пример.

Опишу проблему.
Я установил поля
Но когда нарисовал прямоугольник 297 на 210
он почему-то не вписывается в границы печати, причём если по оси Y область печати больше примерно на 1.1 см, то по оси X область печати
меньше на 2.5 см. Я понимаю что за счёт изменения ширины последнего столбца можно область печати увеличить, но не на много, всё равно
прямоугольник будет больше. Если я область печати возьму по нарисованному прямоугольнику, тогда размеры изменятся и если в экселе это
будет рамка по госту (все размеры совпадут), то вписав в область печати, госты у рамки измениться и она будет меньше, а это уже не подходит.
(я специально взял прямоугольник по формату А4) (принтер по умолчанию doPDF v7 - печать в файл pdf)
Читаю форум, такие темы попадаются. Там пишут про квадраты в основном, а у меня прямоугольник. Поэтому и интересуюсь.
1.  Написано высота строки  = ширина столбца * 1,08 ,  а как перенести это на автофигуры?

Помогите, наведите на путь истинный. Я уже по моему кучу форумов перечитал, но так понимания и нет. Мне надо написать макрос, который строит ЕСКД штамп. Читаю кучу форумов, многие делают через длину  и ширину ячеек, но так как я могу уплотнять или расширять ячейки, то решил делать рамку через автофигуры, чтобы просто накладывать. Но вот как это сделать не пойму..
Я установил поля в 0

With Worksheets(NameActivList).PageSetup
   .LeftMargin = Application.InchesToPoints(0)
   .RightMargin = Application.InchesToPoints(0)
   .TopMargin = Application.InchesToPoints(0)
   .BottomMargin = Application.InchesToPoints(0)
   .HeaderMargin = Application.InchesToPoints(0)
   .FooterMargin = Application.InchesToPoints(0)
End With


потом рисую линии, но вот тут-то и возникает главная ошибка.
Вертикальные линии вроде понятно
Worksheets(NameActivList).Shapes.AddLine(10, Application.CentimetersToPoints(1.5), 10, Application.CentimetersToPoints(5.5)).Name = "stampgorizont1"
Я так понимаю это линия по вертикали будет 4 см и Excel говорит, что 4 см, но вот по оси X я немного не понимаю как считать.
В форумах пишут что всё зависит от разрешения экрана, но как привязать к расчётам я не понимаю Подскажите пожалуйста как рассчитывается X в миллиметрах или сантиметрах. Как увязать с разрешением. Или дайте те форумы где описано, я тогда задам корректирующие вопросы..