Makro ile Yeni sayfa eklemeyi engelleme

[serif_007]

Herkese merhabalar.

Bir tablom var benim belirlediğim kullanıcılar kendi kullanıcı adları ve şifreler ile tabloya giriş yapıyorlar. Sayfayı koru ile yeni sayfa eklemeyi engellediğim zaman kullanıcı giriş ekranı gelmeden tabloya giriş yapıyor. Bu benim için bir sorun herkes kendi kullanıcısı ile giriş yapmalı. Makro ile yeni sayfa eklemeyi devre dışı bırakabilir miyiz?

 

[dEdE]

Merhaba,

Makro ile yeni sayfa eklemeyi devre dışı bırakabilir miyiz?

Bilmiyorum. Ama aşağıdaki kodlarla eklenen sayfa anında silinebilir.
BuÇalışmaKitabı kısmına yapıştırarak deneyebilirsiniz.

Private Sub Workbook_NewSheet(ByVal Yeni_Sayfa As Object)
    Application.DisplayAlerts = False
    Yeni_Sayfa.Delete
    Application.DisplayAlerts = True
End Sub

 

[serif_007]

Çok teşekkür ederim bu da işimi gördü

 

[dEdE]

Unutmuşum.

    Application.ScreenUpdating = False/True

eklerseniz ekran titremesi de olmaz.

 

[serif_007]

Çok teşekkürler