Kopyalananı TextBox'a Yapıştırma Yapmak

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,254
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
Merhabalar.
Çalışma sayfasındaki bir hücreyi Sağ tuşla tıklayıp Kopyala seçeneğini seçtikten sonra Textbox'ı Sağ tuşla tıklayıp textbox'a Yapıştırmak istiyorum.Tetxbox'ta nasıl bir ayarlama yapmam gerekiyor.
Teşekkür ederim.İyi çalışmlar.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,256
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Selamlar,

Textbox sayfa üzerindemi yoksa form üzerindemi?
 

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,254
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
Merhaba
Textbox UserForm Üzerinde.
 

Korhan Ayhan

Administrator
Yönetici
Admin
Katılım
15 Mart 2005
Mesajlar
42,256
Excel Vers. ve Dili
Microsoft 365 Tr-En 64 Bit
Selamlar,

Aşağıdaki kodu userformun kod bölümüne uyglayınız. Formun show modal özelliğini False olarak ayarladıktan sonra sayfadaki hücreyi seçip kopyala dedikten sonra formu seçip textboxı aktif attikten sonra CTRL+V tuşlarına basarsanız hücredeki değer textboxa yapıştırılacaktır. Yapıştırma işleminden sonra değerin sonuna bir karakter eklemektedir. Bunu kaldırmak için aşağıdaki kodu kullanıyoruz. Umarım işinize yarar.

Kod:
Private Sub TextBox1_BeforeDropOrPaste(ByVal Cancel As MSForms.ReturnBoolean, ByVal Action As MSForms.fmAction, ByVal Data As MSForms.DataObject, ByVal X As Single, ByVal Y As Single, ByVal Effect As MSForms.ReturnEffect, ByVal Shift As Integer)
    SendKeys "{BS}"
End Sub
 

Orion1

Uzman
Uzman
Katılım
1 Mart 2005
Mesajlar
22,254
Excel Vers. ve Dili
Win7 Home Basic TR 64 Bit

Ofis-2010-TR 32 Bit
Merhabalar.
Sayın leventm hocam
Teşekkür ederim.
 
Katılım
30 Mart 2005
Mesajlar
86
Kopyala ve yapıştırma işine combox'larıda dahil etmek

Textbox'lardaki kopya ve yapıştır işlemini aynı form üzerinde bulunan combobox'larada uyarlayabilirmiyiz. yani textbox'tan kopyalayıp combobox'a yapıştırmak gibi. yada combobox'tan kopyalayıp textbox'a yapıştırmak.

Herkese saygı ve sevgilerimi iletiyorum.
 
Üst