ماجد القثمي

للرفع وشكرا

للرفع وشكرا

للرفع مع الشكر

للرفع .. وشكرا

للرفع .. وشكرا

السلام عليكم استاذ زيزو في نفس الملف الذي ساعدتني فيه قمت بتغيير بسيط بحيث اضفت يوزر فورم لاختيار التاريخ من Mothview بدل من كومبو بوكس , لكن عند اختيار التاريخ لا تتغير بقية التكستبوكسز؟ كذلك اردت انه بمجرد تشغيل اليوزرفورم تكون قيمه التكست بوكس الرئيسي تسوي تاريخ اليوم و تتغير تلقائيا بقية التكستبوكسز بنفس الفكرة لكن لم انجح في ذلك. ارفقت لك الملف به التعديلات الاخيرة هل تستطيع المساعدة جزيت خيرا appo2.rar

السلام عليكم اخي زيزو شكرا جزيلا على ردك نعم تم تنفيذ المطلوب لكن عندي استفسار اذا سمحت انا عملت نفس الكود بالضبط ولكن كان يعطيني (error) والا انت كتبت نفس الكود ولكن فقط اضفت له السطر (On Error Resume Next) في بداية الكود هل هذا السطر هو ما حل المشكله ام انك اضفت شي اخر وشكرا مرة اخرى

للرفع وشكرا

السلام عليكم ورحمة الله وبركاته اخواني الاعزاء لدي طلب مساعده في يوزر فورم بسيط يتكون من عدة تكست بوكس فوق بعضها البعض وفي منتصفها كومبوبوكس في قائمته تكون تواريخ مرتبه بالتسلسل وماخوذة من سورس في شيت داخل الملف مثل تاريخ قبل امس ثم تاريخ امس ثم تاريخ اليوم ثم تاريخ غدا ثم تاريخ بعد غد الفكرة: عند بدء اليوزر فوم تكون قيمه هذا الكومبوبوكس تساوي تاريخ اليوم بالصيغه (format(date, ddd,dd,mmm,yyyy) المطلوب بمجرد تغير قيمة الكومبوبكس واختيار اي تاريخ من قائمته, يتم تغيير بقية التكستبوكسز اليا و تباعا حسب قيمة التاريخ في الكومبوبوكس بحيث يكون التكست بوكس 1 يساوي التاريخ الموجود في كومبوبوكس زائد يوم.. والتكست بوس الذي يليله زائد يومين وهكذا ارجو ان يكون وفقت فالشرح فالفكرة بسيط ولكن حاول شرحها الملف مرفق وبه اليوزر فورم وشكرا appo.rar

ارجو التكرم بالمساعدة للرفع وشكرا

ارجو التكرم بالمساعدة للرفع وشكرا

ارجو التكرم بالمساعدة للرفع وشكرا

ارجو التكرم بالمساعدة للرفع وشكرا

للرفع وشكرا

للرفع وشكرا

السلام عليكم ورحمة الله وبركاته اخواني الاعزاء لدي طلب مساعده في يوزر فورم بسيط يتكون من عدة تكست بوكس فوق بعضها البعض وفي منتصفها كومبوبوكس في قائمته تكون تواريخ مرتبه بالتسلسل وماخوذة من سورس في شيت داخل الملف مثل تاريخ قبل امس ثم تاريخ امس ثم تاريخ اليوم ثم تاريخ غدا ثم تاريخ بعد غد الفكرة: عند بدء اليوزر فوم تكون قيمه هذا الكومبوبوكس تساوي تاريخ اليوم بالصيغه (format(date, ddd,dd,mmm,yyyy) المطلوب بمجرد تغير قيمة الكومبوبكس واختيار اي تاريخ من قائمته, يتم تغيير بقية التكستبوكسز اليا و تباعا حسب قيمة التاريخ في الكومبوبوكس بحيث يكون التكست بوكس 1 يساوي التاريخ الموجود في كومبوبوكس زائد يوم.. والتكست بوس الذي يليله زائد يومين وهكذا استصعب علي حتى الان تغيير قيمة التكست بوكس رقم 1 بحيث تزيد قيمتة تلقئيا بمعدل يوم عن التاريخ الموجود في الكومبوبكس ارجو ان يكون وفقت فالشرح فالفكرة بسيط ولكن حاول شرحها الملف مرفق وبه اليوزر فورم وشكرا appo.rar

وعليكم السلام استاذ طلعت شكرا لمساعدتك نعم هذه هي النتيجه المطلوبة شكرا جزيلا

السلام عليكم اريد اضافه كلمة kg بعد الرقم في داخل تكست بوكس الموجود في اليوزر فورم بحيث عندما اكتب الرقم 14 مثلا في التكست بوكس, تلقائيا تظهر الكلمة kg بعد الرقم لتصبح (14kg) حاولت استخدام الكود التالي Private Sub TextBox1_Change() TextBox1.Value = Format(TextBox1.Value, "# ""Kg""") End Sub لكن النتيجه عندما اكتب 14 في التكست بوكس تظهر هكذا (1kg4) تظهر الكلمه kg بعدالخانة الاولى بمجرد كتابة الرقم الاول من العدد 14 مثلا في حال كان العدد احادي الخانة لا مشكله مع الكود ولكن خانتين او اكثر تظهر المشكله ارجوا ا لمساعدة وشكرا Book1.rar

شكرا استاذ ياسر هذا الكود هو ما اريده بالضبط الف شكر

السلام عليكم ورحمة الله وبركاته أخواني الاعزاء ارجو الافادة لدي ملف اكسل, في احدى الشيتات يوجد قاعدة بينات لمشتركين(الاسم العمر العنوان) اريد ان يتحدث العمر لكل مشترك بحيث تضاف قيمة(1) مثلا في تاريخ 30 ديسمبر كل سنه لكي يزيد عمر المشترك ويصبح محدث سنوايا الكود الذي احاول كتابته هو: for each cl in ... if date = (30 december)from every year))then array.value= array.valuue+1 end if end sub استصعب علي كتابة الشرط وهو اذا كان تاريخ اليوم هو ال30 من ديسمبر من كل سنة, اذا اضافه قيمة واحد على قيمة الخليه(العمر) شكرا لم سلفا

