تعامل مع بيانات الصورة في الاكسل.xlsx

[حليم ناصر]

سلام عليكم 

سادة الاعضاء كيف حالكم اتمنى ان تكونو في احسن حال ان شاء الله

لي طلب اتمنى ان اجد عندكم الجواب

وهو كيفية التعامل مع بيانات وثيقة مصور وموضوعة في الاكسل 

وشرح المطلوب في المرفق

اتمنى ان اجد عندكم الجواب 

وجزاكم الله خيرا

                           

 

 

تعامل مع بيانات الصورة في الاكسل.rar

[أبو إيمان]

السلام عليكم 

بعد إذن الأساتذة الأفاضل

 

هذا من ثمرة ما تعلمته هنا  ...................  لعله المطلوب

فقط ما عليك سوى كتابة رقم الوثيقة

الفاتورة 001.rar

[حليم ناصر]

سلام عليكم

اخي ابو ايمان شكرا لك على الرد السريع وبارك الله لك في علمك

الطريقة التي قدمتها لي اعرف عنها لكن اللى اقصده هو ملئ تلك الخانات باللون الازرق كما هي بالمرفق التالي بعد ان قمت بنسخ الوثيقة في صفحة الاكسل و حملتها في هذا الملف 

وشكرا لكم   وجزاكم الله خيرا

تعامل مع بيانات الصورة في الاكسل 2.rar

[ياسر خليل أبو البراء]

طلبك غير واضح أخي الحبيب

عموما حسب ما فهمت تفضل المرفق

TestThis.rar

[حليم ناصر]

سلام عليكم 

اخي  YasserKhalil اشكرك على الرد 

وللتوضيح  ارفع اليكم الملف به توضيح اكثر

وجزاكم الله خيرا

والسلام عليكم ورحمة الله تعالى وبركاته

 

التوضيح.rar

[أبو إيمان]

انا ارسلت على حسب ما فهمت وأرجو التوضيح اكثر من ذلك

[حليم ناصر]

سلام عليكم

لقد رفعت لكم الملف الاخير وفيه توضيح اكثر اتمنى ان تراه 

وشكرا

وجزاكم الله خيرا

[شوقي ربيع]

السلام عليكم

لم افهم لمذا تريد عمل ذلك على Shapes برغم ان عملها على الخلايا اسهل وانسب

على العموم هذا كود للكتابة في  Shapes الخاصة برقم الوثيقة كمثال يمكنك اعتماده على بقية الخانات بنفس الطريقة

Feuil2.Shapes("Shapes هنا اسم ").TextFrame2.TextRange.Characters.Text = "هنا تكتب النتيجة"

[ياسر خليل أبو البراء]

 

السلام عليكم

لم افهم لمذا تريد عمل ذلك على Shapes برغم ان عملها على الخلايا اسهل وانسب

على العموم هذا كود للكتابة في  Shapes الخاصة برقم الوثيقة كمثال يمكنك اعتماده على بقية الخانات بنفس الطريقة

Feuil2.Shapes("Shapes هنا اسم ").TextFrame2.TextRange.Characters.Text = "هنا تكتب النتيجة"

ممكن لو فيها رزالة ترفق ملف أخي شوقي لتطبيق تلك النقطة ، فهي جديدة بالنسبة لي

بارك الله فيك أخي الحبيب شوقي ربيع (المتمكن)

[شوقي ربيع]

 

 

السلام عليكم

لم افهم لمذا تريد عمل ذلك على Shapes برغم ان عملها على الخلايا اسهل وانسب

على العموم هذا كود للكتابة في  Shapes الخاصة برقم الوثيقة كمثال يمكنك اعتماده على بقية الخانات بنفس الطريقة

Feuil2.Shapes("Shapes هنا اسم ").TextFrame2.TextRange.Characters.Text = "هنا تكتب النتيجة"

ممكن لو فيها رزالة ترفق ملف أخي شوقي لتطبيق تلك النقطة ، فهي جديدة بالنسبة لي

بارك الله فيك أخي الحبيب شوقي ربيع (المتمكن)

 

من عنيا الاثنين

مثال بسيط ينقل محتوي الخلايا الي Shapes

Option Explicit

Sub test()
Dim sh As Worksheet: Set sh = Feuil1
Dim i As Byte

For i = 1 To 4
sh.Shapes("Rectangle " & i).TextFrame2.TextRange.Characters.Text = sh.Range("A" & i)
Next

