I need an apple script to zoom the active Excel Sheets to zoom to 150. While working in excel, one need to browse to different sheets in a workbook. The zoom level should be 150 whenever I switch to a worksheet. I made the following script, but it works only once.
tell application "Microsoft Excel"
activate
set zoom of front window to 150
tell application "System Events" to set ExcelIsRunning to (name of processes) contains "Microsoft Excel"
if ExcelIsRunning then
set zoom of the front window of active workbook to 150
repeat until ExcelIsRunning
return 5
end repeat
end if
end tell