اذهب الي المحتوي
أوفيسنا

محمد عبدالسلام

04 عضو فضي
  • Posts

    694
  • تاريخ الانضمام

  • تاريخ اخر زياره

كل منشورات العضو محمد عبدالسلام

  1. لوسمحت عايز لما اضغط على متحرك يفتح الفورم و ليس في الخلية
  2. اخي جزاك الله خيرا على اهتمامك بالموضوع لوسمحت عايز لما اضغط على يفتح الفورم ليس في الخلية
  3. في الملف المرفق يوجد فيه كود لزر الأوامر متحرك في عمود C كيفية اقوم بفتح الفورم عند الضغط على زر المتحرك ك فتح الفورم بي زر الأوامر متحرك.xlsm
  4. ممتاز رئع أستاذ سليم بارك الله فيك هل يمكن تخصيص هذا زر لي اليوزرفورم لما اضغط على زر المتحرك يظهر اليوزرفورم
  5. ماشاء الله عمل رائع جزاك الله خيرا ووفقك الله لكل خير
  6. السلام عليكم ورحمة الله وبركاته اخواني الكرام لطلب في هدا الموضوع القديم أريد ضبط صفحة الطباعة وتجاه اوفقي وجزاكم الله خيرا
  7. السلام عليكم ورحمة الله وبركاته تحية طيبة هده معادلة الترقيم التلقائي مع مراعاة الفلترة و الحذف | دمج دوال SubTotal, CountA, IF المرجو جزاكم الله خير تحويل هده معادلة الكود =IF(B2="";"";SUBTOTAL(3;$B$2:B2))
  8. جزاك الله خيرا اخي الكريم لو سمحت اخي اريد اضافة الحل في الكود الأول في الخلية E3 لي ان في الكود الأول فيه ٢ اكواد يقوم بعمل نسخةاحتطياطية والأخر يقوم بعمل نسخة حسب طلب العمل نقدي اواجل
  9. السلام عليكم ورحمة الله المرجو المساعدة هدالكود يقوم بعمل نسخة احتياطية فاتورة اريدالما اقوم بعمل نسخة احطياطية الملف يتم تحويل التاريخ في الخلية E3 لقيم ثابتة saveDate = Date Dim saveTime saveTime = time Dim formatTime As String formatTime = Format(saveTime, "hh.MM.ss") Dim formatDate As String formatDate = Format(saveDate, "DD - MM - YYYY") Application.DisplayAlerts = False If ActiveSheet.Range("F5").Value = "نقدي" Then ThisWorkbook.SaveCopyAs Filename:="E:\Backup\نقدي\" & Range("E5").Value & " _ " & Replace(Format(Range("E3"), "yyyy/mm/dd"), "/", "_") & ".xlsm" Else If ActiveSheet.Range("F5").Value = "اجل" Then ThisWorkbook.SaveCopyAs Filename:="E:\Backup\اجل\" & Range("E5").Value & " _ " & Replace(Format(Range("E3"), "yyyy/mm/dd"), "/", "_") & ".xlsm" End If: End If ' ' Sheets("invoice3").Select [G3] = [G3] + 1 ThisWorkbook.Save 'Application.ScreenUpdating = False End Sub يتم تحويل التاريخ والمعادلات في الخلية E3 لقيم ثابتة.xlsx
  10. السلام عليكم ورحمة الله وبركاته طلب كود عدم تغير هدا الخيار 1page par face الاخيار اخر في شيت الطباعة الطباعة.xlsx
  11. السلام عليكم ورحمة الله وبركاته المرجو المساعدة في خيار في طباعة
  12. طلب كود السماح المستخدم بتعديل و اضافة بيانات جديدة في صفحة ومنع المستخدم من حدف بيانات في عمود B /D كود السماح المستخدم بتعديل ومنع من الحدف.xlsm
×
×
  • اضف...

Important Information