EXCEL Güvenlik Uyarısı lütfen destek!

[Mr. Köse]

Değerli üstatlar,

VBA kodlarının olduğu bir excel çalışma kitabını google drive'da ortak alanda paylaşıyorum. VBA kodları ile açılışta login giriş koydum, diğer kullanıcılar programa müdahale etmesin diye açılışta çalışan kodalar ile sayfa sekmelerini ve tüm şerid v.s. gizledim ve anasayfa diye bir sayfa açıp sayfalar arası geçişi sağlayacak butonlar koydum.

Ancak şöyle bir problem yaşıyorum;
Ortak alandaki excel'i ilk açan diğer kullanıcıların önüne güvenlik uyarısı çıkıyor, içeriği etkinleştir derlerse programım istediğim gibi çalışıyor ve diğer kullanıcılar müdahale edemiyor. Ancak her ne kadar vba kodları ile gizlemiş olsamda açılışta güvenlik uyarısı çıktığında etkinleştir demeyen kullanıcılar üstte dosya sekmesine girerek seçeneklerden sayfa sekmelerini göster diyerek sayfaları görebiliyorlar.

Açılışta hiçbir kullanıcıya güvenlik uyarısı çıkmasa ya da güvenlik uyarısı çıksa bile içeriği etkinleştir demeden programa müdahale edememelerini sağlayacak bir yol var mıdır?

 

[volki_112]

Bunun çözümü yok diye biliyorum. Çözüm gelirse bende merak ediyorum.

 

[Mr. Köse]

Bunun çözümü yok diye biliyorum. Çözüm gelirse bende merak ediyorum.

En azından güvenlik uyarısı çıktığında üstte menü ve şerid görünmeseni engellemenin yolu var mıdır acaba?

 

[DoğanD]

Merhaba,

Gizlenecek sayfaları dosya kapanışında sayfa2.Visible = xlSheetVeryHidden ile gizleyebilirsin. Açılışta da Visible yaparak çalışmaya devam edebilirsin. Bu sayede makroyu çalıştırmadan Visible olamayacağı için makroyu çalıştırmamış kimse sayfalara ulaşamaz.

 

[volki_112]

En azından güvenlik uyarısı çıktığında üstte menü ve şerid görünmeseni engellemenin yolu var mıdır acaba?

hocam şeritleri gizlemeyi worksheet_open veya auto open koduna mı yazdın.

 

[Mr. Köse]

hocam şeritleri gizlemeyi worksheet_open veya auto open koduna mı yazdın.

Aşağıdaki şekilde yaptım hocam, etkinleştirilen içeriklerde çalışma kitabı her açılışta bu kodlar sorunsuz çalıştırıyor. Ama güvenlik uyarısı çıkınca şerid ve toolbar görünüyor, görününce excel bilen birisi dosya-seçenekler-gelişmiş-sayfa sekmelerini göster diyerek çalışma kitabına erişebiliyor.

Private Sub Workbook_Open()

Worksheets("Anasayfa").Activate

ActiveWindow.DisplayWorkbookTabs = False
ActiveWindow.DisplayHeadings = False
ActiveWindow.DisplayHorizontalScrollBar = False
ActiveWindow.DisplayVerticalScrollBar = False
ActiveWindow.DisplayGridlines = False
Application.ExecuteExcel4Macro "Show.ToolBar(""Ribbon"",False)"
Application.DisplayFormulaBar = True

logingiris.Show

End Sub

 

[Mr. Köse]

Merhaba,

Gizlenecek sayfaları dosya kapanışında sayfa2.Visible = xlSheetVeryHidden ile gizleyebilirsin. Açılışta da Visible yaparak çalışmaya devam edebilirsin. Bu sayede makroyu çalıştırmadan Visible olamayacağı için makroyu çalıştırmamış kimse sayfalara ulaşamaz.

Merhaba, açılışta gizlendiği için kapanışta çıkmadan gizli olacak şekilde kaydedip çıkıyorum. Başka bir kullanıcı ortak alanda açmaya kalktığında güvenlik uyarısı veriyor, güvenlik uyarısı verdiğinde sayfalar görünmüyor zaten, ama excel bilen birisi dosya-seçenekler-gelişmiş - sayfa sekmelerini göster diyerek sayfaları görünür hale getirebiliyor.

İşte bu durumu engellemeye çalışıyorum.

 

[DoğanD]

Peki giriş için ufak bir Excel hazırlayıp ana dosyanızı şifreleseniz, Giriş dosyası ana dosyanızı parolası ile birlikte açsa ve logingiris.show için makroyu çalıştırsa olmaz mı?