End Sub

تحياتي للجميع

TEST.rar

[وائل احمد المصري]

 

السلام عليكم

لم افهم لمذا تريد عمل ذلك على Shapes برغم ان عملها على الخلايا اسهل وانسب

على العموم هذا كود للكتابة في  Shapes الخاصة برقم الوثيقة كمثال يمكنك اعتماده على بقية الخانات بنفس الطريقة

Feuil2.Shapes("Shapes هنا اسم ").TextFrame2.TextRange.Characters.Text = "هنا تكتب النتيجة"

اتفق تماما مع اخي شوقي مالهدف من الكتابة على الشيب

[ياسر خليل أبو البراء]

تسلم عينيك يا متمكن .. معلومة جميلة ورائعة بارك الله فيك

[حليم ناصر]

سلام عليكم

اخي شوقي شكرا على الرد والمعلومة 

اقول  لما وضعتها في Shapes 

اولا تلك الوثيقة يتم كتابة فيها يدويا انا احببت ان اضعها في الجهاز وبالضبط في الاكسل وملئها  من

اجهاز فوضعت تلك الخانات في الاماكن التي يجب ان تمتلئ  مثل ماشرحت

وان كان هناك طريقة اخرى لملئ تلك الوثيقة المصور فاتمنى ان اعرف كيف 

وجزاكم الله خيرا

وسلام عليكم

[شوقي ربيع]

سلام عليكم

اخي شوقي شكرا على الرد والمعلومة 

اقول  لما وضعتها في Shapes 

اولا تلك الوثيقة يتم كتابة فيها يدويا انا احببت ان اضعها في الجهاز وبالضبط في الاكسل وملئها  من

اجهاز فوضعت تلك الخانات في الاماكن التي يجب ان تمتلئ  مثل ماشرحت

وان كان هناك طريقة اخرى لملئ تلك الوثيقة المصور فاتمنى ان اعرف كيف 

وجزاكم الله خيرا

وسلام عليكم

كل ما عليك هو تصميم شيت تكون فيه خلايا الادخالات متطابقة مع الوثيقة لديك

ثم قم بالطباعة على الوثيقة نفسها

تحياتي

[أبو إيمان]

تسلم أستاذ شوقي

يتم التصميم  والكتابة داخل الخلايا العادية وتنسيقها بحيث تتناسب مع الفاتورة ويمكن الطباعة على ورقة بيضاء بحجم الفاتورة للتجربة والمطابقة ومن ثم الطباعة على الفاتورة

[حليم ناصر]

بعد بحث والسؤال تحصلت على معلومة ووضفتها في الملف الذي طرحته عليكم وخرجت بالنتيجة التي كنت ابحث عنها 

 

وانا الان اعرضها عليكم عسى ان تفيد احد   ان شاء الله

 

تبقى مشكلة هي لما اكتب بالعربية في صفحة قاعدة البيانات  عبارة ( شيك رقم  99/2014 ) لا تنتقل الى الوثيقة بنفس الصيغة  اتمنى ان اجد الجواب لهذه المشكلة

وجزاكم الله خيرا 

 

والسلام عليكم ورحمة الله تعالى وبركاته

حل مشكلة تعامل مع بيانات الصورة في الاكسل 2.rar

[وائل احمد المصري]

بعد بحث والسؤال تحصلت على معلومة ووضفتها في الملف الذي طرحته عليكم وخرجت بالنتيجة التي كنت ابحث عنها 

 

وانا الان اعرضها عليكم عسى ان تفيد احد   ان شاء الله

 

تبقى مشكلة هي لما اكتب بالعربية في صفحة قاعدة البيانات  عبارة ( شيك رقم  99/2014 ) لا تنتقل الى الوثيقة بنفس الصيغة  اتمنى ان اجد الجواب لهذه المشكلة

وجزاكم الله خيرا 

 

والسلام عليكم ورحمة الله تعالى وبركاته

بعد اذن الاساتذة الكبار

اخي الكريم برجاء الاطلاع والافادة

تم تغطية رقم الصورة بشيب ثم تم وضع تكست فورم فوقة

حل مشكلة تعامل مع بيانات الصورة في الاكسل 2.rar

تم تعديل نوفمبر 1, 2014 بواسطه وائل احمد المصري

[أبو إيمان]

أنا أرى أن تشق على نفسك 

والحل  بسيط قام قام بعرضه أشتاذنا شوقي