حذف منو از بالای صفحه اکسل و فول اسکرین کامل

[hamed bhiraee]

کسی نمیتونه جواب این سوال رو بده ؟

[shamsololama]

با درود فراوان

این که می فرمائید دوباره منو به حالت اولیه برمیگرده و بخاطر اینه که در 2007 و یا 2010 هست و برای اینکه این مشکل رو حل کنی باید این کد رو تو زیر روال ریسایز می تونید بزارید دیگه با این کار از حال فول اسکرین و منو ها بر نمی گرده یعنی به این صورت

Private Sub Workbook_WindowResize(ByVal Wn As Window)
With Application
.DisplayFullScreen = True
.CommandBars("worksheet menu bar").Enabled = False
End With


End Sub

[intro]

سلام بادرود فراوان
جناب شمس اللما ممكنه به من هم ايميل بفرماييد نتونستم دانلود كنم
ممنون ميشم

[shamsololama]

سلام بادرود فراوان
جناب شمس اللما ممكنه به من هم ايميل بفرماييد نتونستم دانلود كنم
ممنون ميشم

من چیزی برای دانلود نگذاشته بودم همین کدی هست که نوشتم این رو می تونی کپی کنی تو صفحه وی بی اکسلی که داری


Private Sub Workbook_WindowResize(ByVal Wn As Window)
With Application
.DisplayFullScreen = True
.CommandBars("worksheet menu bar").Enabled = False
End With

[ar133212]

تشکر فراوان عالی بود .

[mehr2245]

با سلام آفيس من 2007 هست و اين كد را در جاهاي مختلف امتحان كردم منوهاش حذف نمي شوند فقط كد فول اسكرين عمل مي كند آن هم موقع ماگزيمم كردن فعال ميشه بايد چكار كرد لطفا راهنمايي بفرماييد.[hr]
سلام
براي اين كه كسي نتواند وارد اكسل آپشن شود چه كدي را بايد بنويسيم؟

[naser1357]

سلام
اساتید ارجمند
وقتی این کد را اعمال کنیم تمام فایل های اکسل دیگر نیز با همین فرمت ظاهر می شوند ایا این امکان وجود ندارد که فقط یک فایل که مدنظر ماست در حالت فول اسکرین بماند و وقتی فایل دیگری را باز کنیم حالت اولیه و اصلی اکسل ظاهر شود؟

بعد اگر بخواهیم سکوریتی را انیبل کنیم باید به حالت سابق برگردیم ایا امکان نیست منویی در خود سلول ها تعبیه شود تا کاربر با کلیک روی ان به قسمت فعال نمودن سکوریتی منتقل شود
و یا منویی برای رفرش کردن برنامه مورد نظر ایجاد شود؟

[abootorab]

سلام
اساتید ارجمند
وقتی این کد را اعمال کنیم تمام فایل های اکسل دیگر نیز با همین فرمت ظاهر می شوند ایا این امکان وجود ندارد که فقط یک فایل که مدنظر ماست در حالت فول اسکرین بماند و وقتی فایل دیگری را باز کنیم حالت اولیه و اصلی اکسل ظاهر شود؟

بعد اگر بخواهیم سکوریتی را انیبل کنیم باید به حالت سابق برگردیم ایا امکان نیست منویی در خود سلول ها تعبیه شود تا کاربر با کلیک روی ان به قسمت فعال نمودن سکوریتی منتقل شود
و یا منویی برای رفرش کردن برنامه مورد نظر ایجاد شود؟

با درود
دوست عزیز مخفی نمودن منوها جهت ورژن های مختلف اکسل متفاوت است، شما از چه ورژنی استفاده میکنید و کدام کد رو استفاده کردین؟؟

[naser1357]

چگ.نه می توان اتوماتیک یوزر و پسورد مشترکین ویژه سایت را به اکسل منتقل نمود طوری که کاربران از همان یوزر و پسوردشان بتوانند وارد فایل اکسل شوند؟

[ali.b]

سلام از این کد استفاده کنید

Private Sub Workbook_Open()Set myRange = ActiveSheet
   Application.ScreenUpdating = False
   Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",False)"
   Application.DisplayFormulaBar = False
   Application.DisplayStatusBar = Not Application.DisplayStatusBar
   ActiveWindow.DisplayWorkbookTabs = False
 
   Dim wbBook As Workbook
   Dim wsSheet As Worksheet
 
   Set wbBook = ThisWorkbook
 
   For Each wsSheet In wbBook.Worksheets
      If Not wsSheet.Name = "Blank" Then wsSheet.Activate
         With ActiveWindow
            .DisplayHeadings = False
            .DisplayGridlines = False
            ActiveSheet.Protect DrawingObjects:=True, Contents:=True,    Scenarios:=True, AllowFormattingRows:=True
            'ActiveSheet.EnableSelection = xlUnlockedCells
         End With
   Next wsSheet
 
myRange.Select
 

End Sub