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

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

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

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

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

Ответ
 
Опции темы Поиск в этой теме
Старый 20.03.2015, 20:45   #1
artut34
Новичок
Джуниор
 
Регистрация: 14.02.2015
Сообщений: 2
По умолчанию редактирование после экспорта из екселя в ворд

Добрый вечер, рылка в инете ничего нужного мне не встретил, есть файл ексель который экспортирует в ворд указанный диапазон, вот только надо чтобы в самом ворде уже текст выводился по центру и на одном листе , он у меня разъежается... как сделать можно, помогите пожалуйста!!!!!!!!!

почему то я не могу загрузить файл
тулс->референсес и поставить галочку в микрософт ворд

Sub Макрос_1()
Dim AppWord As Word.Application 'стандартное приложение Word
Dim i As Long
'Как видим, первый блок не требует объяснения.
Set AppWord = CreateObject("Word.Application") 'создается объект Word'а
AppWord.Visible = True 'активация
AppWord.Documents.Add 'само добавление

Range("B1:AI54").Copy 'данные на Ваше усмотрение
AppWord.Selection.Paste 'выделение, вставка

For i = 6 To 10 'снова же, значения задаете Вы, данный ввод можно автоматизировать
If Cells(i, 18) = True Then ' условие если...
Range(Cells(i, 1), Cells(i, 16)).Copy
AppWord.Selection.Paste 'выделение, вставка
End If 'конец блока else
Next
Application.CutCopyMode = False
Set AppWord = Nothing 'заканчиваем работу с приложением Word
End Sub
artut34 вне форума Ответить с цитированием
Старый 20.03.2015, 21:08   #2
artut34
Новичок
Джуниор
 
Регистрация: 14.02.2015
Сообщений: 2
По умолчанию

я бы загрузил файл но что то не идет((
http://www.excelworld.ru/forum/2-16500-1
в принципе можно тут глянуть
artut34 вне форума Ответить с цитированием
Ответ


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

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
письмо из екселя при заблокированном ПК supergood Microsoft Office Excel 0 06.02.2015 17:25
Методы редактирование страниц после загрузки Fahman Общие вопросы Delphi 8 04.08.2014 17:44
Совместимость Екселя 2003 и 2007 jerko Microsoft Office Excel 8 17.09.2010 13:48
Как запускать макрос не из Екселя? Sunpark Microsoft Office Excel 4 11.05.2010 23:40
Написать в VBA аналог формулы екселя. tae1980 Microsoft Office Excel 8 13.04.2009 00:08