Kullanıcıları bir Excel çalışma kitabı dosyasını makro destekleyen bir dosya olarak kaydetmeye nasıl zorlarsınız?
Bir Excel çalışma kitabı dosyasını kaydettiğinizde, varsayılan olarak .xlsx dosya türü biçiminde kaydedilir; bu biçim makroları desteklemez ve çalışma kitabındaki tüm makro kodlarını siler. Kodlarınızı korumak için çalışma kitabını “Excel Makro Etkin Çalışma Kitabı” (.xlsm) biçiminde kaydetmelisiniz. Peki, kullanıcıları çalışma kitabını makro etkin bir dosya olarak kaydetmeye nasıl zorlayabilirsiniz?
Kullanıcıları VBA koduyla makro etkin bir çalışma kitabı olarak kaydetmeye zorlayın
Kullanıcıları VBA koduyla makro etkin bir çalışma kitabı olarak kaydetmeye zorlayın
Çalışma kitabının varsayılan olarak makro etkin bir dosya olarak kaydedilmesini sağlamak için aşağıdaki VBA kodunu kullanabilirsiniz. Lütfen şu adımları izleyin:
1. ALT + F11 tuşlarına basılı tutarak Microsoft Visual Basic for Applications penceresini açın.
2. Ardından, VBAProject bölümünde ThisWorkbook öğesine çift tıklayarak yeni bir boş modül açın ve aşağıdaki kodu bu modüle kopyalayıp yapıştırın:
VBA kodu: Çalışma kitabını varsayılan olarak makro etkin çalışma kitabı olarak kaydetmeye zorla:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
'Updateby Extendoffice
Dim xFileName As String
If SaveAsUI <> False Then
Cancel = True
xFileName = Application.GetSaveAsFilename(, "Excel Macro-Enabled Workbook (*.xlsm), *.xlsm", , "Save As xlsm file")
If xFileName <> "False" Then
Application.EnableEvents = False
ActiveWorkbook.SaveAs Filename:=xFileName, FileFormat:=xlOpenXMLWorkbookMacroEnabled
Application.EnableEvents = True
Else
MsgBox "Action Cancelled"
Cancel = True
Exit Sub
End If
End If
End Sub
3. Ardından bu kod penceresini Kaydet ve Kapat. Bundan sonra kullanıcılar bu çalışma kitabını kaydettiklerinde, aşağıdaki ekran görüntüsünde gösterildiği gibi varsayılan olarak Excel Makro Etkin Çalışma Kitabı biçiminde kaydedilecektir:
En İyi Office Üretkenlik Araçları
Excel becerilerinizi Kutools for Excel ile geliştirin ve verimlilikte hiç yaşamadığınız bir deneyim yaşayın.Kutools for Excel, üretkenliği artırmak ve Zamanı Kaydet için 300’den fazla gelişmiş özelliğe sahiptir.İhtiyacınız olan özelliği hemen edinmek için buraya tıklayın…
Office Tab, Office uygulamalarına sekmeli bir arayüz kazandırarak işlerinizi çok daha kolay hale getirir.
- Word, Excel, PowerPoint, Publisher, Access, Visio ve Project'te sekmeli düzenleme ve okuma özelliğini etkinleştirin.
- Belgeleri yeni pencerelerde değil, aynı pencerenin yeni sekmelerinde açıp oluşturun.
- Günlük üretkenliğinizi %50 artırır ve her gün yüzlerce fare tıklamasından tasarruf etmenizi sağlar!
Tüm Kutools eklentileri — tek bir kurulum dosyasında!
Kutools for Office paketi, Excel, Word, Outlook ve PowerPoint eklentilerini ve ayrıca Office Tab Pro’yu içeren kapsamlı bir çözümdür; Office uygulamalarında çalışan ekipler için idealdir.
- Hepsi bir arada paket— Excel, Word, Outlook ve PowerPoint eklentileri + Office Tab Pro
- Tek kurulum, tek lisans— birkaç dakikada hazır (MSI uyumlu)
- Birlikte daha iyi çalışır— Office uygulamalarında akıcı üretkenlik
- 30 günlük tam özellikli deneme— kayıt gerekmez, kredi kartı gerekmez
- En iyi fiyat performans— ayrı ayrı eklenti satın almaya göre tasarruf sağlar