احمدزمان

السلام عليكم و رحمة الله وبركاته جزاك الله خيرا اخي عبدالله

‏الاثنين‏ 13‏/7‏/1435هـ الموافق ‏12‏/5‏/2014م السلام عليكم و رحمة الله وبركاته اخي الفاضل من وجهة نظري الشخصية و الشخصية فقط انته معقد الموضوع وهو اسهل من كذا بكثير ممكن نحط السنة كلها في ورقة وحدة ونطلع منها النتائج باستخدام التصفية و باستخدام الدوال نستخرج البيانات الى ورقة المخطط السنوي شاهد الموضوع http://www.officena.net/ib/index.php?showtopic=50707 و اقتراح في المرفق الفرع.rar

السلام عليكم و رحمة الله اخي عمرو اسعد الله صباحك بكل خير و جزاك الله خيرا على الفائدة

السلام عليكم اخي wisam جزاك الله خيرا

و عليكم السلام و رحمة الله وبركاته هو الملف اصلا معمول على اكسل 2003 XP انا نزلت الملف على 2003 ويندو XP وجربته شغال لاادري اين المشكلة ===== في شاشة الخطأ اضغط debug و انسخ السطر الأصفر الذي به الخطا وضعه هنا لنعرف اين المشكلة

السلام عليكم و رحمة الله وبركاته اخواني الأفاضل: رجب جاويش و: احمد البحيري اعظم الله أجركم و أحسن الله عزاءكم و الهمكم الصبر و السلوان انا لله و انا اليه راجعون

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

السلام عليكم طيب لية مايكون المسح بزر اسهل و افضل هوه بعد عدة ثواني ممكن بس طويل ومشكبن لكن لازم نحدد وقت البداية و بعدين نجمع علية الثواني

السلام عليكم اخي الكريم ضع سؤالك و طلبك في موضوع جديد و ان شاء الله ستجد حل او اكثر لما تريد

السلام عليكم و رحمة الله وبركاته الأساتذة الأفاضل الف × الف × الف ×الف مبروك هي ترقية استحقيتموها بجدارة فأنتم خير الناس لأنكم أنفع الناس للناس جزاكم الله كل خير

اخي العزيز انا الكود الآن يشتغل معي على جهازين استخدمهما باستمرار عمل معي على جهاز XP و جهاز ويندوز7

العفو بارك الله فيك

السلام عليكم وجزاك الله خيرا

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

السلام عليكم و رحمة الله وبركاته اخي ابو تميم الكود شغال معي على كل الأوفيس آسف على التأخير ولكن كنت مسافر في الخارج و اليوم عدة من السفر

السلام عليكم و رحمة الله وبركاته اخي محمود الشريف جزاك الله كل خير تجميعه رائعة جدا تغني عن الكثير من البحث وتختصر الوقت بارك الله فيك

السلام عليكم بعد التحية للجميع وخاصة استاذنا القدير عبدالله باقشير للبحث عن اي جزء من الكلمات عدل كود البحث كما يلي Private Sub TextBox1_Change() Dim LastRow As Long LastRow = Range("c65535").End(xlUp).Row If ActiveSheet.TextBox1.Text <> "" Then Selection.AutoFilter Range("$A$7:$c$" & LastRow).AutoFilter Field:=3, Criteria1:= _ "*" & ActiveSheet.TextBox1.Text & "*", Operator:=xlOr Else Range("$A$7:$c$" & LastRow).AutoFilter Field:=3 End If End Sub Private Sub TextBox2_Change() Dim LastRow As Long LastRow = Range("d65535").End(xlUp).Row If ActiveSheet.TextBox2.Text <> "" Then Selection.AutoFilter Range("$A$7:$d$" & LastRow).AutoFilter Field:=4, Criteria1:= _ "*" & ActiveSheet.TextBox2.Text & "*", Operator:=xlOr Else Range("$A$7:$d$" & LastRow).AutoFilter Field:=4 End If End Sub

السلام عليكم و رحمة الله وبركاته http://www.officena.net/ib/index.php?showtopic=50900&p=313662

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

وما هو دور "تربل اكس" في الموضوع

السلام عليكم و رحمة الله وبركاته اخي الحبيب و استاذ الدوال و التركيبات الصعبة = الخالدي خالص الحب و التقدير لكم وشكرا على كريم مرورك جزاك الله خيرا حليت معضلة رغم انني ماني فاهم حاجة في LOOKUP و ايه الي صار ولكن فعلا حل مشكلة عويصة لم توقع ان لها حل جزاك الله الف الف الف خير

لللأسف اعتقد يجب تعديل كود الترحيل بملأ الفراغات

السلام عليكم و رحمة الله وبركاته اختنا ام عبدالله جزاكي الله خيرا حل رائع