Скрытие 2 строк в слове Microsoft с использованием VBA

Question

Я пытался понять, как скрыть 2 строки в слове Microsoft. Я знаю, что он не обладает теми же функциями, что и Excel, но то, что я делаю, нужно делать словом. В настоящее время у меня есть таблица, и я хотел скрыть 2 строки. Вот основные сведения c: - В таблице всего 17 строк.
- Я хочу скрыть строки 16 и 17. - В строке 16 было 5 столбцов - В строке 17 - 3 столбца. - таблица не может иметь заголовок ... - Microsoft word -> Office 16

Эта таблица извлекается в Excel с использованием другого сценария VBA, и параметры этого сценария требуют, чтобы эта таблица все еще содержала 17 строк , Я пытался выяснить, как минимизировать / скрыть эти строки в слове в течение пары дней. Я нашел несколько фрагментов кода онлайн и получаю ошибки с каждым кодом.

Я очень нуб, когда дело доходит до VBA.

Вот код, который я пытался использовать:

 Private Sub CommandButton1_Click()

   Dim BBGEarlyAppr As Range
   Dim BBGEarlyAppr2 As Range
      With ActiveDocument.Tables(1)
          Set BBGEarlyAppr = .Rows(7).Range
          BBGEarlyAppr.End = .Rows(41).Range.End
      End With

      With ActiveDocument.Tables(1)
          Set BBGEarlyAppr2 = .Rows(60).Range
          BBGEarlyAppr2.End = .Rows(68).Range.End
       End With

      With BBGEarlyAppr.Font
           .Hidden = True
      End With
      With BBGEarlyAppr2.Font
          .Hidden = True
      End With
  End Sub

I получить сообщение об ошибке BBGEarlyAppr.End = .Rows(41).Range.End «запрошенный элемент коллекции не существует»

Это потому, что строки отключены? Кроме того, скрытие шрифта не приводит к удалению шрифта внутри ячеек ...

Любая помощь или объяснение будет с благодарностью. Я

Answer 1

Я не вижу никаких проблем с вашим макросом. В Файл> Параметры> Показать , если у вас установлены параметры Скрытый текст или Все , скрытый текст останется видимым, но на нем будет нарисована точечная пунктирная линия. под этим. Отключите эту опцию, чтобы увидеть истинный эффект вашего кода.