Я хочу, чтобы скрыть столбец с помощью функции. Более ясно, что я пытаюсь реализовать для конкретного типа пакета данных, который расположен как столбец1, столбец2, столбец3 и т.д., Число получается из другой конкретной ячейки, и столбцы, до которых видна большая часть порядка. то есть, если я введу 3 в ячейку, столбцы до столбца 3 должны быть видны. Может ли кто-нибудь предложить какую-либо функцию или идею для ее реализации? Пожалуйста...

1 ответ1

1

Этот метод использует значение, введенное в ячейку A1. Если вы введете 2, будут видны только первые два столбца. При вводе 3 появятся три столбца и т.д.

Введите следующий макрос событий в области кода рабочей таблицы:

Private Sub Worksheet_Change(ByVal Target As Range)
    Dim A1 As Range, rINT As Range
    Dim N As Long

    Set A1 = Range("A1")
    Set rINT = Intersect(A1, Target)
    If rINT Is Nothing Then Exit Sub

    N = A1.Value
    Columns.Hidden = False
    Range(Cells(1, N + 1), Cells(1, Columns.Count)).EntireColumn.Hidden = True
End Sub

Поскольку это код рабочего листа, его очень легко установить и использовать автоматически:

  1. щелкните правой кнопкой мыши имя вкладки в нижней части окна Excel
  2. выберите View Code - откроется окно VBE
  3. вставьте материал и закройте окно VBE

Если у вас есть какие-либо проблемы, сначала попробуйте на пробную версию.

Если вы сохраните книгу, макрос будет сохранен вместе с ней. Если вы используете версию Excel более поздней, чем в 2003 году, вы должны сохранить файл как .xlsm, а не .xlsx

Чтобы удалить макрос:

  1. вызвать окна VBE, как указано выше
  2. очистить код
  3. закройте окно VBE

Чтобы узнать больше о макросах в целом, смотрите:

http://www.mvps.org/dmcritchie/excel/getstarted.htm

а также

http://msdn.microsoft.com/en-us/library/ee814735(v=office.14).aspx

Чтобы узнать больше о макросах событий (код листа), см .:

http://www.mvps.org/dmcritchie/excel/event.htm

Макросы должны быть включены, чтобы это работало!

Если вы введете 0, все столбцы будут скрыты, и вам придется показывать их вручную.

Всё ещё ищете ответ? Посмотрите другие вопросы с метками .