كود الحفاظ علي عدد الصفوف

[osama elmorsy]

السلام عليكم اساتذتي الكرام

سؤالي هو هل يوجد كود يحافظ علي عدد صفوف جدول معين بحيث اذا تم مسح صف بواسطة كود اخر يحافظ الجدول علي عدد الصفوف او يضيف صف اخر بشكل تلقائي . ... تـــــم رفــع الملـــف

نموذج الإدخال والبحث والتعديل والحذف (1).xlsm

[أحمد يوسف]

وعليكم السلام دائماً وأبداً لابد من احتواء اى مشاركة على ملف يدعمها والا ستكون المشاركة ناقصة وغير كاملة ونبهنا كثير جداً على هذا الأمر ... على كل حال يمكنك استخدام هذا الكود

Sub StopDeleteRowCols()
Dim xBarControl As CommandBarControl
For Each xBarControl In Application.CommandBars.FindControls(ID:=293)
    xBarControl.Enabled = False
Next
For Each xBarControl In Application.CommandBars.FindControls(ID:=294)
    xBarControl.Enabled = False
Next
End Sub