Вы также можете установить это в качестве диапазона:
Sub t()
Dim cellsWithErroringFormulas As Range
On Error Resume Next
Set cellsWithErroringFormulas = Range("Q:Q").SpecialCells(xlCellTypeFormulas, 16)
On Error GoTo 0
If cellsWithErroringFormulas Is Nothing Then
' Do whatever
MsgBox ("No formulas result in an error!")
Exit Sub
ElseIf cellsWithErroringFormulas.Rows.Count > 0 Then
cellsWithErroringFormulas.SpecialCells(xlCellTypeFormulas, 16).EntireRow.Delete
' Now, if you call `cellsWithErroringFormulas` again, it will error since you removed all those references.
' So to be explicit, let's clear that variable.
Set cellsWithErroringFormulas = Nothing
End If
End Sub
Я настроил имя переменной, просто потому, что вы технически не ищете строки с формулами, а скорее ячейки с формулами, которые приводят к ошибке , Здесь немного неуклюже, поэтому переименовывайте по желанию. Просто хотел указать на это.
Кроме того, поскольку я не знаю, что вы планируете делать дальше, я добавил Set cellsWithErroringFormulas = Nothing
, поскольку мы не можем использовать эту ссылку после того, как вы удалите ошибочные строки. Возможно, вам это и не нужно, но я просто хотел бы указать на это.
Создайте обычный пакет приложения, но установите на нем LSUIElement
, чтобы значок приложения сценария был скрыт от док-станции, и включите Firefox внутри пакета.
Простой способ делать это с Утконос . Настройте Утконоса следующим образом:
Нажмите «Параметры». Проверьте "Set Флажок «$ 1 для пути к приложению», так что ваш скрипт может ссылаться на файлы внутри связки.
Отметьте «Работает в фоновом режиме» - этот набор
LSUIElement
для вас.
В списке «Файлы и папки для в комплекте с заявкой в Папка «Ресурсы», удалите Firefox.
Измените вывод на «Нет», чтобы ваш журнал сообщения отправляются в системную консоль.
Удалите файл значков Firefox (firefox.icns) в «Custom Icon».
Измените «Имя приложения» на Firefox.
Для сценария, который выглядит примерно так:
#!/bin/sh
echo before >&2
$1/Contents/Resources/Firefox.app/Contents/MacOS/firefox-bin
echo after >&2
вы получаете вывод, например:
4/8/09 1:16:33 PM [0x0-0x801801].net.sabi.PlatypusScript[76610] before
4/8/09 1:16:35 PM firefox-bin[76613] Database load time: 0.373 (717 objects)
4/8/09 1:16:35 PM [0x0-0x801801].net.sabi.PlatypusScript[76610]
2009-04-08 13:16:35.699 firefox-bin[76613:10b] Database load time: 0.373 (717 objects)
4/8/09 1:16:57 PM [0x0-0x801801].net.sabi.PlatypusScript[76610] after
Если ваши пользователи запускают Firefox другими способами, например, с помощью обработчиков URL-адресов и открытием файлов HTML, вам вместо этого нужно будет использовать собственное приложение, которое может передавать соответствующие события Apple через в Firefox и добавьте соответствующий URL и информацию об обработчике файла в Info.plist. ( aemreceive - это удобная оболочка Python для приема Apple Event.)
Используйте рабочий процесс Automator , если он доступен в вашей версии Mac OS.