المساعد الشخصي الرقمي

مشاهدة النسخة كاملة : تمرير أثركتابي بالعربية للايكسل


ثامر أبو بلقيس
26-03-2015, 01:39 AM
السلام عليكم ورحمة الله وبركاته

اليوم لديك مشروع ما , هذا المشروع مقترن بورقة ايكسل
كأن يكون مثلا كتابة بيانات في عناصر الاوتوبلاي لتنقل هذه البيانات
للايكسل
نأخذ مثالا مبسطا
لدينا أنبوت بحيث لما نكتب اسم الطالب فيه باللغة العربية
ينقل هذا الاثر الكتابي مباشرة لورقة الايكسل و ليكن في الخلية a1 على سبيل المثال
--------
افتح مشروعا جديدا
نضع فيه انبوت1 وليكن Input1
نؤشر أو نعلم أو نحدد الإضافة LuaCom
نضع زر فيه نزرع الكود
local sFilePath = _DesktopFolder.."\\belkiss.xls"
if sFilePath then
File.Delete(sFilePath, false, false, false);
local Excel=luacom.CreateObject("Excel.Application")
local wBook=luacom.CreateObject("Excel.Document")
Excel.Visible = true;
local wBook=Excel.Workbooks:Add()
wBook.Application.DisplayAlerts = False
local wSheet = wBook.Worksheets(1)
wSheet:Activate()
wSheet:Activate()
v = Input.GetText("Input1");
d=""
for t=1,String.Length(v)do
result = String.Asc(String.Mid(v, t, t));
d=d.."CHAR("..result..")&"
end
wSheet.Cells(1,1).Formula= "="..String.Mid(d, 1, String.Length(d)-1)
wBook:SaveAs(sFilePath)
end
باعتبار أني أعمل على الاوفيس 2003 لذلك لعلك لاحظت اللاحقة xls تعامل مع اللاحقة حسب الاصدرات الملائمة
لديك
الان لنكتب في الانبوت أثر عربي أو مدمج بالارقام أو بلغة أخرى
ترى هل انتقل هذا المحتوى الى ورقة الايكسل؟
نلتقي بود :abc_138:

فرح صالحي
26-03-2015, 02:10 PM
ترى هل انتقل هذا المحتوى الى ورقة الايكسل؟
==========================================
مع الاسف الجواب هو لا
استعمل اوفيس 2013
سأرفع لك الملف المفتوح عندما يرتفع التدفق
موفق بإذن الله ...:abc_152: لك مني أجمل تحية .

abohmam
26-03-2015, 10:25 PM
جزاك الله خيرا أخى ثامر

أفكار وتجارب رائعة

سوف أنتظر ردك على الأخ فرح لأنى استخدم ايضا أوفيس 2013

ساتابع معكم النتائج ان شاء الله

ثامر أبو بلقيس
26-03-2015, 11:20 PM
تجربة على الاوفيس 2010
http://www.7ozn.net/do.php?downex=1216146
لااملك 2013 يمكنكما التجربة
بالتوفيق

أبو يوسف
27-03-2015, 11:56 AM
بارك الله فيك أخانا أبا بلقيس على المتابعه

ثامر أبو بلقيس
27-03-2015, 04:02 PM
كانت هاته محاولة
سيعتبر هذا المبحث في خبر كان و بأكثر سلاسة و أريحية إن شاء الله
فقط مسألة ترتيب و اختيار الحلول الأحسن كتابة و قراءة و بحثا في ملفات الايكسل

فرح صالحي
27-03-2015, 11:24 PM
السلام عليكم ورحمة الله وبركاته
اخي ثامر انت تستعمل اوفيس عربي وقد يكون الونديوز ايضا عربي
وانا استعمل ونديوز فرنسي واوفيس فرنسي قد يكون اختلاف اللغة له دور في النتيجة .
من خلال ردك الاخير استشعرت مرارة عدم النجاح التام في المحاولة ، لا تيأس اخي واصل المحاولة بعد المحاولة لا تدري متى يأتي الالهام .
اتمنى من الله لك التوفيق .
تقبل مروري والسلام عليكم ورحمة الله وبركاته .
:abc_152:

ثامر أبو بلقيس
27-03-2015, 11:50 PM
لا عليك أخي ابق معي في تواصل
---
لا أملك تلك الامكانيات لاته فعلا الوينداوز و الاوفيس كما قلت
لكن كنت أطمع برفع نتائج التجربة حتى و إني الان تخليت تماما عن الفكرة و الاضافة المنكمشة؟؟
--
أخي نقسم عملنا على ثلاثة أجزاء
01 - القراءة
02 - الكتابة
03 - البحث
ماهي لاحقة الايكسل في الاوفيس 2013 ؟

فرح صالحي
28-03-2015, 12:24 AM
السلام عليكم ورحمة الله وبركاته
xlsx

ثامر أبو بلقيس
28-03-2015, 12:38 AM
نبدأ بالبحث في الايكسل

شوف نتيجة البحث عن اسمك " فرح صالحي" و ماهي النتيجة
http://www.abc4web.net/vb/showthread.php?p=280258#post280258

فرح صالحي
28-03-2015, 12:40 AM
http://www.foxpic.com/V0TsnM0f.png

فرح صالحي
30-03-2015, 10:46 AM
السلام عليكم ورحمة الله وبركاته
1. اعتذر على هذا التاخير في الرد لان حاسوبي في المنزل تعطب وبقيت بدون حاسوب
2. الصورة في المشاركة السابقة تعتبر لاغية .
3. كما قلت سابقا انا استعمل اوفيس 2013 لكن للتثبت من التجربة جيدا وضعت اوفيس 2003 عربي اللغة بدون ان ازيل اوفيس 2013 وهذا التداخل قد يكون هو العائق امام النتيجة التي سأعرضها لاحقا لذلك ردي هذا ومحاولتي هذه ارجوا ان لا تعتبرها ذات مصداقية فقط اردت ان اعرضها من باب الاعلام فقط لكي ابرئي نفسي من تهمة التجاهل اذا خطرت بخاطر اي كان .
وهذه صورة نتيجة التجربة
http://www.foxpic.com/V1RQsx9a.png
وعندما حاولت اغلاق النافذة التي ظهرت في الصورة السابقة ظهرت لي النافذة الآتية
http://www.foxpic.com/V1rosVCL.png
ولكم سديد النظر لاستخلاص ما يمكن استخلاصه
موفق بإذن الله ..:abc_152:. لك مني أجمل تحية .

ثامر أبو بلقيس
15-05-2015, 06:39 PM
عذرا على التأخر في الرد لكن بإذن الله وبمجرد
إعادة اصلاح خطوط الانترنت في البيت و الانتهاء من فترة الامتحانات سأرفع لك برنامج تسيير مؤسسة تربوية
باستغلال الايكسل و الاوتوبلاي و سيعقبها إن شاء الله برنامج تسيير المخزونات و البيع باستعمال الباركود
باستعمال الايكسل و الاتوبلاي سأفي بوعدي إن شاء الله لايصال هاته التقنيات للانعطاف و الدفع أكثر
إلى جوانب مفيدة في البرمجة تقديري :abc_138:

أبو صخر
16-05-2015, 03:35 PM
شـكــ وبارك الله فيك ـــرا لك ... لك مني أجمل تحية .