Почему VBA выдает объектную ошибку при вставке в другую книгу и сохранении - PullRequest
1 голос
/ 04 июня 2019

По какой-то безбожной причине, когда я хочу сохранить как, я получаю "Метод 'Сохранить как' объекта '_Workbook".Я знаю, что к множеству точек зрения при переполнении стека это подходило, но я просто не мог понять.

Мой код очень прост.Просто скопируйте (вручную) выбранный код в книгу макросов и откройте шаблон без данных с моего диска.Затем я вставляю в диапазон «A2».Я хотел бы сохранить как, но под другим именем, с сегодняшней датой.

Пожалуйста, сообщите, я потерял почти все надежды.

Ошибка связана с методом saveas.

Sub AutoEmail()

    Call trimFunction

    Dim sSaveFileName As String
    sSaveFileName = Format(Now(), "MM/DD/YYYY")

    Selection.Copy

    With Selection.Interior
             .Pattern = xlSolid
             .PatternColorIndex = xlAutomatic
             .Color = 10092543
             .TintAndShade = 0
             .PatternTintAndShade = 0
    End With

    Workbooks.Open Filename:="U:\FuturesClearing\Wires\Futures Wires Email _ 
        Templates\Brokerage to Futures TDA.xlsx"

    Worksheets("Sheet1").Range("A2").PasteSpecial Paste:=xlPasteValues

    ActiveWorkbook.SaveAs Filename:="U:\FuturesClearing\Wires\Futures Wires _ 
    Email Templates\Brokerage to Futures TDA " & sSaveFileName & ".xlsx"
End Sub
...