☰

Проверка орфографии в нескольких книгах Excel

tag-icon • tag-icon microsoft-excel spell-check
Проверка орфографии в нескольких книгах Excel

Может ли кто-нибудь предложить способ проверки орфографии в нескольких листах Excel, не открывая их все и не запуская проверку вручную?

Я в основном проверяю документацию по ходу дела, но мне бы хотелось провести еще одно сканирование всей документации перед ее подписанием.

Я хочу проверить несколько рабочих книг, т. е. разные файлы, не делая это все по отдельности. У меня около 60 рабочих книг!

решение1

Щелкните правой кнопкой мыши по имени одного листа внизу, выберите все листы, нажмите F7.

решение2

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

Добавьте VBA ниже к ThisWorkbookобъекту в VBA Explorer. При запуске этого макроса он проверит орфографию всех открытых рабочих книг, за исключением, чтобы PERSONAL.xlsbизбежать путаницы.

Sub SpellCheckOpenWorkbooks()

'LOOP SOURCE: www.TheSpreadsheetGuru.com

Dim wb As Workbook
Dim sht As Worksheet


For Each wb In Application.Workbooks
  If wb.Name <> "PERSONAL.xlsb" Then
    For Each sht In wb.Worksheets

        sht.Cells.CheckSpelling

    Next sht
  End If
Next wb

End Sub

Итак, откройте книги, которые вы хотите проверить, а затем запустите макрос.

Источник для цикла VBA -Пройтись по всем рабочим листам во всех открытых в данный момент рабочих книгах

ПРИМЕЧАНИЕ: Используйте на свой страх и риск. Перед началом работы обязательно сохраните ее.

Связанный контент