اذهب الي المحتوي
أوفيسنا

الردود الموصى بها

قام بنشر

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

اريد كل ما ادخله في الخليه a1 يجمع في b1 يعني ادلت في الخليه a1 رقم 100 ينكتب في b1 100 وعندما ادخل رقماً اخر في الخليه a1 مثل 200 يصبح

العدد في الخليه b1 300

اسف على الاطاله وعلى الشرح الممل ... امل ان اجد المعادله لهذا الطلب

قام بنشر

الشكر لكم اخ أيسم إبراهيم noon2 على ردكم الكريم ... الاخ ايسم ليس هذا ما اقصده اقصد ان اي عدد ادخله في الخليه a1 يجمع مع العدد الذي في الخليه b1

الاخ noon2 فلملف للأسف فاضي

قام بنشر

تحيه لك يالمشرفنا ... وكل عام وانت بخير ....

حملت الملف المرفق مع ردكم الكريم ولكن لم اجد فيه سوا رقمين دون اي معادله عليهم امل إن كان هناك صيغة داله له امل كتابتها...

مع الشكر لمن قرأ رسالتي ومن قام بالرد عليها ....

قام بنشر

السلام عليكم

الأخ العزيز انظر الملف المرفق من الأستاذ : نزار به ما طلبت و لكن بأكواد الفيجوال بيسك كل ما عليك هو ملء الخانات بالبيانات التي تريد

عمل رائع يا أستاذ نزار """"""" جزاك الله خيرا

أيسم إبراهيم

171235861.gif

قام بنشر (معدل)

الاخ sft

مرحبا بك عضوا جديد بالمنتدى بين اخوانك

اخى انت تريد تنفيذ طلبك عن طريق الصيغ

وفى حالتك هذه لايمكن تنفيذ ذلك لوجود قاعدة مهمة فى الاكسيل تسمى ( المرجع المعاد )

وهى لا تسمح للصيغة ان تشمل عنوان الخلية المتضمنة بالصيغة

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

وهنا يكون الحل بما يسمى بالاكواد

وهى مثل صيغ المعادلات ولكنها لا تظهر لك فى جداول اكسيل

ولكنها تمدنا بما تعجز عنه الصيغ

فقدم لك الاخ NooN2 الحل يإ ستخدام الاكود احسنت اخى NooN2

ولذلك ظننت انه فارغ لعدم وجود صيغ ظاهرة لك

ولكن اخى sft ادخل اى رقم فى الخلية A1

ستجد انه يتم جمعه على ما هو موجود فى الخلية B1

اعد التجربة

ثم قدم الاخ نزار سليمان عيد نفس الفكرة فى ملف

ولم تلحظ ذلك ايضا ارجو التجربة

ملحوظة الى الاخ aysam ::

نرجو الحياد اخى فنحن نشجع الاعضاء الجدد انظر ملف الاخ NooN2 الذى ادرج فبل ملف الاخ نزار سليمان عيد

مع تحياتى

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

السلام عليكم جميعا

الأستاذ: عمر ( أبو تامر ) كل عام و أنتم بخير لنتمتع بإطلالتك العطرة

لقد أسأت فهمي فربما أكون أنا أيضا لم ألحظ ملف الأستاذ : NOON2 فأنا أعرفه و أعرف أنه ربما يكون في القريب أحد عمالقة المنتدى

فلي معه تجربة سابقة قدم لي فيها عملا مبدعا.

على العموم أنا آسف للأستاذ : NOON2 إن كان شعر أنني هضمت حقه.

تحياتي : أيسم إبراهيم

171235861.gif

قام بنشر

شكرا اخى أيسم إبراهيم على حسن فطنتكم

مع تمنياتى بالنجاح والتوفيق فى هذه الايام المباركة

قام بنشر

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

بالصيغة التالية ...

اذهب الي الورقه التي تريد التطبيق عليها ثم افتح محرر البيسك او اضغط زر ALT + F11

الصق الكود التالي

كود

Private Sub Worksheet_Change(ByVal Target As Range)

On Error Resume Next

If Target.Column = 1 Then

Cells(Target.Row, 2) = Target.Value + Cells(Target.Row, 2)

End If

End Sub

ولله الحمد والمنه .... اشكركم على تواصلكم ومنكم نتعلم كل جديد

والى لقاء

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information