Имя пользователя:
Пароль:
 

Название темы: макрос excel
Показать сообщение отдельно

Аватара для Maza11

Старожил


Сообщения: 284
Благодарности: 2

Профиль | Отправить PM | Цитировать


нужно в документе менять дату
делаю так
Код: Выделить весь код
Sub WorkingWithWorkbook(objExcel, objFile)
	WScript.Echo objFile.Path
	
	With objExcel
		With .Workbooks.Open(objFile.Path)
			With .Worksheets(1).Range("A4:I4")
				.Replace:="02.07.2015", Replacement:="09.07.2015"							
			End With
			
			.Save
			.Close
		End With
	End With
End Sub
ругается 800A0400 по адресу перед .Replace, какого там оператора не хватает ???

Подскажите пожалуйста

Отправлено: 17:32, 20-07-2015 | #20

Название темы: макрос excel