hmanhha Ответов: 1

Как сохранить рабочую книгу в excell VBA

Всем привет.
Я пытаюсь создать новую книгу и сохранить ее в файл (имя файла зависит от переменной)




Но все равно ошибка "
Ошибка времени выполнения 1004
Ошибка определения приложения или объекта.

Пожалуйста, помогите мне.

Что я уже пробовал:

Я должен попробовать:
 Set fRwB = Workbooks.Add
fRwB.Sheets.Add().Name = "Company Name"
  sFile = outPath & "\" & Format(sdate, "yymm") & ".xlsx"
  fRwB.Save Filename:=sFile, FileFormat:=51
  myFile = Dir

Patrice T

vba также сообщит вам строку ошибки

1 Ответов

Рейтинг:
0

Maciej Los

Проверить это:

Dim wbk As Workbook
Dim wsh As Worksheet
Dim sFile As String

sFile = outPath & "\" & Format(sdate, "yymm") & ".xlsx"
Set wbk = Application.Workbooks.Add
Set wsh = wbk.Worksheets(1)
wsh.Name = "Company Name"
wbk.SaveAs sFile

Set wsh= Nothing
Set wbk = Nothing


Для получения более подробной информации, пожалуйста, смотрите: Рабочая тетрадь.Метод SaveAs (Excel)[^]