Userform oluşturmak?

[soyga0123]

Merhaba,
Userform'da textbox'ı istediğim hücrelere nasıl bağlayabilirim? Yani textbox'a yazdığım metin önceden belirlediğim hücreye yazılacak. Bir de makro'ları etkinleştirdikten sonra ekranda sadece userformun kalmasını istiyorum onu nasıl yapabilirim?

 

[Excelmy]

Merhaba,
Userform'da textbox'ı istediğim hücrelere nasıl bağlayabilirim? Yani textbox'a yazdığım metin önceden belirlediğim hücreye yazılacak.

Sheets("çalışma sayfanızın adı").Range("önceden belirlediğiniz hücre") = TextBox1.Text

Bir de makro'ları etkinleştirdikten sonra ekranda sadece userformun kalmasını istiyorum onu nasıl yapabilirim?

Application.Visible = False

 

[soyga0123]

Sheets("çalışma sayfanızın adı").Range("önceden belirlediğiniz hücre") = TextBox1.Text




Application.Visible = False

Teşekkürler hocam k::

 

[soyga0123]

Sheets("çalışma sayfanızın adı").Range("önceden belirlediğiniz hücre") = TextBox1.Text




Application.Visible = False

Son bir şey daha sorabilir miyim?
userform'a bir buton ekleyip bu buton ile bir sayfanın (ör: Sayfa 2) ön izleme komutunu girebilir miyim? "Sayfa2.PrintPreview" yapıyorum donuyor.

 

[Excelmy]

Son bir şey daha sorabilir miyim?
userform'a bir buton ekleyip bu buton ile bir sayfanın (ör: Sayfa 2) ön izleme komutunu girebilir miyim?

Kodlarınız.

UserForm1.Hide
Application.Visible = True
Sheets("Sayfa2").Select
Sheets("Sayfa2").PrintPreview
Application.Visible = False
Application.Dialogs(xlDialogPrint).Show
Application.Visible = False
UserForm1.Show