اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

الردود الموصى بها

قام بنشر

هذا هو الكود وان وجد غيره يؤدي الغرض مافي مانع


Sub TahriryTerm2()

' تحريرى_ترم_ثانى Macro

' Macro recorded 29/12/2011 by ragab gaweesh

'

Application.ScreenUpdating = False

ActiveSheet.Unprotect

    Columns("j:ce").Select

    Selection.EntireColumn.Hidden = False

    Columns("j:bt").Select

    Selection.EntireColumn.Hidden = True

	 Columns("cf:dc").Select

    Selection.EntireColumn.Hidden = True

    Range("A10:A13").Select

	 ActiveSheet.Protect

	 Application.ScreenUpdating = True

End Sub

انشئ حساب جديد او قم بتسجيل دخولك لتتمكن من اضافه تعليق جديد

يجب ان تكون عضوا لدينا لتتمكن من التعليق

انشئ حساب جديد

سجل حسابك الجديد لدينا في الموقع بمنتهي السهوله .

سجل حساب جديد

تسجيل دخول

هل تمتلك حساب بالفعل ؟ سجل دخولك من هنا.

سجل دخولك الان
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information