Ali Mohamed Ali

بارك الله فيك أستاذنا الكبير بن علية وهذا كود لإظهار الأعمدة والصفوف المخفية اظهار الأعمدة المخفية.xlsm

لابد من اضافة microsoft Date and time picker controls 6.0(sp6) سأرسل لحضرتك ملفين مع الصور للتوضيح لابد من عمل كوبى لهذان الملفين ولصقهما فى C:\Windows\System32 ثم تشغل cmd ثم نسخ هذه الروابط كما هو موضح بالصورة رقم 4 م تنسخ احد الروابط التالية حسب نسخة الةندوز لديك 32 او 64 regsvr32.exe C:\Windows\SysWOW64\MSCOMCT2.OCX regsvr32.exe C:\Windows\System32\MSCOMCT2.OCX ثم اتبعى خطوات باقى الصور ولكم منى جزيل الشكر Tutorial.rar

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

تمت الإجابة فى المشاركة الأخرى User Form.xlsm

يعمل لمدة معينة فقط

جرب كده تقرير غياب.xlsm

تفضل هذا البرنامج http://www.mediafire.com/file/ib3nx236ooqeeb9/Pharmacy.rar

بارك الله فيك وجعله فى ميزان حسناتك وأعمالك

ممتاز بارك الله فيك ودائما الى الأمام

تفضل اخى الكريم باللغة العربية والإنجليزية كمان تفقيط عربى وانجليزى.xlsm

بعد اذن الأستاذ بكار هذا موقع اخر http://www.mediafire.com/file/rwsccws0d3tmauq/learn+functions+in+excel+2007.rar بارك الله فيكم جميعا

ممكن تجرب هذا تقرير غياب.xlsx

لا تصلح فى هذه الحالة وليست بدقة المعادلة المقدمة لك سابقا

تفضل أخى 2018شيت مدرستى - الصف الرابع-.xls

جرب هذا aaaaa.rar

ملف رائع بارك الله فيك أستاذ شوقى وجعله فى ميزان حسناتك وعود حميد أخى الكريم وحشتنا كتير

ممكن تتبع وتجربة هذا https://www.officena.net/ib/topic/38355-مكتبة-الموقع-مُجمِع-البيانات-للاكسيل-excel-data-collector/

موضوع رائع بارك الله فيك أستاذى وأخى أحمد وكل الشكر لأستاذنا الكبير المدير محمد طاهر له منا كل الحب والإحترام جعله الله فى ميزان حسناتك

جزاك الله كل الخير وبارك الله فيك وجعله فى ميزان حسناتك عمل رائع وممتاز -أحسنت أدخلك الله جنات الفردوس الأعلى وغفر لك ونور قبرك بالإيمان

وعليكم السلام هذه محاولة بالمعادلات الى ان يتم تدخ الأساتذة بعمل كود لك ولكن لابد من فتح جميع الملفات فى وقت واحد حتى يتم نقل البيانات بكل دقة جميع الملفات بملف واحد باستخدام المعادلات في اكسل.rar

تفضل أخى الكريم TES T2.xlsx

بارك الله فيك أستاذنا زيزو كود ممتاز جعله الله فى ميزان حسناتك ولا اثراء الموضوع اليك كود أخر كشف حساب عميل حسب المخزن - Copy.xlsm

وعليكم السلام لو من الأفضل ارسال الملف نفسه للعمل عليه

هذا الكود الستاذ ياسر خليل يفى بالغرض Sub Test() Dim ws As Worksheet Dim sh As Worksheet Dim lr As Long Set ws = Sheets("DATA") Set sh = Sheets("AS") Application.ScreenUpdating = False sh.Range("B3:U1026").ClearContents lr = sh.Cells(Rows.Count, 1).End(xlUp).Row + 2 ws.Range("B7:U1026").SpecialCells(xlCellTypeVisible).Copy sh.Range("B" & lr).PasteSpecial xlPasteValues On Error Resume Next sh.Columns(5).Replace 0, "" sh.Columns(5).SpecialCells(xlCellTypeBlanks).EntireRow.Delete On Error GoTo 0 Application.CutCopyMode = False Application.ScreenUpdating = False End Sub

تفضلى المعادلة =IF(B2="","",IF(AND(B2>=50,B2<=59),B2*200,IF(B2="","",IF(AND(B2>=100,B2<=109),B2*220,IF(B2="","",IF(AND(B2>=30,B2<=39),B2*140,""))))))