تويت
أي نعم بنفس المقاربة لكن ليس بالسهولة التي تجعلنا نقوم بإسقاطات للأكواد و ليس بتلك الصعوبة
التي نضخمها لنا إن شاء الله حوار حول هذا
التي نضخمها لنا إن شاء الله حوار حول هذا
-
-
زادكم الله علما .تعليق
-
السلام عليكم ورحمة الله وبركاته
فكرة جيدة بارك الله فيكتعليق
-
السلام عليكم أريد عمل مشروع تخزين بيانات كرقم التسجيل و الإسم و اللقب تاريخ الولادة و و و.... في ورقة إيكسال مع إمكانية الإضافة واستدعائها في جريدتعليق
-
-
المشاركة الأصلية بواسطة ثامر أبو بلقيس مشاهدة المشاركةالسلام عليكم ورحمة الله وبركاته
برجاء من الادارة عدم حذف الموضوع لأني لم أكتب شرحا أو حلا
لمحتوى الموضوع فهذا الطلب شغل عديد الزملاء .. و كثرت التساؤلات حوله
عامة و خاصة و أدرك أنه يوجد من الاخوة من لديه المعلومة لكنه يبقى من بين المواضيع التي
لا يعرف الفرد من أين يبدأ .... لهذا ووفاء بالوعد
سأفتح هذه الصفحة على أن يتم مناقشة أو كتابة الحلول
للتساؤلات المطروحة حول اتقان التعامل مع الايكسل و الاوتوبلاي و متشجعا بمساعدة الزملاء المحترفين للتدخل
للأجابة عن أي طرح يطرحه المهتمين بهذه التقنية أي ليس الموضوع موضوعي بل هو خطوة نحو إماطة اللثام
-----------
أخي تود اكتساب مهارة من طرف الاساتذة في التعامل مع الايكسل و مزاوجته مع الاوتوبلاي
ضع طلبك على شكل تمرين - و ليس مشروعا - واضح المعطيات من البداية و الله الموفق و المعين
تقديري
ملاحظة : مصنف الايكسل من الافيد أن يكون بـ 2003 لأن الاصدارات الأخرى تتعامل معه و العكس غير صحيح
مصنف الايكسل يكون خال من وحدات الماكرو أو الاضافات البرمجية لتفادي الرسائل التي تعيق المزاوجة بين البرنامجين
السلام عليكم
عندي مشروع
فيه : اسم المدرسة ....(input1)......
اسم ااستاذ .......(input2).....
القسم .....(input3).......
وعنص grid او ليسبوكس يحتوي اسماء و تاريخ الميلاد و اسم الاب ....الخ من معلومات التلاميذ
كيف اعمل على تصدير العمل الى اكسل بحيث تظهر في ورقة الاكسل في الاعلى المعلومات ( الدولة . الوزارة . اسم المدرسة . اسم الاستاذ . القسم )
و جدول فيه المعلومات
تجياتيتعليق
-
هل فيه امكانية تصدير الجداول من ليسبوكس او grid الى word
عتي مثلا كود يزاوج بين محتوى richtext و الصورة و ايضا جدولتعليق
-
محاولة فيما يخص استخراج عماصر grid يتكون من 12 عمود
كود PHP:
-- create scatterplot in Excel
require('luacom')
local excel = luacom.CreateObject("Excel.Application")
excel.Visible = true
local wb = excel.Workbooks:Add()
local ws = wb.Worksheets(1)
for row=1, 12 do
ws.Cells(row,1).Value2 = Grid.GetCellText("Grid1", row, 1);
ws.Cells(row,2).Value2 = Grid.GetCellText("Grid1", row, 2);
ws.Cells(row,3).Value2 = Grid.GetCellText("Grid1", row, 3);
ws.Cells(row,4).Value2 = Grid.GetCellText("Grid1", row, 4);
ws.Cells(row,5).Value2 = Grid.GetCellText("Grid1", row, 5);
ws.Cells(row,6).Value2 = Grid.GetCellText("Grid1", row, 6);
ws.Cells(row,7).Value2 = Grid.GetCellText("Grid1", row, 7);
ws.Cells(row,8).Value2 = Grid.GetCellText("Grid1", row, 8);
ws.Cells(row,9).Value2 = Grid.GetCellText("Grid1", row,9);
ws.Cells(row,10).Value2 = Grid.GetCellText("Grid1", row, 10);
ws.Cells(row,11).Value2 = Grid.GetCellText("Grid1", row, 11);
ws.Cells(row,12).Value2 = Grid.GetCellText("Grid1", row, 12);
end
تعليق
-
اذا وضعت نص لانبوت
فيمكن ادخال معطياتها لتكون في اعلى الجدول من خلال تغيير رقم السطر
مثال
كود PHP:-- create scatterplot in Excel
require('luacom')
local excel = luacom.CreateObject("Excel.Application")
excel.Visible = true
local wb = excel.Workbooks:Add()
local ws = wb.Worksheets(1)
ws.Cells(1,10).Value2 = Input.GetText("Input1")
ws.Cells(2,10).Value2 = Input.GetText("Input2")
ws.Cells(3,10).Value2 = Input.GetText("Inpût3")
for row=4, 20 do
ws.Cells(row,1).Value2 = Grid.GetCellText("Grid1", row-3, 1);
ws.Cells(row,2).Value2 = Grid.GetCellText("Grid1", row-3, 2);
ws.Cells(row,3).Value2 = Grid.GetCellText("Grid1", row-3, 3);
ws.Cells(row,4).Value2 = Grid.GetCellText("Grid1", row-3, 4);
ws.Cells(row,5).Value2 = Grid.GetCellText("Grid1", row-3, 5);
ws.Cells(row,6).Value2 = Grid.GetCellText("Grid1", row-3, 6);
ws.Cells(row,7).Value2 = Grid.GetCellText("Grid1", row-3, 7);
ws.Cells(row,8).Value2 = Grid.GetCellText("Grid1", row-3, 8);
ws.Cells(row,9).Value2 = Grid.GetCellText("Grid1", row-3,9);
ws.Cells(row,10).Value2 = Grid.GetCellText("Grid1", row-3, 10);
ws.Cells(row,11).Value2 = Grid.GetCellText("Grid1", row-3, 11);
ws.Cells(row,12).Value2 = Grid.GetCellText("Grid1", row-3, 12);
end
تعليق
-
تطور الكود باضافة الاولوان و اضافة خطوط الجدول و دمج الخانات و الصاق نص من richText
كود PHP:DLL.CallFunction("user32.dll", "LoadKeyboardLayoutA", "\"00000401\", 1", DLL_RETURN_TYPE_LONG, DLL_CALL_STDCALL)
RichText.SetSelection("RichText2", 1, -1);
D=RichText.Copy("RichText2");
require('luacom')
local excel = luacom.CreateObject("Excel.Application")
local wb = excel.Workbooks:Add()
local ws = wb.Worksheets(1)
local range = ws:Range('A1:M16')
local cell = ws.Cells(1,17)
excel.Visible = true
local rangee = ws:Range('A4:M16')
rangee.Borders.LineStyle = 1
ws:Range('A4:M16').BorderAround(1)
cell.Font.Name = 'Traditional Arabic'
range.Font.Name = 'Traditional Arabic'
cell.Font.Bold = true
cell.Font.Size = 16
range.Font.Size = 16
ws:Paste(ws:Range('A1'))
ws:Range('A1:M1'):Merge()
ws:Range('A2:M2'):Merge()
ws:Range('A3:M3'):Merge()
ws:Range('A1:M17').HorizontalAlignment = -4108
local ranget = ws:Range('A4:A16')
local ranger = ws:Range('A4:M4')
ranget.Interior.Color = 0x269900
ranger.Interior.Color = 0xf50000
local cel1 = ws.Cells(1,1)
local cel2 = ws.Cells(2,1)
local cel3 = ws.Cells(3,1)
cel1.Font.Color = 0x0000FF
cel2.Font.Color = 0x00CC33
cel3.Font.Color = 0xFF0000
for row=4, Grid.GetRowCount("Grid1")-2 do
ws.Cells(row,1).Value2 = Grid.GetCellText("Grid1", row-3, 0);
ws.Cells(row,2).Value2 = Grid.GetCellText("Grid1", row-3, 1);
ws.Cells(row,3).Value2 = Grid.GetCellText("Grid1", row-3, 2);
ws.Cells(row,4).Value2 = Grid.GetCellText("Grid1", row-3, 3);
ws.Cells(row,5).Value2 = Grid.GetCellText("Grid1", row-3, 4);
ws.Cells(row,6).Value2 = Grid.GetCellText("Grid1", row-3, 5);
ws.Cells(row,7).Value2 = Grid.GetCellText("Grid1", row-3, 6);
ws.Cells(row,8).Value2 = Grid.GetCellText("Grid1", row-3, 7);
ws.Cells(row,9).Value2 = Grid.GetCellText("Grid1", row-3, 8);
ws.Cells(row,10).Value2 = Grid.GetCellText("Grid1", row-3,9);
ws.Cells(row,11).Value2 = Grid.GetCellText("Grid1", row-3, 10);
ws.Cells(row,12).Value2 = Grid.GetCellText("Grid1", row-3, 11);
ws.Cells(row,13).Value2 = Grid.GetCellText("Grid1", row-3, 12);
end
شكل اخراج المشروع
تعليق
-
ارفع لنا الملف مفتوح لنستفيد
تعليق
-
حاضر استاذ ربيع ............... المشكلة الان في ادماج الصورة في ملف اكسل باستعمال الدالةluacomتعليق
-
موفق ... ارفع الملف الذي تعمل عليه
و لاحظ الخلل العام في هذه البرمجة ... انت حاليا تصدر عملك الى ملف ايكسل مؤقت
بمعنى هل بإمكانك الان بعد التصدير إرسال الملف الناتج طبعا لا اذن العمل لا يتم في مصنف الايكسل الرئيسي للبرنامج
و الا أين هو تخزين المعلومات هذا من جهة من جهة أخرى التصدير من الجريد الى الايكسل لا يستدعي كل هذه الأكواد ؟؟؟ فقد يكون يأبسط من ذلك
و العكس من الايكسل الى الجريد نفس الشيء قضية التنسيق للجداول و الخلايا و الخط أصلا تكون في ورقة الايكسل التي نريد التصدير اليها
و الغائبة تماما في مشروعك .... اعتبر كلامي تحفيز لأنه في نهاية المطاف ستمتلك المعلومة ان شاء الله
تعليق
-
-
معذرة استاذ على التاخيرالمشاركة الأصلية بواسطة ربيع مشاهدة المشاركةفي انتظارك استاذ
شغلتنا اموالنا و اهلونا ...............هذا الملف ........فيه كود لالعاء الخانات الفارغة لم يعمل بشكل صحيح ؟؟؟
كما اود ادراج صورة في ملف الاكسل
تحياتي
الملف المفتوح :
http://www.mediafire.com/download/2i...s/to+excel.apzتعليق
تعليق