Hücredeki Değer Boşsa Kayıt Yapmama isimli içerikte, ilgili işlemin VBA kodları ile nasıl yapacağınızı öğreten bir Hazır Makro Kodu yer almaktadır.
[*]Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve BuÇalışmaKitabı kısmına çift tıklayın.
Bazen Excel'de bir takım işlemlerin olması için bazı kriterler koymanız gerekebilir. Mesela dosyanız kaydedilmeden önce A1 hücresinde mutlaka bir değerin yazılı olması kuralını isteyebilirsiniz. Üstteki kod, böyle bir durumda kaydetmeyi engellemektedir. Kendi ihtiyacınıza göre revize edebilirsiniz.
Faydalanılması temennisiyle
[*]Microsoft Excel Objects yazısının solundaki + simgesini tıklayın ve BuÇalışmaKitabı kısmına çift tıklayın.
Hazır Kod
VBA:
Private Sub Workbook_BeforeSave(ByVal SaveAsUI As Boolean, Cancel As Boolean)
If ActiveSheet.Range("A1") = "" Then
MsgBox ("Kaydetme işlemi devam edemiyor!" & vbCrLf & "A1 hücresini boş bırakamazsınız."), vbCritical, "ExcelDepo"
Cancel = True
End If
End Sub
Açıklama
Bazen Excel'de bir takım işlemlerin olması için bazı kriterler koymanız gerekebilir. Mesela dosyanız kaydedilmeden önce A1 hücresinde mutlaka bir değerin yazılı olması kuralını isteyebilirsiniz. Üstteki kod, böyle bir durumda kaydetmeyi engellemektedir. Kendi ihtiyacınıza göre revize edebilirsiniz.
Faydalanılması temennisiyle