حسن أبو علي

شكرا لك أستاذي الفاضل

سؤالي كيف يمكنني جعل الكود يأخذ البيانات من الخلية. في الكود التالي (الذي كتبه الأستاذ الفاضل ياسر خليل أبو البراء) جزاه الله خيرا Sub ConvertToVlaues() Dim Rng As Range Set Rng = Union(Range("C:H"), Range("I:N")) Application.ScreenUpdating = False Rng.Copy Rng.PasteSpecial xlPasteValues Range("A1").Select Application.CutCopyMode = False Application.ScreenUpdating = True End Sub نجد أن الأعمدة محددة ، بحيث يقوم بتثبيت بيانات هذه الأعمدة. لكن هل يمكن أن أضع عناوين الأعمدة في خلية في الورقة، ويقوم الكود بأخذ الأسماء الأعمدة من هناك. وذلك حتى أستطيع تغيير أسماء الأعمدة في الخلية بدون الدخول إلى الكود، أو حتى أضع صيغة معينة لوضع عناوين الأعمدة. وشكرا. Pupils' Names.zip

هل من الممكن جعل الزر الاول ينفذ الكود استنادا إلى قيمة في خلية معينة. بمعنى أن الزر الأول الآن يقوم بتثبيت القيم في الأعمدة المذكورة في الكود. هل من الممكن جعل الكود يأخذ بيانات الأعمدة من خلية معنية. بحيث أنني لو قمت بكتابة الأعمدة في الخلية يقوم الزر بتثبيت قيم هذه الأعمدة، وإذا غيرت أسماء الأعمدة في الخلية يقوم الكود بأخذ المعطيات الجديدة. وبهذه الطريقة استغني عند اخفاء الأزرار الكثيرة.

شكرا لك يا أستاذنا الفاضل. لكن هناك مشكلة. وهي: لو أنني قمت بتنفيذ الزر الأول، وثم أغلقت الملف وثم قمت بفتحه مرة أخرى، فإن جميع الأزرار تكون مختفية.

السلام عليكم ورحمة الله وبركاته. في الملف المرفق، في صفحة (الإدخالات) هناك أربعة أزرار. أريد أن تكون جميع الأزرار غير متاحة إلا الزر الأول. وعند النقر على الزر الأول يقوم بتنفيذ التعليمات البرمجية، ويصبح هو نفسه غير متاح، ويصبح الزر الثاني هو المتاح. ونفس الشيء مع الزر الثاني، عند النقر عليه، يصبح هو نفسه غير متاح بعد تنفيذ الأوامر البرمجية، ويصبح الزر الثالث هو المتاح. وهكذا. وشكرا للجميع, وتقبل الله من الجميع الصيام والقيام Pupils' Names.zip

جزاك الله خيرا. ماشاء الله تبارك الله ، بارك الله لك في علمك وعملك وعمرك. وإن شاء الله تفرح يوم القيامة، بنتيجة هذه الإجابة.

وعليكم السلام ورحمة الله وبركاته. شكرا لك على اهتمامك. وأسأل الله أن يبارك لك في عمرك ووقتك. والفكرة التي ذكرتها فكرة صحيحة. لكن المشكلة عندي بيانات ما يتجاوز 600 عمود، وفي في العمود الواحد ما يقارب خمسمائة صف، ويتم تحويل عدة أعمدة يوميا مرتين على مدى شهر كامل (أي تحويل الصيغ إلى قيم) والذي ليس عنده إلمام بإكسل يمكن يفسد الملف، ولذلك أنا محتاج أعطيه طريقة سهلة يقوم بالنقر على زر مثلا، فيتم التحويل. على نطاقات محدة كل يوم. وشكرا لك على الإهتمام.

أرفقت الملف في المرة الماضية بضغط وبدون ضغط، لكن ....... وماشاء الله علي رد علي الأستاذ (ياسر خليل أبو البراء) الذي قرأت له الكثير من المشاركات الرائعة. الآن أرفقت الملف وأريد : في صفحة الإدخالات أريد النقر على زر فيقوم بمسح الصيغ من عمود سي إلى عمود اتش (C:H) واستبدالها بالبيانات الموجودة فيها، بحيث إذا تغيرت البيانات في المصدر لا تتغير هنا. وأريد بنفس الزر بطريقة ما، عمل ذلك في نطاق آخر من I إلى N وأيضا في نطاقات أخرى. وشكرا لك morfq.zip

السلام عليكم ورحمة الله وبركاته. عندي ملف، فيه نتائج وبيانات استخرجتها بالدوال والصيغ. ما الطريقة لكي أقوم بتثبيت البيانات وذلك بمسح الصيغ ولصق البيانات مثلا في الملف المرفق. في صفحة الإدخالات أريد النقر على زر فيقوم بمسح الصيغ من عمود سي إلى عمود اتش (C:H) واستبدالها بالبيانات الموجودة فيها، بحيث إلا تغير بيانات المصدر لا تتغير هنا. وأريد بنفس الزر بطريقة ما، عمل ذلك في نطاق آخر من I إلى N وأيضا في نطاقات أخرى. أتمنى المساعدة وشكرا

وعليكم السلام ورحمة الله وبركاته. بعد دمج المراسلات في الورد وحفظ ملف الناتج، فإن هذا الملف مستقل تماما، وليس فيه أكواد، ولذلك لا يمكن جعله يتحدث تلقائيا مع تغيير البيانات في اكسل. الحل المعروف، أن تحتفظ بملف دمج المراسلات، وتعيد بناء الملف من جديد بعد تحديث بيانات الأكسل. والحل الآخر: أن تكون الشهادات في ملف الاكسل في ورقة أخرى في نفس ملف الاكسل، فعند ذلك تجد البيانات تتحدث تلقائيا، وأيضا يمكنك ضم البيانات في أكثر من ورقة.