[حل شده] كپی كردن متن تكس باكس به حافظه سیستم

[ظهور 313]

سلام و عرض ادب
چطوری میشه متن تكس باكس رو با استفاده از كلید، به حافظه سیستم منتقل كرد؟

[ظهور 313]

آقا نكنه اینجا هم كرونا اومده؟
اساتید تشریف ندارن؟

[Amir Ghasemiyan]

سلام دوست عزيز
شما ديگه چرا؟ هم كاربر قديمي هستين هم منتظر ظهور آقا
گر صبر كني ز غوره حلوا سازي

و اما جواب شما
كليد تركيبي ctrl+c مگه چه مشكلي داره؟ اين كليد تركيبي رو كه بزنيد محتواي تكست باكس به حافظه موقت سيستم منتقل ميشه

[iranweld]

با سلام

با یه سرچ تو اینترنت کلی مطلب پیدا میکنید

Private Sub CommandButton1_Click()
    With New MSForms.DataObject
        .SetText TextBox1.Text
        .PutInClipboard
    End With
End Sub 

[ظهور 313]

با سلام

با یه سرچ تو اینترنت کلی مطلب پیدا میکنید

Private Sub CommandButton1_Click()
    With New MSForms.DataObject
        .SetText TextBox1.Text
        .PutInClipboard
    End With
End Sub 

از استاد قاسمیان عزیز سپاسگذارم، اما چون كار قابل انجام زیاده، به این كدی كه دوست عزیز نوشتند، نیاز داشتم
از هر دو بزرگوار خیلی خیلی سپاسگذارم
مشكل حل شد و همینو میخواستم
یاعلی