Tarih içeren Çalışma Zamanı 1004 hatası

Bu Dosya Adı makrosunun çalışmasını sağlamak ve hata almaya devam etmek için çalışıyorum, makro aşağıdaki gibidir ...

Sub Sheet_SaveAs()

    Dim wb As Workbook

    Sheets("Sheet1").Copy

    Set wb = ActiveWorkbook

    With wb
        .SaveAs Filename:=Sheets("Sheet1").Range("A1").Value & " " & Sheets("Sheet1").Range("A4").Value & " " & Sheets("Sheet1").Range("A6").Value & " " & Sheets("Sheet1").Range("A8").Value & " " & Format(Date, "mm-dd-yy")
        .Close False
    End With

End Sub

Son hata iletisi, Microsoft'un 'C: Users \ Master User \ Documents \ Özellik Muayene Raporu Regency 808N 07 \ 06 \ 791B8200' dosyasına erişemediğini belirten bir çalışma zamanı hatasıydı.

Bu hata ile herhangi bir yardım çok takdir edilecektir ....

microsoft-excel

— John
kaynak

Yardım etmek için daha fazla bilgiye ihtiyacınız var. C: \ ... \ 07 \ 06 \ geçerli bir yoldur. Bir dos penceresi açıp bununla bir dir komutu yapabilir misiniz? Verileri dosya adı olarak kullanmak, 07 \ 06 klasör değilse, soruna neden olabilir. \ - -

— bvaughn

C: Users \ Master User \ Documents, geri kalanın elektronik sayfadaki belirli konumlara göre üretilmesi beklenen geçerli bir durumdur. Birden fazla test çalıştırdım (imleç çalıştır), program biçimlendirilinceye kadar çalışıyor (tarih, "mm-gg-yy") sonra çalışma zamanı hatası alıyorum.

— John

- support.microsoft.com/en-us/kb/210684 adresindeki kod alakalı mı? Bunu TS yapmanın 2 yolu vardır. Genelde DOS'ta her şeyi yaparım (path \ folder \ file'ın çalıştığından emin olun). Sonra VBA'da bir MYSave = MyFolderPAth & MYFilename çoklu satırını kullanarak değişken oluşturdum, böylece hangisinin yanlış olduğunu görmek daha kolay.

— bvaughn