بسم الله الرحمن الرحيم

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


النتائج المعروضة

اولا الطريقة العادية والاغلب يستخدمها وهي كما موضح بالكود

TextBox1.Text = Range("A1")

وهنا يتم جلب البيانات عادي ودائما ما يخطئ في عرض التواريخ ويحتاج الى عمل Format وتحديد التنسيق المراد عرضه على التكست

الطريقة الثانية وهي جلب قيمة الخلية

TextBox2.Text = Range("A1").Value

وهنا يتم جلب قيمة الخلية وأيضا يحتاج الى ضبط الفورمات لعرض التواريخ كما نحتاج

الطريقة الثالثة وهي عرض القيمة الفعلية للخلية بدون تنسيقات

TextBox3.Text = Range("A1").Value2

وهنا يتم جلب بيانات القيمة الرقمية أو القيمة الفعلية بعيد عن التنسيقات بمعنى ان لديك خليه وبها تنسيق تاريخ ميلادي او هجري فيتم جلب القيمة الرقمية مثال لدينا تاريخ هجري 04/05/1438
يتم عرضه هكذا 42767

الطريقة الرابعة وهي عرض القيمة كنصية

TextBox4.Text = Range("A1").Text

وهي طريقة جيدة لجلب البيانات بالتنسيقات كما هي بشكلها بدون اي تغيير خصوصا مع من يعانو من عكس التواريخ واختلاف ما بالخلية عما بالتكست وهي تتعامل مع بيانات الخلية كنص


الطريقة الخامسة عرض التعليق الموجود على الخلية

TextBox5.Text = Range("A1").Comment.Text

وهنا يتم جلب التعليق الموجود على الخلية المحددة ويحتاجه البعض في اعمالهم لتوضيح نقاط معينه وبعض الملاحظات

الطريقة السادسة وهي جلب المعادلة الخاصة بالخلية المحددة

TextBox6.Text = Range("A1").Formula

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

للتحميل
لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
مع تحياتي
ياسر العربي