Form açılınca tüm açık uygulamalar minimize olsun

[girdap]

Sayın Forum Üyeleri,
Herkese selam.

Bir UserForm açıldığında Windowsta açılı tüm uygulamalar, açık excel veya Word belgeleri vs. gibi minimize hale geçmesini nasıl sağlayabiliriz?

İyi çalışmalar.

Saygılarımla

 

[Levent Menteşoğlu]

Userformun initialize olayına aşağıdaki kodu yazın.

CreateObject("Shell.Application").MinimizeAll

 

[İsmail Küçükşengün]

Sayın Leventm;

Sayenizde çok şey öğreniyoruz.

Teşekkürler,selamlar.

 

[tahsin01]

exceli açtığım zaman userform açılsın ve diğer uygulamalar minimize olsun istiyorum. aşağıdaki kodu yazdım ama olmadı. yardımcı olabilir misiniz.

Sub auto.open()
userform1.open
CreateObject("Shell.Application").MinimizeAll
end sub