الحمدلله يا اخوان توصلت للحل VBA لا يستطيع تمييز التواريخ في صيغه تيكست حتى يعمل بحث بالتاريخ او اي عمليات اخرى لذى يجب تحويل التكست الى صيغه تاريخ معروفه وهي dd/mm/yyyy وذلك باستخدام الخاصيه text to columnتقوم بتقسيم التاريخ المكتوب بشكل تكست على اعمدة عمود يوم وعمود شهر وعمود سنه ثم تجميعها مره اخرى في عمود اخر بصيغه dd/mm/yyyy لتمكن من تطبيق العمليات على التاريخ بهذه الداله qعمود السنه p عمود الشهر oعمود اليوم =Date(Q2,Month(1&O2),P2))

السلام عليكم تم عمل مرفق مثال للتوضيح شكرا مقارنه التواريخ.rar

السلام عليكم حاولت كثيرا ان اجد كود يقوم بالبحث في العمود a الموجود به تواريخ قديمه .. والبحث اذا كان التاريخ قد مضى عليه 6 اشهر من اليوم(يوم تنفيذ الكود) يقوم بنسخه الى مكان اخر علما بأن العمود مضبوط على (Category=(general .. والتواريخ مكتوبه بالفورميولا التالية (Thu, March 24, 2016) حاولت وضع الكود التالي ولكن لم يعمل>> (cl) متغير الاسطر في العمود A: "If cl.value < Format(Date -180, "ddd, mmmm dd, yyyy") Then" وكذلك الكود: "If cl.value < Format(Date, "ddd, mmmm dd, yyyy") -180 Then" وفالمقابل عمل الكود التالي بشكل جيد فقط عندما غيرت Category العمو A من general الى date: " If cl.value < Date - 180 Then" وانا لا اريد تغير Category .. اريدها ان تبقى General فمالحل؟؟ وشكرا

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

السلام عليكم لدي ملف يقوم بعمليه بحث وتعديل عن طريق ListBox قام به احد الاساتذه الافاضل في هذا المنتدى سوالي هو عند البحث عن اسم معين عن طريق الليستبوكس ولنفرض ان هذا الاسم يتكرر اكثر من مرة في الشيت تظهر النتائج كالتالي اول سطر في البوكس هي ثاني نتيجه بحث (اي ثاني اسم متكرر موجود فالشيت) وثاني سطر تعطي ثالث نتيجه (اي ثالث اسم متكرر قي الشيت) وهكذا حتى اخر الليستبوكس واخر سطر فالبوكس يقوم باظهار اول نتيجه (اول اسم متكرر في الشيت) لماذا لا يتم عرض النتائج في الليست بوكس بالترتيب كما هي موجوده في الشيت من الاول الى الاخير لماذا يتم عرضها من النتيجه 2 الى الاخير ومن ثم وضع النتيجه الاولى اخر الليست الملف مرفق وبه الاستفسار واضح في حاله البحث عن اسم (محمد طاهر) ك مثال وشكرا بحث في قائمه باكثر من متغير.rar