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

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

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

الاخوة الافاضل ارجو من خبراء هذا المنتدي العريق ان يخبروني عندما تتحقق عده شروط في خلايا مختلفه ان يقوم بتسجيل هذه الخلايا في ورقه عمل اخري بمعني اذا توافرت A2 = 5 , E3=9 اذا توافرت هذه الشروط يقوم بتسجيلهم في ورقه عمل اخري طبعا مع امكانيه تغيير الشروط وتغيير عدد الخلايا التي بها الشروط

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

مثلا اذا كانت B اكبر من 4 و o اكبر من 90 يتم تسجيل الصف التي تحتويه الخليتين في شيت 2 وهكذا كلما تحققت الشروط يتم تسجيلها 

وياريت استطيع تحديد الخلايا التي تحقق الشروط والشروط نفسها اقوم بتغييرها بسهوله

 ومرفق الملف

  • Like 1
قام بنشر

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

الاستاذ الفاضل Concord مرحبا بك بالمنتدي

ولك مني دعوة طيبة بتغيير اسمك الي اللغة العربية طبقا لسياسة المنتدي

ثانيا اضغط الملف باحد برامج الضغط مثل برنامج ( winRAR ) حتي تستطيع رفعه على المنتدي

وهذا رابط فيديو للاستاذ حماده عمر لكيفية رفع ملف على المنتدي

http://www.officena....showtopic=44625

قام بنشر

ارفقت الملف 

وناتي للمطلوب 

اريد انه مثلا اذا كانت القيمه في O3 اكبر من او تساوي 0.95 و E3 اكبر من او تساوي 3 

وايضا مثلا O9 اكبر من او تساوي 0.95  و E9 اكبر من او تساوي 4

يتم تسجيل بعض خلايا الصف التي احددها بشيت مختلف

وكلما تحققت الشروط يتم تجيل تلك الصفوف بالشيت 

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

test book.rar

قام بنشر

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

الاخ الفاضل محمد حماده

على حسب فهمي لطلبك

انا عملت لك مثال على خلية واحده بس

اذا كانت دي طلبك يمكنك تطبيقها على الباقي

الخلية باللون لااصفر في Sheet2 هي ناتج الخلية A3 في شيت Sheet1 بناء على شرطك الي انت وضعته

وهو اذا كانت القيمه في O3 اكبر من او تساوي 0.95 و E3 اكبر من او تساوي 3

اتمني من الله ان يكون هذا طلبك

test book_w.rar

قام بنشر

اخي العزيز وليد 

جزاك الله خيرا وبارك الله لك في اهلك ومالك وولدك

 

وهذا قريب من طلبي ولكن 

اذا توافرت الشروط كما حدث لا يتم كتابه الخليه A3 فقط في sheet 2 ولكني اريد كتابه اكثر من خليه 

مثلا يتم كتابه الخليه A3 و E3  و O3 في sheet 2 

وهنلك ملحوظة اخري 

لا يتم مسحها بعد ذلك 

ولكن يتم تسجيلها واذا تكررت الشروط مرة اخري يتم كتابتها وتسجيلها في الصف الذي يليه 

 

اعلم اني تعبتك معي 

ولكن لك مني دعوة بظهر الغيب 

واتمني ان تتحملني قليلا

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

اخي العزيز اعتقد ان طلبي لن يكون عن طريق معادله ولكن اعتقد ان لابد له من كود

 

واعتقد ان هذا قد يكون جزء منه ولكن معلوماتي قليله في مجال الاكود ولا ادي ايكفي هذا الكود ام لا وما الذي يحتاجه من اضافات لكي يعمل

 
If Range("G4") > 3 And Range("M4") >= 15 And Range("Q4") < -0.999 Then
 
NewAlert.WriteLog ("Sell:" & Range("A4") & ">>" & Range("B4") & vbNewLine & "==========================================")
تم تعديل بواسطه محمد حماده
قام بنشر

اخي العزيز وليد 

جزاك الله خيرا وبارك الله لك في اهلك ومالك وولدك

 

وهذا قريب من طلبي ولكن 

اذا توافرت الشروط كما حدث لا يتم كتابه الخليه A3 فقط في sheet 2 ولكني اريد كتابه اكثر من خليه 

مثلا يتم كتابه الخليه A3 و E3  و O3 في sheet 2 

وهنلك ملحوظة اخري 

لا يتم مسحها بعد ذلك 

ولكن يتم تسجيلها واذا تكررت الشروط مرة اخري يتم كتابتها وتسجيلها في الصف الذي يليه 

 

اعلم اني تعبتك معي 

ولكن لك مني دعوة بظهر الغيب 

واتمني ان تتحملني قليلا

 

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

الاخ الفاضل محمد حماده

جزاك الله كل خير لدعاءك الطيب ولك مثله اضعاف مضاعفه

لا يمكن تثبيت نتيجة عن طريق المعادلات ولا اعلمها عن طريق الاكواد

انتظر احد الاستاذة الافاضل يمكن ان يكون لديه حل

لك كل تحيه وتقدير

قام بنشر

يا خبراء هذا المنتدي 

ارجو منكم الوصول لحل 

انا فعلا محتاج للكود ده ضروري جدا

واذا امكن ممكن احد الخبراء يخبرني ايميله حتي اتواصل مع وافهمه بالضبط ما اريد

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