Açılışta UserForm açılsın

polis-53

Altın Üye
Katılım
26 Aralık 2008
Mesajlar
1,131
Excel Vers. ve Dili
EXCEL 2016 TÜRKÇE
Altın Üyelik Bitiş Tarihi
23-02-2025
Merhaba arkadaşlar excel dosyamı açarken UserForm1 açılsın istiyorum bunu nasıl yapabilirim
 

asi_kral

Özel Üye
Katılım
22 Şubat 2012
Mesajlar
2,824
Excel Vers. ve Dili
Excel 2007 Türkçe
Merhaba arkadaşlar excel dosyamı açarken UserForm1 açılsın istiyorum bunu nasıl yapabilirim
Merhaba
Boş bir module
Kod:
Sub Auto_open()
Userform1.Show
End Sub
yazın ve dosyanızı kaydedip kapatın sonra tekrar açın.
 

polis-53

Altın Üye
Katılım
26 Aralık 2008
Mesajlar
1,131
Excel Vers. ve Dili
EXCEL 2016 TÜRKÇE
Altın Üyelik Bitiş Tarihi
23-02-2025
Merhaba ben anlatamadım herhalde benim istediğim dosya açtığımda direk userform1 açılsın istiyorum
 

Murat OSMA

Altın Üye
Altın Üye
Katılım
23 Mayıs 2011
Mesajlar
5,508
Excel Vers. ve Dili
Microsoft 365 TR-EN
Altın Üyelik Bitiş Tarihi
31-12-2028
Thisworkbook kod penceresine girin ve Thisworkbook_Open kodlarına aşağıdaki kodları yazın..
Kod:
application.visible = false 
userform?.show
Ya da Auto_Open kodlarına yukarıda verdiğim kodları yazın...

Sonra başka bir sorunla karşılaşırsanız buraya yazarsınız...
 

Merhum İdris SERDAR

Moderatör
Yönetici
Katılım
21 Ekim 2005
Mesajlar
17,094
Excel Vers. ve Dili
Excel, 365 - İngilizce
Merhaba arkadaşlar excel dosyamı açarken UserForm1 açılsın istiyorum bunu nasıl yapabilirim
.

ThisWorkbook olayına;

Kod:
Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show (1)
ActiveWorkbook.Close True

End Sub

yazarak deneyin.

.
 

polis-53

Altın Üye
Katılım
26 Aralık 2008
Mesajlar
1,131
Excel Vers. ve Dili
EXCEL 2016 TÜRKÇE
Altın Üyelik Bitiş Tarihi
23-02-2025
yurttas

MERHABA yurttas sağolun oldu çok teşekkür ederim fakat bu seferde Excel e geri dönmem için ne yapmalıyım Excel e geri donemiyorum
 
Katılım
14 Aralık 2007
Mesajlar
1,073
Excel Vers. ve Dili
EXCEL 2007 TÜRKÇE
Excel e geri dönmem için ne yapmalıyım Excel e geri donemiyorum
açılış:
Kod:
Sub auto_open()
 Application.Visible = False
 UserForm1.Show
End Sub
geri dönüş:
Kod:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Application.Visible = True
End Sub
 

polis-53

Altın Üye
Katılım
26 Aralık 2008
Mesajlar
1,131
Excel Vers. ve Dili
EXCEL 2016 TÜRKÇE
Altın Üyelik Bitiş Tarihi
23-02-2025
security

Merhaba direk userform1 i açıyor excel sayfasına dönemiyorum donemediğim için kodlarada giremiyorum
 
Katılım
14 Aralık 2007
Mesajlar
1,073
Excel Vers. ve Dili
EXCEL 2007 TÜRKÇE
başka bir excel dosyası açın makro güvenligini yüksek yapın çıkın.
sonra dosyanızı açın vediğim kodu userform a ekleyin makro seviyesini düşük yapın.

geri dönüş:
Kod:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Application.Visible = True
End Sub
 

polis-53

Altın Üye
Katılım
26 Aralık 2008
Mesajlar
1,131
Excel Vers. ve Dili
EXCEL 2016 TÜRKÇE
Altın Üyelik Bitiş Tarihi
23-02-2025
dosya ektedir iyi çalışmalar
 

Ekli dosyalar

polis-53

Altın Üye
Katılım
26 Aralık 2008
Mesajlar
1,131
Excel Vers. ve Dili
EXCEL 2016 TÜRKÇE
Altın Üyelik Bitiş Tarihi
23-02-2025
security

teşekkür ederim nasıl yaptığınızı da anlatırsanız çok sevinirim.
Kal sağlıcakla
 
Katılım
14 Aralık 2007
Mesajlar
1,073
Excel Vers. ve Dili
EXCEL 2007 TÜRKÇE
makro güvenlik düzeyini yükseltik sizin dosyanızı açtık,sonra kodları ekledik..ve makro güvenlik düzeyini düşürdük..
önceki mesajımda belirtigim gibi..
Kod:
Sub Auto_open()
Application.Visible = False
REHBER.Show
End Sub
Kod:
Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
Application.Visible = True
End Sub
ekledik,
rice ederim iyi çalışmalar...
 

polis-53

Altın Üye
Katılım
26 Aralık 2008
Mesajlar
1,131
Excel Vers. ve Dili
EXCEL 2016 TÜRKÇE
Altın Üyelik Bitiş Tarihi
23-02-2025
security

tekrar merhaba kapat butonuna değilde başka bir butona atayabilirsek çok güzel olacak kapat butonunu dosyadan çıkmak için kullanıyordum.
 

Murat OSMA

Altın Üye
Altın Üye
Katılım
23 Mayıs 2011
Mesajlar
5,508
Excel Vers. ve Dili
Microsoft 365 TR-EN
Altın Üyelik Bitiş Tarihi
31-12-2028
UserForm'daki X işaretini pasif konuma getirmişsiniz. Bu durumda X dan kapatamayacaksınız.
Kapat butonunu da dosyadan çıkmak için kullanacaksanız, başka bir buton ekleyin kodlarına Application.Visible = True yazın.
 
Katılım
28 Aralık 2012
Mesajlar
8
Excel Vers. ve Dili
2007 TR
merhaba, sizin verdiğiniz
Kod:
Private Sub Workbook_Open()
Application.Visible = False
UserForm1.Show (1)
ActiveWorkbook.Close True

End Sub
ile açılışta userform2 nin açılmasını sağlıyorum. fakat başka bir konu ile alakalı excel açamıyuorum. bunu engelleyen kod hangisi bulamadım.

2. sorum ise muhtemelen yine aynı kod ama, önizleme yapmak için excel sayfası açtırıyordum. bu önizleme yaptığım excel sayfasına nasıl müdahale ederim. şuan ona da tıklayamıyorum.

3. sorum userformlar arasında dolaşırken bir önceki userforum kapanmasını nasıl sağlarım.


şimdiden vereceğiniz cevaplar için teşekkür ederim...
 

katip16487

Altın Üye
Katılım
28 Haziran 2007
Mesajlar
168
Excel Vers. ve Dili
OFFİCE 2016 (Türkçe)
Altın Üyelik Bitiş Tarihi
17-03-2025
Konu eski ancak şu an ben de aynı sorunu yaşıyorum. Excel 2010 kullanıyorum. Makro ayarlarını tüm makroları devre dışı bıraka getirmeme rağmen işlem yapamıyorum. Excel'i açıp VBA kod sayfasına nasıl girebilirim.

Şimdiden teşekkürler...
 
Üst