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

اخفاء عمود عن طريق الكود


Al Nada

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

السلام عليكم

مشاركة بسيطة

Private Sub CommandButton1_Click()

If Me.CommandButton1.Caption = "ÇÎÝÇÁ ÎØæØ ÇáÔÈßÉ" Then

ActiveWindow.DisplayGridlines = False

Columns(1).EntireColumn.Hidden = True

Me.CommandButton1.Caption = "ÚÑÖ ÎØæØ ÇáÔÈßÉ"

Else

ActiveWindow.DisplayGridlines = True

Columns(1).EntireColumn.Hidden = False

Me.CommandButton1.Caption = "ÇÎÝÇÁ ÎØæØ ÇáÔÈßÉ"

End If

End Sub

HideGridlines.rar

رابط هذا التعليق
شارك

  • 9 months later...

السلام عليكم ورحمة الله وبركاته

الاستاذ الخبير والمبدع دائماً ابو اسامه مشكور على الكود

لي اضافه او بالاصح طلب صغير لو يكون على صلاحيه مثلا الاخفاء طبيعي اما الاظهار يلزم

ادخال رقم سري اذا كان صحيح يظهر العمود واذا كان خطاء لايظهر العمود ولك مني كل الشكر والتقدير

اخوك أبو نصار

رابط هذا التعليق
شارك

بعد إذن الاخ الاستاذ / ابو اسامة العينبوسي

الاخ / alidroos

تفضل هذا الحل بالمرفق

و أرجو من الله أن يكون هذا هو طلبك

وكلمة السر هي 123

و السلام عليكم و رحمة الله و بركاته

Hide HaNcOcK.rar

رابط هذا التعليق
شارك

السلام عليكم ورحمة الله وبركاته

الاستاذ الخبير والمبدع دائماً ابو اسامه مشكور على الكود

لي اضافه او بالاصح طلب صغير لو يكون على صلاحيه مثلا الاخفاء طبيعي اما الاظهار يلزم

ادخال رقم سري اذا كان صحيح يظهر العمود واذا كان خطاء لايظهر العمود ولك مني كل الشكر والتقدير

اخوك أبو نصار

السلام عليكم ورحمة الله وبركاته

الاخ / alidroos

أرجو من الله أن يكون هذا هو طلبك

رابط هذا التعليق
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information