Я полностью согласен с комментарием PEH о том, что следует избегать операторов select и тому подобного, и далее я бы добавил, что лучше всего избегать таких вещей, как Activesheet - вместо этого всегда указывайте, на какой лист вы ссылаетесь.
В любом случае, есть много способов сделать то, что вы ищете. Одним из способов было бы использовать метод Find класса Range, он работает так же, как диалог поиска и замены, который вы получаете при нажатии Ctrl + F.
Cells.Copy
Cells.PasteSpecial xlPasteValues ' replace formulas with their result
Cells.Replace What:="0", Replacement:="", LookAt:=xlWhole ' replace "0" with an empty string
osascript-e "говорят приложению \"Терминал \" выбирать цвет фона окна 1 к {0,45000,0,0}"
Я не знаю специфических особенностей, но я предполагаю, что Вы хотели бы записать программу AppleScript, которую Вы вызываете из своего сценария оболочки. AppleScript "Сказал" бы Терминалу изменять свой цвет фона.