Этот макрос удаляет сетку, заголовки
|
Sub ФорматированиеБланка() ' ' ФорматированиеБланка Macro ' Macro recorded 27.11.1999 by Vladimir Billig ' Этот макрос удаляет сетку, заголовки строк и столбцов, строку формул, 'показ нулей в ячейках рабочего листа. Выделяет подходящим фоном рабочую 'область бланка. В данном примере: A1:K56 Range("A1:K56").Select With Selection.Interior .ColorIndex = 15 'серый цвет .Pattern = xlSolid .PatternColorIndex = xlAutomatic End With With ActiveWindow .DisplayGridlines = False 'сетка .DisplayHeadings = False 'заголовки .DisplayFormulas = False 'показ формул .DisplayZeros = False 'отображение нулей End With Application.DisplayStatusBar = False 'строка статуса End Sub |
| Листинг 6.18. |
| Закрыть окно |
