Ali Mohamed Ali

أحسنت استاذ سليم معادلة ممتازة

تفضل تم الغاء الحماية نهائيا للتمكن من وضع كود التايمر وكود الحروف الكبيرة-واعتقد ايضا ان ملفك به فيروس timer.xlsm

وعليكم السلام لابد من رفع ملف وشرح المطلوب عليه بكل دقة حتى تتمكن الأساتذة من المساعدة-فلا يمكن العمل على التخمين !!!

أحسنت أستاذ سليم بارك الله فيك وزادك الله من فضله

معادلة ممتازة استاذى الكريم بارك الله فيك

وعليكم السلام -يمكنك استخدام هذا الكود لحذف جميع صفحات الملف الفارغة Sub RemoveBlankSheets_AllWorkbooks() Dim wb As Workbook Dim sht As Worksheet Application.ScreenUpdating = False Application.DisplayAlerts = False For Each wb In Application.Workbooks For Each sht In wb.Worksheets If WorksheetFunction.CountA(sht.Cells) = 0 And _ wb.Sheets.Count > 1 Then sht.Delete Next sht Next wb Application.DisplayAlerts = True Application.ScreenUpdating = True End Sub تفضل-فمثلا لو عندك بارتشن D عليك بعمل فولدر داخله وسميه Data او غير كما تشاء في الكود-تفضل وفى الخلية D3 يكون موجود اسم الملف Sub Test() Dim FP As String, FN As String FP = "D:\Data\" FN = Range("D3").Value ActiveWorkbook.SaveAs Filename:=FP & FN & ".xls" End Sub

وعليكم السلام ...... تفضل مستحقات.xlsx

وعليكم السلام-تفضل دمج جميع صفحات الملف فى صفحة واحدة.xlsm

أحسنت أستاذ مجدى بارك الله فيك

وعليكم السلام تفضل لك ما طلبت بيان.xlsm

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

أحسنت أستاذ مجدى بارك الله فيك

وعليكم السلام كان عليك من البداية استخدام خاصية البحث في المنتدى تفضل https://www.officena.net/ib/topic/50240-برنامج-حضانة/?tab=comments#comment-307830 https://www.officena.net/ib/files/file/259-سجل-قيد-التلاميذ-لجميع-المراحل-رياض-أطفال-ابتدائي-إعدادي/ https://www.officena.net/ib/topic/80536-برنامج-تسجيل-بيانات-لروضة-أطفال-الاصدار-الثاني/

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

اهلا بك في المنتدى عليك برفع الكود داخل ملف

السلام عليكم اخى الكريم-كان عليك من البداية رفع ملف لما تطلب ولكم يمكنك وضع هذا الكود داخل حدث التكست بوكس Private Sub Text1_KeyPress(KeyAscii As Integer) If (KeyAscii >= 0) Or (KeyAscii <= 127) = False Then keycode = vbNullString End Sub

تفضل https://www.officena.net/ib/topic/42985-برنامج-الحسابات-العامة-والضرائب-excel-vba/?tab=comments#comment-247636

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

تفضل مكرر.xlsx

وعليكم السلام اهلا بك في المنتدى عليك برفع الملف لمعاينة المشكلة عن قرب

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

تفضل تم الحل والإجابة المطلوبة من قبل الأستاذ أبو نور ولاحظ التغيير فى الملف بنفسك إيصال قبض وسند صرف.xlsm

وعليكم السلام أين الملف ؟!!!!!!!!!!!!!!

لا يمكن افضل من هذا -فكان عليك من البداية ضبط الملف قبل رفعه بالمشاركة نظام البصمة2.xlsx

أحسنت استاذ عبد اللطيف بارك الله فيك وزادك الله من فضله ورحم الله والديك