User formu çarpıdan değil üzerindeki bir botondan kapatmak

[haso_excel]

Merhaba arkadaşlar,

Bir butona atatığım kodun içinde bir userform açıp bir mesaj okutuyorum. Bu userformu çarpıdan değil üzerindeki butondan kapatılmasını sağlamak için ilgili butonun CommandButton1_Click() olayına nasıl bir kod yazılması gerekiyor.

 

[dEdE]

Merhaba,

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)
If CloseMode = vbFormControlMenu Then Cancel = True
End Sub

 

[haso_excel]

Yukarıdaki kod ile olmadı üstadım.
Dosyam ekde, dosyama bakarsanız belki daha anlaşılır olacak. User formun üzerindeki botona bastığında sadece user form gözükmeyecek excel sayfası açık kalacak.

 

[dEdE]

Merhaba,
Ayrıca aşağıdaki kodu da eklemelisiniz.

Private Sub CommandButton1_Click()
Unload Me
End Sub

 

[haso_excel]

Teşekkür ederim.

 

[dEdE]

Rica ederim.
Güle güle kullanın.