با سلام و احترام
من تعدادی فایل اکسل دارم که هر فایل حاوی تعدادی sheet هست میخوام sheet شماره 1 تمام فایلها رو در یک جدول اکسل جداگانه یکجا داشته باشم .
لطفا اساتید که تجربه این کار رو داررند راهنمایی کنند.
با تشکر
با سلام و احترام
من تعدادی فایل اکسل دارم که هر فایل حاوی تعدادی sheet هست میخوام sheet شماره 1 تمام فایلها رو در یک جدول اکسل جداگانه یکجا داشته باشم .
لطفا اساتید که تجربه این کار رو داررند راهنمایی کنند.
با تشکر
شما باید اکسل رو نصب داشته باشید و با اتوماسیون هر تغییری که نیاز دارید روی فایل اکسل انجام بدید. البته خیلی ساله فاکس پرو کار نمیکنم نمیدانم با ویرایش های جدید آفیس هم این کار شدنی هست یا خیر. یک کد ساده:
LOCAL cell1,cell2
STORE "b1" TO cell1
STORE "b7" TO cell2
oExcel=CREATEOBJECT("Excel.application")
oWorkBook=oExcel.Workbooks.Open("c:\book1.xls")
oSheet=oWorkBook.Sheets("sheet1")
oSheet.Range(cell1,cell2).Merge
oExcel.visible =.t.
آخرین ویرایش به وسیله binyaz2003 : چهارشنبه 23 فروردین 1402 در 19:38 عصر
وب سایت شخصی
وبلاگ آموزش ویژوال فاکس پرو - به دلیل تعطیل شدن میهن بلاگ نوشته های وبلاگ به وب سایت شخصی منتقل شدند.