DOSYA İndirmek/Yüklemek için ÜCRETLİ ALTIN ÜYELİK Gereklidir!
Altın Üyelik Hakkında Bilgi
UserForm1 i kapatırken kod sayfasınaPrivate Sub Workbook_Open()
Application.Visible = False
UserForm1.Show
End Sub
yazmalısınız. Excele dönemezseniz Makroları etkinleştirmeyin, kod sayfasına ulaşırsınız.Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Application.Visible = True
End Sub
Selamlar,
Açılışta Thisworkbook kod sayfasına
UserForm1 i kapatırken kod sayfasına
yazmalısınız. Excele dönemezseniz Makroları etkinleştirmeyin, kod sayfasına ulaşırsınız.