[حل شده] فراخوان دو متن به تكس باكس در دو خط مجزا

[ظهور 313]

سلام و عرض ادب
میخوام متن چند تا سلول رو به یك تكس باكس فراخوانی كنم. اما میخوام كه متن هر سلول در یك سطر مجزا بیاد. به عبارت ساده تر، میخوام بعد از هر متن یك اینتر درج بشه و متن بعدی، در سطر بعدی درج بشه
ممنون میشم اگه اساتید راهنمایی بفرمایند

[rasools13]

سلام
در به هنگام کد نوشتن از
chr(13)
بجای enter استفاده کنید
برای مثال

With Me.TextBox1
              .Text = Range("A1") & Chr(13) & Range("B1")
End With 

فقط باید خاصیت multiline تکس باکس رو از پنجره properties رو true کنید
یا از کد ذیل استفاده کنید

TextBox1.Multiline = True 

[ظهور 313]

ممنونم استاد
خیلی عالی بود
فقط میشه بفرمایید اون 13 برای چیه؟ دقیقا باید 13 باشه؟

[rasools13]

هر کاراکتر دارای یک شماره منحصربفرد ascii هستش تو اینترنت سرچ کنید
شماره کاراکتر اینتر 13 است فکر کنم برای سیستم عامل مک 10 باشه
تو خود اکسل با تابع unicode میتونید شماره هر کاراکتر رو بدست بیارید و با تابع char شماره رو به کاراکتر تبدیل کنید

[ظهور 313]

ممنونم استاد
خیلی عالی بود