-
Posts
216 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو ابوعلي الحبيب
-
لسلام عليكم ورحمة الله وبركاته امل المساعدة كيف اكرر الكود هذا في جميع الاوراق لاني سوف نسخ الورقة الشيت كل فترة وصعب ادخاله يدوي كل مرة Private Sub Worksheet_Change(ByVal Target As Range) Application.ScreenUpdating = False ActiveWorkbook.Worksheets("ورقة1").Sort.SortFields.Clear ActiveWorkbook.Worksheets("ورقة1").Sort.SortFields.Add Key:=Range("k6"), _ SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal With ActiveWorkbook.Worksheets("ورقة1").Sort .SetRange Range("b6:m23") .Header = xlNo .MatchCase = False .Orientation = xlTopToBottom .SortMethod = xlPinYin .Apply End With End Sub عمل الكود يرتب التاريخ حسب الاقدم مع العلم ان ThisWorkbook ملي بالاكواد مثل كود النسخ الاحتياطي ورسالة ترحيب وغيرها ولكم الشكر تكرار الكود في جميع الاوراق.rar
-
ساعدوني يا افاضل مطلوب نسخ الشيت بعد اختيار رقم للشيت من الفورم مرة واحدة الملف جاهز امل المساعدة ولكم الشكر والتقدير مرفق ملف فيه الشرح والفورم جاهز وفيه الاكواد ويحتاج تعديل بسيط بحيث ينسخ الشيت بعد اختيار رقم من الفورم يعني ادخل رقم او اسم الشيت واضغط اضافة مطلوب نسخ الشيت بعد اختيار رقم للشيت من الفورم مرة واحدة.rar
-
الاخوه الأحباب السلام عليكم ورحمة الله كل عام والجميع بخير بمناسبة شهر رمضان المبارك أعاده الله علينا وعليكم والأمة الإسلامية بالخير والبركات عند ادخال اوستعراض النسبة المئوية 1% او 2.5% او 3.5% او5% لا تظهر بالشكل الصحيح عن طريق الفورم تكون اكبر من المطلوب وشكرا لكم جميعًا مقدما مشكلة النسبة المئوية في الخلية والتكست.rar