VBA Сохранить как сохранение в папке документов - PullRequest
0 голосов
/ 27 февраля 2020

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

Option Explicit

Sub criarplanilha()
    Dim wb As Workbook
    Application.SheetsInNewWorkbook = 3
    Set wb = Workbooks.Add
    With wb

        .Sheets(1).Name = "Pedidos planejados e estoque"
        .Sheets(2).Name = "Faturado"
        .Sheets(3).Name = "Frontera"

        .Application.DisplayAlerts = False
        .SaveAs Filename:="C:\Users\jmoreira1\Desktop\TestTest"
        .Application.DisplayAlerts = True
        .Close
    End With

End Sub

И все работает нормально. Но мой вопрос, почему, когда я меняю строку

.SaveAs Имя файла: = "C: \ Users \ jmoreira1 \ Desktop \ TestTest"

на

.SaveAs Имя файла: = "TestTest", Local: = "C: \ Users \ jmoreira1 \ Desktop"

Сохранение нового файла рабочей книги в папке документа (C: \ Users \ jmoreira1 \ Documents) вместо этого на рабочем столе.
На мой взгляд, обе строки должны выполнять одну и ту же работу.

...