VBS для сохранения со ссылкой на ячейку и меткой времени

У меня есть скрипт vb, который выполняет макрос excel и сохраняет файл, добавляя имя с определенным значением ячейки и временной меткой. Но это не работает, и я полностью потерял причину.

Если я вынимаю ссылки на ячейки и метки времени, они выполняются и сохраняются правильно. Любая помощь или материал, которые я могу рассмотреть, будут очень признательны. Заранее спасибо.

Option Explicit On Error Resume Next ExcelMacroExample Sub ExcelMacroExample() Dim objApp Dim objExcel Dim objWorkbook Dim objSheet Set objExcel = CreateObject("Excel.Application") Set objWorkbook = objExcel.Workbooks.Open("C:\Users\midi\Desktop\EN\SCORES.xlsm") Set objSheet = objWorkbook.Worksheets("Cover Tab") Set SiteIdentifier = objSheet.Cells("B4").Value objExcel.Run "RefreshConns" WScript.Sleep 30000 objExcel.ActiveWorkbook.SaveAs "C:\Users\midi\Desktop\EN\SCORES_" & SiteIdentifier & "_"& Format(Now(), "yyyymmdd_hhnnss") & ".xlsm", 52 objExcel.ActiveWorkbook.Close objExcel.Quit End Sub 

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

 Option Explicit ExcelMacroExample Sub ExcelMacroExample() Dim objApp Dim objExcel Dim objWorkbook Dim objSheet Dim SiteIdentifier Set objExcel = CreateObject("Excel.Application") Set objWorkbook = objExcel.Workbooks.Open("C:\Users\midi\Desktop\EN\SCORES.xlsm") Set objSheet = objWorkbook.Worksheets("Cover Tab") SiteIdentifier = objSheet.Cells(4, 2).Value objExcel.Run "RefreshConns" WScript.Sleep 60000 objExcel.ActiveWorkbook.SaveAs "C:\Users\midi\Desktop\EN\SCORES_" & SiteIdentifier & "_" & Year(Now()) & Month(Now()) & Day(Now()) & "_" & Hour(Now()) & Minute(Now()) & Second(Now())&".xlsm", 52 objExcel.ActiveWorkbook.Close objExcel.Quit End Sub 
  • VBScript - Запуск макроса в скрипте для Excel
  • Запуск макроса Excel из внешнего Excel с помощью VBScript из командной строки
  • Сравнить два листа excel в партии
  • Извлечение числовых чисел из буквенно-цифровых символов с помощью скрипта vb
  • Мой .xls-документ открывается в яблочных номерах со всеми данными в одном столбце
  • Функция ожидания в приложении HTML VBscript
  • Код VBS, не работающий в HTA (объявление WScript)
  • Сравните значения таблиц Excel с каждой строкой текстового файла и возвращаемым результатом на основе результата
  • Веб-сайт доступа VBScript, логин, затем скопируйте определенный результат в файл excel
  • Удалить EntireRow с определенным значением ячейки
  • Сделать каталог в VBscript относительно книги, в которой выполняется макрос
  • Interesting Posts

    Есть ли способ импортировать файл Excel (версия 2.1) в SQL 2005 с использованием SSIS?

    Получить ближайшую дату по нескольким критериям

    Excel – Сравнение значений из 2 столбцов, двух других столбцов

    Как читать выбранную колонку Excel

    Правило True условного форматирования с изменением значений и нескольких ячеек

    Подсчет уникальности в колунме, который имеет пробелы и нули из предыдущих рабочих листов?

    Выбор столбца Excel

    Экспорт в Excel с использованием OpenXML и C #, целых чисел и даты

    Преобразование отметки времени UNIX в метку времени IST

    Двусторонняя связь между преимуществом и доступом

    Переименование и сохранение файлов Excel с помощью Python

    Вычитание часов и минут с момента ввода в Excel 2013

    Ошибка времени выполнения 91: переменная объекта или с не заданной переменной блока

    VBA ADODB multirow insert не работает

    Макрос для удаления дубликатов из будущего события

    Давайте будем гением компьютера.