اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

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

قام بنشر

جزاكم الله خيرا على ما تقدمون

 

حاولت مرارا عمل الكود لكن لم يمجح معي الأمر

 

 

فالرجاء ممكن يستطيع المساعدة

 

و اجره على الله

 

الفورم جاهز ينقصني الكود

 

طبعا الورقة المرفقة هي نموذج لما احتاجه في مشروعي ( كبير الحجم )بنفس الخلايا

 

 

 

 

 

فورم تعديل وادراج.rar

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

جزيت خرا هذا ما اريده بالضبط

 

لكن عندما نسحت الكود الى ملفي الاصلي

 

في البحث اجد كل الارقام البريدية لكن بمجرد اختيار واحد منها ينقلني الى صفحة اخرى مغايرة

 

على العموم جزيت خيرا ان شاء الله

 

ممكن تشرح لي هذا فقط

 

لمل لم يتم تعريف الورقة باسمها   اعضاء المركز

 

ورقة1.Activate
III = 2
Do Until ورقة1.Cells(III, "w").Text = ""
    If ComboBox1.Text = ورقة1.Cells(III, "w").Text Then
تم تعديل بواسطه عبد الله بولنوار

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

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

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

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

Important Information