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: [email protected]
From: [email protected]
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: [email protected]
From: [email protected]
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: [email protected]
From: [email protected]
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
