Поиск  Пользователи  Правила  Войти
Форумы "Планета Excel" » Пользователи » tgg
Выбрать дату в календаре…Выбрать дату в календаре

Страницы: 1
Внести изменения в объект Excel, внедренный в шаблон Word
 
#
07.09.2015 11:46:42
Спасибо!
Что доктор прописал!
 
Перейти    
Внести изменения в объект Excel, внедренный в шаблон Word
 
#
04.09.2015 17:11:05
Спасибо.
Это часть кода по созданию файла word.
Где мне применить Ваш код??
Код
Dim wd As Object, wdFormatDocument As Variant 
   Set wd = CreateObject("Word.Application")  
        wd.Visible = False 
    wd.documents.Open Filename:=Application.ThisWorkbook.Path & "\ИмяШаблона.dotx"             
        Sheets("Данные").Range("I29").Copy
        wd.ActiveDocument.Bookmarks.Item("A1").Range.Paste
        wd.ActiveDocument.Bookmarks.Item("A6").Range.Paste
        .....
        .....
        wd.ActiveDocument.Bookmarks.Item("A100").Range = Период 
        wd.ActiveDocument.Bookmarks.Item("A102").Range = ДатаПлюс 
      wd.Visible = True 
      wd.ActiveDocument.SaveAs Filename:=Application.ThisWorkbook.Path & "\ИмяФайла.docx", FileFormat:=wdFormatDocument          
      Application.StatusBar = "Всё готово!"
 
Перейти    
Внести изменения в объект Excel, внедренный в шаблон Word
 
#
04.09.2015 15:10:36
Доброго времени суток!  Уважаемые ГУРУ, возможно ли ..??  
Макрос excel создает документ word из шаблона (решённый вопрос). Шаблон в свою очередь имеет вставленный объект excel. Вопрос, возможно ли макросом excel внести изменения в документе word т.е. в объекте excel, а именно внести данные в определенные ячейки объекта excel.
Спасибо!
 
Перейти    
Ошибка runtime error 9 subscript out of range при работе с другой книгой
 
#
19.06.2015 22:25:23
Так они ведь не работают как надо!
 
Перейти    
Ошибка runtime error 9 subscript out of range при работе с другой книгой
 
#
19.06.2015 22:15:26
Пробовались разные варианты, это первый вариант макроса, с указанием листа и принадлежности к книге. Но результат всегда был один и тот же.
 
Перейти    
Ошибка runtime error 9 subscript out of range при работе с другой книгой
 
#
19.06.2015 22:03:22
Доброго времени суток! Не прошло и полгода …. Я к Вам с поклоном и вопросом.
Макрос в модуле листа из этой темы (http://www.planetaexcel.ru/forum/?FID=8&PAGE_NAME=read&TID=30902), с той лишь разностью, что работает с диапазоном - If Not Intersect(ActiveCell, Range("E18:E27")) Is Nothing Then. Вот собственно сам макрос:
Код
Option Explicit 

Private Sub Worksheet_SelectionChange(ByVal Target As Range) 
    If Not Intersect(ActiveCell, Range("E18:E27")) Is Nothing Then 
        Call Module1.Spravka 
    End If 
End Sub

Но старая песня, опять при открытии другой книги excel этот макрос зачем-то срабатывает и встаёт на 2 строке.
Подскажите пожалуйста, как его поправить!?!
Спасибо!
 
Перейти    
Ошибка runtime error 9 subscript out of range при работе с другой книгой
 
#
27.03.2015 22:07:42
Еще раз огромное спасибо!!
 
Перейти    
Ошибка runtime error 9 subscript out of range при работе с другой книгой
 
#
27.03.2015 21:24:13
Вот в чём вопрос??
Пол часа полёт нормальный!
Спасибо огромное, все работает.
Но мучает вопрос, в чем косяк случился?
Изменено: tgg - 31.03.2015 22:50:35
 
Перейти    
Ошибка runtime error 9 subscript out of range при работе с другой книгой
 
#
27.03.2015 20:31:46
На строке With Worksheets("Лист1") всё и происходит!
Что надо изменить в коде (?) для работы одновременно в разных Книгах EXCEL
Код
Sub ShowWatch()     
ThisWorkbook.Sheets(1).Range("F1").Value = Now - Date     
Application.OnTime Now + TimeSerial(0, 0, 60), "ShowWatch"     
Application.OnTime Now + TimeSerial(0, 0, 60), "Proverka" 
End Sub 

Private Sub "Proverka"() 
With Worksheets("Лист1")             
If [I2] = "a" Then                 
Exit Sub             
 End If             
If [J2] <> "Ok" Then                 
Exit Sub             
 End If 
OtpravkaPisma     
[I2] = "a"     
[G2] = [D139]     
[G2].Value = [G2].Value         
End With End Sub
Изменено: tgg - 31.03.2015 22:50:24
 
Перейти    
Ошибка runtime error 9 subscript out of range при работе с другой книгой
 
#
27.03.2015 19:41:58
Добрый вечер знатоки. Простой макрос стал прерываться ошибка runtime error 9 subscript out of range, долго искал причину.. а оказалось дело в следующем. При открытии другой Книги, или работая в другой книге в момент когда запускаются макросы (2 шт.каждые 60сек) в Книге1 и вылетает error
Изменено: tgg - 16.03.2018 10:48:28
 
Перейти    
Выборка по дате и сравнение двух файлов
 
#
15.05.2014 21:52:51
Пишите ЛС
 
Перейти    
Отчет для отдела продаж (план/расчет/диаграммы), Готовый отчет есть, необходимы доработки
 
#
30.04.2014 09:26:33
Где можно глянуть файл?
 
Перейти    
Страницы: 1
Наверх