|
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 |
(* excel_columnrow.applescript *) tell application "Microsoft Excel" --set column width and row height set row height of range "1:30" to 40 -- points (rows) set column width of range "A:Z" to 2 -- characters (columns) delay 3 -- set range to autofit tell range "A1:Z30" of active sheet repeat with i from 1 to (count columns) autofit column i end repeat end tell end tell |