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

خالد المصـــــــــــرى

03 عضو مميز
  • Posts

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

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

  • Days Won

    1

كل منشورات العضو خالد المصـــــــــــرى

  1. @محمد هشام. تمام بس فيه تعديل انه يحفظ كل الاوراق في ملف pdf واحد ثانيا يتحفظ ف ي نفس مكان الملف وثالثا يرجع f7 الى 1 بعد الحفظ
  2. المطلوب تحويل ورقة لجان 4 الى pdf المصنف1.xlsb
  3. 20244شيت مدرستى الصف السادس.xlsb
  4. Private Sub Workbook_Open() Dim MachineName As String MachineName = Environ("COMPUTERNAME") If MachineName <> "اسم_الجهاز_المسموح" Then MsgBox "لا يمكنك فتح هذا الملف على هذا الجهاز.", vbCritical ThisWorkbook.Close End If End Sub
  5. تم الحل جربي خضرتكمشكلة المجموع.xlsb
  6. Sub VeryHiddenSelectedSheets() Dim wks As Worksheet On Error GoTo ErrorHandler For Each wks In ActiveWindow.SelectedSheets wks.Visible = xlSheetVeryHidden Next Exit Sub ErrorHandler: MsgBox "A workbook must contain at least one visible worksheet.", vbOKOnly, "Unable to Hide Worksheets" End Sub
  7. عمل كود لاخفاء شريط اوراق العمل كود.xlsx
  8. عمل زر خروج برسالة هتريد الحفظ بنعم او لا زر.xlsx
  9. اخى الكريم العمل ده لوجه الله وللاستفادة للجميع بدون مقابل واخذت سجلات المحاضر لاستفادة الجميع لو عايزنى امسحهم موافق
  10. قطع الارتباط الموجود في ملف الاكسل سجلات0.xlsb
×
×
  • اضف...

Important Information