Lengkapnya : Application.DisplayFullScreen = True Worksheets("sheet1").ScrollArea = "$A$1:$I$77" With ActiveWindow .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False .DisplayHeadings = True 'False Range("A1:I1").Select .Zoom = True End With With Worksheets("sheet1") Range("J1").Select Range(Selection, Selection.End(xlToRight)).Select Selection.EntireColumn.ColumnWidth = 0 Range("A78").Select Range(Selection, Selection.End(xlDown)).Select Selection.EntireRow.RowHeight = 0 End With
To: belajar-excel@yahoogroups.com From: jkss...@hotmail.com Date: Mon, 27 Feb 2012 07:50:12 +0000 Subject: RE: [belajar-excel] Macro-lock zoom-out dan page width vie default untuk zoom sesuai area : Range("A1:I1").Select ActiveWindow.Zoom = True To: belajar-excel@yahoogroups.com From: jkss...@hotmail.com Date: Mon, 27 Feb 2012 07:47:09 +0000 Subject: RE: [belajar-excel] Macro-lock zoom-out dan page width vie default With ActiveWindow .DisplayHorizontalScrollBar = False .DisplayVerticalScrollBar = False .DisplayWorkbookTabs = False .DisplayHeadings = False End With To: belajar-excel@yahoogroups.com From: ql...@inbox.com Date: Sun, 26 Feb 2012 10:18:52 -0800 Subject: [belajar-excel] Macro-lock zoom-out dan page width vie default Be Exceler Apakah VBA code untuk: 1. mengunci zoom-out dan ketika file ini dibuka width view default-nya hanya dari cell A1:I1 (VBA) 2. menyembunyikan row & column header (VBA) 3. menyembunyikan horizontal & vertical scroll bar (VBA) 4. menyembunyikan sheet tab (VBA) 5. pada file ini column header hanya sampai I1, bagaimana membuat row header hanya sampai A77 (VBA) br andre