Microsoft hesabıyla oturum açın
Oturum açın veya hesap oluşturun.
Merhaba,
Farklı bir hesap seçin.
Birden çok hesabınız var
Oturum açmak istediğiniz hesabı seçin.

Belirtiler

Bir makroyu Visual Basic for Applications makroyu Microsoft Excel, aşağıdaki veya benzer hata iletisini alabilirsiniz:

'1004' çalıştırma hatası:
Nesnenin 'Farklı Kaydet' yöntemi _Worksheet başarısız

Neden

Bu davranış, aşağıdaki koşullardan her ikisi de doğru olduğunda ortaya çıkabilir:

  • Çalışma sayfasını kaydetmek Visual Basic for Applications bir makro kullanıyorsanız.

    -ve-

  • Dosya biçimini xlWorkbookNormal sabiti olarak belirtirsiniz.

Örneğin, aşağıdaki kod bu hataya neden olur:

Sub A()
Dim myNewSheet As Worksheet
Set myNewSheet = ActiveSheet
FileNameBin = "c:\ABC"
myNewSheet.SaveAs Filename:=FileNameBin, FileFormat:=xlWorkbookNormal
End Sub

Geçici Çözüm

Microsoft, satılabilirlik ve/veya belirli bir amaca uygunluk ile ilgili zımni garantiler dahil, ancak bunlarla sınırlı değildir ve yalnızca çizim için programlama örnekleri sağlar. Bu makalede, programlama dilinin ve yordamları oluşturmak ve hata ayıklamak için kullanılan araçlar hakkında bilgi sahibi olduğunuz varsaymaktadır. Microsoft destek uzmanları belirli bir yordamın işlevselliğini açıklamaya yardımcı olabilir, ancak bu örnekleri değiştirerek sizin özel ihtiyaçlarınızı karşılayacak ek işlevler veya yapı yordamları sağlamaz.
Sınırlı programlama deneyiminiz varsa, Microsoft Sertifikalı İş Ortağına veya Microsoft Danışma Hizmetleri'ne başvurabilirsiniz. Daha fazla bilgi için şu Microsoft Web sitelerini ziyaret edin:

Microsoft Sertifikalı İş Ortakları - https://partner.microsoft.com/global/30000104

Microsoft Danışma Hizmetleri - http://support.microsoft.com/gp/advisoryservice

Bizli destek seçenekleri ve Microsoft'a başvurun hakkında daha fazla bilgi için aşağıdaki Microsoft Web sitesini ziyaret edin:http://support.microsoft.com/default.aspx?scid=fh;EN-US;CNTACTMS

Bu davranışa bir son olarak, dosya biçimi belirtimsini xlWorkbookNormal sabiti olan 1 olarak değiştirebilirsiniz. Örnek kod aşağıdaki şekilde değiştirilirse normal şekilde işlev gösterir:

Sub A()
Dim myNewSheet As Worksheet
Set myNewSheet = ActiveSheet
FileNameBin = "c:\ABC"
myNewSheet.SaveAs Filename:=FileNameBin, FileFormat:=1
End Sub

NOT Çalışma sayfasını kaydedse bile, dosya biçimi xlWorkbookNormal veya 1 olarak ayarlanmışsa, seçili çalışma kitabındaki tüm çalışma sayfaları kaydedilir.

Durum

Microsoft, bu makalenin başında listelenen Microsoft ürünlerinde bunun bir sorun olduğunu onaylar.

Daha fazla yardıma mı ihtiyacınız var?

Yeteneklerinizi geliştirin

Eğitimleri keşfedin >

Yeni özellikleri ilk olarak siz edinin

MICROSOFT 365 INSIDER’LARA KATILIN >

Bu bilgi yararlı oldu mu?

Dil kalitesinden ne kadar memnunsunuz?
Deneyiminizi ne etkiledi?

Geri bildiriminiz için teşekkürler!

×