我可以通过Applescript在Excel中获取实际页数吗?

Question

我知道可以将ExecuteExcel4Macro方法与GET.DOCUMENT(50)宏工作表函数一起使用，以返回将在工作表上打印的总页数。

在AppleScript中可能出现这样的事情吗？

Answer 1

在page setup object对象中有两个属性

• fit to pages tall
• fit to pages wide

---

tell application "Microsoft Excel"
    tell page setup object of sheet 1
        set pagesTall to fit to pages tall
        set pagesWide to fit to pages wide
    end tell
end tell

Answer 2

我不确定我是否正确理解了这个问题。

您可以在工作表中创建一个宏，并通过Applescript运行它。

tell application "Microsoft Excel"
  open "yourSheet.xls"
  run VB macro "yourMacro"
end tell

如果您需要访问 Applescript 中的数字，您可能需要宏来打印文档中的某个位置的数字，并使用 Applescript 阅读它。

编辑：根据您的评论，恐怕您需要这样开头的东西：

tell application "Microsoft Excel"
  activate
end tell
tell application "System Events"
  tell process "Microsoft Excel"
    click menu item "Macros..." of menu 1 of menu item "Macro" of menu 1 of menu bar item "Tools" of menu bar 1
  end tell
end tell
delay 1
tell application "System Events"
   keystroke "abc"
   keystroke {return}
end tell
..then you paste your macro, save it, run it..