عبدالسلام ابوالعوافي

كلمة المرور تضغها في الخلية Z1 وجرب

Public ss As Integer ضع هذا السطر في الاعلي

ActiveWorkbook.Application.DisplayFullScreen = False ActiveWorkbook.Application.DisplayFormulaBar = True Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",true)" '---------------------------------------------- ActiveWindow.SelectedSheets.PrintPreview '-------------------------------------------------- Application.ExecuteExcel4Macro "SHOW.TOOLBAR(""Ribbon"",false)" ActiveWorkbook.Application.DisplayFullScreen = True ActiveWorkbook.Application.DisplayFormulaBar = False With ActiveWindow .DisplayHeadings = False .DisplayVerticalScrollBar = True .DisplayHorizontalScrollBar = True .DisplayWorkbookTabs = False End With

Private Sub ComboCityID_AfterUpdate() Me.Requery End Sub

رائع

جرب المعادلة علي خلايا غير مدموجة

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

شكرا استاذ محمد