Show(m0dal)

[acolkesen1]

Merhaba arkadaşlar,
Bir userform açık iken ikinci userformu da açıp her ikisini de kullanmak istiyorum ama Show(modal) olarak açılmıyor. Bu konuda hangi kodu kullanmalıyım?

 

[halit3]

böyle denermisiniz.

UserForm1.Show 0
UserForm2.Show 0

 

[acolkesen1]

Merhaba Sayın halit3,
Yardımınız için çok teşekkür ederim. Esenkalın..

 

[acolkesen1]

Tekrar merhaba Sayın halit3,
Örnek dosyada denediğim uygulama kendi dosyamda çalışmıyor. Sanırım userform özellikleriyle ilgili bir sorun var ama bulamadım. Kendi çalışmamda kullandığım formların bazıları ekli dosyadadır.YENİ STOK butonuyla açılan form üzerinden FİYAT HESAPLA butonuyla ikinci formu açmak istiyorum. İlgilenebilirseniz...

 

[security]

istediğinniz buysa zaten açıyor...

 

[Excelmy]

Sayın acolkesen1

Userform2 üzerindeki FİYAT HESAPLA butonu kodlarınızı aşagıdaki gibi uygulayıp tekrar deneyiniz.

UserForm2.Hide
FYT.Show

 

[acolkesen1]

Merhaba Sayın security,
Önce ilginize teşekkür ederim. Yapmak istediğim resimdeki ekranda önce "yeni stok kayıt" düğmesiyle açılan form üzerinden "fiyat hesapla " düğmesi ile fiyat hesaplama formunu açmak.
Sayın Kuman, ilk mesajımda belirttiğim gibi heriki formundan açık kalmasını ve her ikisini de değişerek kullanmak istiyorum. Sizin kodunuzu çalışamama eledim ama yeni stok kayıt formu kapanıyor. Aslenda şöyle açıklasam daha anlaşılır olacak galiba; Yeni stok kaydı sırasında satış fiyatını girerken ,fiyat hesaplama formunda satış fiyatını belirleyip o fiyatı stok kaydına yazmak. Yani her iki formun da açık kalması ve istenildiğinde kullanılması gerekiyor. İlginize teşekkür ederim..

 

[Excelmy]

Her iki form açık olacaksa FİYAT HESAPLA BUTONU kod;

Load UserForm2
FYT.Show

 

[security]

Bu Şekil 2 Formunda Açılması mı İstediğiniz?

 

[acolkesen1]

Evet sayın security, bu şekilde açılıyor zaten.. Ben bir önceki mesajımda açıkladığım gibi her iki formu da aynı anda kullanabilmek istiyorum. Şu andaki haliyle sadece son açılan formu kullanabiliyorum.

 

[acolkesen1]

Ekteki dosyada istediğim şekilde tüm açık formlar kullanılabiliniyor.Benim eklediğim formlarda aynı kodu kullanmama rağmen niye çalışmadığını anlayamadım.

 

[acolkesen1]

İyi akşamlar,
Sanırım sorun çözüldü diye arkadaşlar tekrar cevap vermediler.(kimsenin öyle bir mecburiyeti de yok zaten.. ) 11 nolu mesajdaki örnek dosyada çalışan kodların 4 nolu mesajdaki dosyada niçin çalışmadığı konusunda uzman arkadaşların yardımına ihtiyacım var.İlgilenen tüm arkadaşlara teşekkür ederim.

 

[leumruk]

Merhaba,
Ekteki dosyayı inceleyiniz.

 

[acolkesen1]

Merhaba sayın leumruk,
Çook heyecanlı bir maçı bırakıp cevap verdiğiniz için teşekkür ederim.Yardımlarınız için de teşekkür ederim. Kendi dosyama uyarladıktan sonra tekrar yazacağım. Bu arada penaltılar eşitlendi

 

[acolkesen1]

Tekrar merhaba Sayın leumruk,
Userformları kendi çalışmama kopyaladım ama örnek dosyada çalışan kodlar benimkinde çalışmıyor.Orjinal çalışmam ektedir. Vaktiniz olursa ...

 

[leumruk]

Bir önceki mesajımı güncelledim. Dosyayı indirip deneyebilirsiniz.

 

[acolkesen1]

Sayın leumruk, çok teşekkür ederim ilginiz için..Ellerinize sağlık..Acaba hatanın nerede olduğunu açıklayabilir misiniz?

 

[leumruk]

Sayın leumruk, çok teşekkür ederim ilginiz için..Ellerinize sağlık..Acaba hatanın nerede olduğunu açıklayabilir misiniz?

Düzenlediğim yerleri yazıyorum. Düzeltilmiş şekliyle. Sizin kodlarınızda belirttiğim yerlerde 0 yoktu.
1- Module1 Autpen'daki UserForm7.Show 0
2- Module7'deki

Sub userform7_aç()
[COLOR="darkred"]UserForm7.Show 0[/COLOR]
End Sub

3- Userform7'deki

Private Sub CommandButton3_Click()

[COLOR="darkred"]UserForm2.Show 0[/COLOR]
End Sub

 

[acolkesen1]

Auto_open dışındakileri denemiştim ama açılıştaki kod aklıma gelmemişti..Çok teşekkür ederim.. Esenkalın..

 

[leumruk]

Auto_open dışındakileri denemiştim ama açılıştaki kod aklıma gelmemişti..Çok teşekkür ederim.. Esenkalın..

Rica ederim. İyi çalışmalar.