Написать макрос на открытие листа (книги):
Sub Столбцы()
Columns("C:J").Select
Range("J1").Activate
Selection.EntireColumn.Hidden = True
Range("A1").Select
End Sub Stepler ^{(щёлк-щёлк!!)}

Алексей2003 , на 2 минуты раньше....
Stepler ^{(щёлк-щёлк!!)}

m_a_r_i_n_aвопрос не в том чтобы срыть столбцы, а втом чтобы они на экране шли в таком порядке A, B, K, C, D, E, и т. д.Мона только переставить инфо столбцов, но названия их сохраняться по возрастанию (A-B-C.... ил 1-2=--3....)