PDA

View Full Version : انتقال Image به Excel


kamranKoohi
جمعه 21 دی 1386, 10:59 صبح
با سلام :

من برای انتقال اطلاعات Text به Excel مشکلی ندا رم ، ولی متاسفانه برا ی انتقال Image دچار مشکل شده ام .
لطفا اگه کسی میتونه کمکم کنه .:متفکر:
kamranKoohi
چهارشنبه 26 دی 1386, 14:57 عصر
لطفا کمک کنید.:تشویق:
kamranKoohi
یک شنبه 30 دی 1386, 08:16 صبح
این موضوع خیلی برای من مهمه لطفا کمکم کنید.:ناراحت:
davood-ahmadi
سه شنبه 02 بهمن 1386, 20:22 عصر
ابتدا آبجکت اکسل را بنویس و سپس با توجه به انتخاب از موارد ذیل کدهای مربوطه را در ادامه آبجکت اکسل بنویس:
اگر می خواهی عکس را از یکی از فولدرهای هارد ببری
ActiveSheet.Pictures.Insert("F:\A.PNG").Select
یا اینکه باید عکس را به کلیبرد ویندوز بفرستی یا همان کپی خودمان و سپس دستور زیر را بنویسید
ActiveSheet.paste

مثال:
Xls.ActiveSheet.Pictures.Insert("F:\A.PNG").Select