سلام
ممکنه گاهی لازم باشه به محتوای سلولی که متن داره باز هم متنی بهش اضافه باشه با کد این این هدف حاصل میشه
کد:
With ActiveCell
.Value = .Value & Chr(10) & Sheet1.Range("p1").Value
End With[FONT=tahoma][/FONT]
در اینجا اگه میخواهیم TEXT جدید در پاراگراف بعدی ایجاد بشه WARP TEXT از کد
کد:
Chr(10)
کد:
[FONT=tahoma]"" [/FONT]