01/03/2020, 14:42 #7 Aktif Üye xoseng Bul Aktif Üye Adı Soyadı: ...... ...... Konum: - Ofis Versiyonu: Ofis 2016 64 Bit Son Oturumu: 04/01/2025,23:44 Yorumları: 80 Konuları: 13 Kayıt Tarihi: 11/11/2017 Teşekkür Puanı: 0 Mesleğiniz: Eğitimci zahmet olmazsa kod olarak ekleyebilir misiniz, ben yapamadım. Cevapla Cevapla
01/03/2020, 21:44 #8 Berduş berduş Bul Uzman Adı Soyadı: ha.... Konum: - Ofis Versiyonu: Ofis 2019 64 Bit Son Oturumu: Bugün,15:23 Yorumları: 8.551 Konuları: 94 Kayıt Tarihi: 30/07/2014 Teşekkür Puanı: 1.051 sadece bas_gizle modülündeki kırmızı renkli 2 fonksiyonda var onları silip aşağıdaki kodu yazıp dener misiniz? #If VBA7 And Win64 Then '64 bit için Private Declare PtrSafe Function IsWindowVisible Lib "User32" (ByVal hWnd As Long) As Long Private Declare PtrSafe Function ShowWindow Lib "User32" (ByVal hWnd As Long, _ ByVal nCmdShow As Long) As Long #Else '32 bit için Private Declare Function IsWindowVisible Lib "User32" (ByVal hWnd As Long) As Long Private Declare Function ShowWindow Lib "User32" (ByVal hWnd As Long, _ ByVal nCmdShow As Long) As Long #End IfKodu SeçKodu Kopyala Cevapla Cevapla
02/03/2020, 12:28 #9 Sefer ŞANLI SeferŞANLI Bul Aktif Üye Adı Soyadı: Se.... ŞA.... Yaşı: 49 Konum: - Ofis Versiyonu: Ofis 2010 64 Bit Son Oturumu: 08/12/2024,10:12 Yorumları: 800 Konuları: 154 Kayıt Tarihi: 21/12/2014 Teşekkür Puanı: 12 Mesleğiniz: Öğretmen Konu çözülmüş sanırım. Cevapla Cevapla
