قم بفتح محرر البيسك 
واذهب للكود التالى بورقة العمل الرئيسية : 
 
Sheets(iSSheets).ScrollArea = "A1:I23"
واجعلة كالتالى :
Sheets(iSSheets).ScrollArea = "A1:IV65536"
 
 
ثم قم بعد ذلك بالحفظ واغلق الملف وافتحة مرة اخرى 
ستجد انك تستطيع إضافة اسطر وخلايا او اعمدة كما تريد 
 
ولو اردت أظهار الاعمدة فذلك من خلال القائمة Tools ثم Options ثم اختار التبويب View  
ثم اضف علامة صح على كل من الاتى : 
Row & Column 
Outline Symbols 
ثم اضغط OK 
 
لم افهم هذا السؤال جيدا 
 
 
 
لا تدخل ولا حاجة الغرض كما قلت لك من قبل هو الاستفادة 
وانا وغيرى نستفيد من اراء بعضنا 
 
 
على العموم الاصدار التالى سيلبى جميع اغراضك 
 
تحياتى,,,