• DİKKAT

    DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
    Altın Üyelik Hakkında Bilgi

Veri Girişi Formunu zorunlu tutmak mümkün mü

Katılım
26 Ocak 2007
Mesajlar
4,625
Excel Vers. ve Dili
Ofis 2016
Merhaba Arkadaşlar,
Excel sayfasında oluşturulan Veri Giriş Formunu zorunlu tumak, yani veri girişinin, mevcut verilerin değiştirilmesinin, silinmesini sadece Veri Giriş Formu üzerinden yapılmasını makro destekli de olsa zorunlu yapmak, sayfaya dsoğrudan veri girişini engellemek mümkün mü ?
 
Merhaba.

Evet mümkün.

Sayfaya bir buton eklersiniz butonun kilit özelliğini açarsınız.
Sayfa koruması yaparsınız, böylelikle manuel giriş yapılamaz.
Butona tıklandığında form açılır ve girişler oradan değiştirilir.
 
Merhaba.

Evet mümkün.

Sayfaya bir buton eklersiniz butonun kilit özelliğini açarsınız.
Sayfa koruması yaparsınız, böylelikle manuel giriş yapılamaz.
Butona tıklandığında form açılır ve girişler oradan değiştirilir.
Fikir için teşekkürler üstad. Şöyle bir kod olabilir mi ?
Form kapatıldığında H1 hücresine "X" yaz gibi !
 
Bu şekilde olabilir.
Kod:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = vbFormControlMenu Then 
        Range("H1").value="X"
    End if
End Sub
 
Son düzenleme:
Bu şekilde olabilir.
Kod:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
    If CloseMode = vbFormControlMenu Then
        Range("H1").value="X"
    End if
End Sub
Üstad kod için çok teşekkürler. Yalnız UserForm yerine "DataForm" yani Excelin kendi menüsünde olan VBA da oluşturulmayan bir form tür var. buna göre yapabilir miyiz !
Kodda UserForm olan yere DataForm yazdım ama olmadı. başka bir tanımı var galiba.
 
DataForm'u VBA ile gösterebilirsiniz ama, yine VBA ile kapatabilir misiniz bilmiyorum....

Kod:
ActiveSheet.ShowDataForm

.
 
DataForm'u VBA ile gösterebilirsiniz ama, yine VBA ile kapatabilir misiniz bilmiyorum....

Kod:
ActiveSheet.ShowDataForm

.
Teşekkürler üstad. VBA ile kapatılması olarak değil de, manuel yoldan kapatıldığında hücreye not düşülmesi gibi bir işlem yapması mümkün mü ?
 
Pek sanmıyorum, çünkü DataForm'lara VBA ile ulaşamıyoruz...

.
 
Geri
Üst