Excel Sendkeys向下翻页不工作

我正试图用VBA发送一个向下键的页面，但我尝试过的任何东西都不起作用

我试过了

Myscreen.SendKeys "{PGDN}"  
Myscreen.SendKeys ("{PGDN}")
Myscreen.SendKeys ("<PGDN>")
Myscreen.SendKeys "{PAGE DOWN}"
Myscreen.SendKeys ("{PAGE DOWN}")
Myscreen.SendKeys ("<PAGE DOWN>")
Myscreen.SendKeys "{PAGE DN}"
Myscreen.SendKeys ("{PAGE DN}")
Myscreen.SendKeys ("<PAGE DN>")
Myscreen.SendKeys "{Down}"
Myscreen.SendKeys ("{Down}")
Myscreen.SendKeys ("<Down>") - this was the only that did anything, but it moved the cursor down a line instead of paging down

Myscreen.SendKeys“{PGDN}”
Myscreen.SendKeys（“{PGDN}”）
Myscreen.SendKeys（“”）
Myscreen.SendKeys“{向下翻页}”
Myscreen.SendKeys（“{PAGE DOWN}”）
Myscreen.SendKeys（“”）
Myscreen.SendKeys“{PAGE DN}”
Myscreen.SendKeys（“{PAGE DN}”）
Myscreen.SendKeys（“”）
Myscreen.SendKeys“{Down}”
Myscreen.SendKeys（“{Down}”）
Myscreen.SendKeys（“”）-这是唯一一个执行任何操作的命令，但它将光标向下移动了一行，而不是向下翻页

我使用Myscreen.Sendkeys（“”）进行了删除操作，但由于某些原因，它无法用于页面向下

有人有什么想法吗？

正确的{Page Down}应该是

Option Explicit
Sub sndkey()
    '// to send multiple times try "{PGDN 5}"
    Application.SendKeys "{PGDN}"
End Sub

看,

编辑

好的，我已经测试过了

Option Explicit
Sub sndkey()
    Dim Myscreen As Object
    Set Myscreen = Sys.Screen
    '// to send multiple times try "{PGDN 5}"
    Myscreen.SendKeys "{PGDN 6}"
End Sub

---

这是正确的语法

Myscreen.SendKeys（“”）

您是否尝试过将第二个参数设置为True，即

SendKeys“{PGDN}”，True

？我没有，但我刚刚尝试过，我收到一条消息，说明“参数数量错误或属性分配无效”，我可能帮不了您，很抱歉，这是我尝试的第一个参数。但出于某种原因，{DEL}是删除的正确语法，但除非我将其放在（“”）中，否则它不会起作用，就像我使用MSDN所说的内容时页面向下不起作用一样。您是否尝试删除Myscreen？您是如何定义MyScreen变量的？设置MyScreen=Sys.Screen，如果我删除MyScreen部分，它不会引起问题，但实际上也不会做任何事情，如果我只使用Sendkeys“{PGDN}”设置MyScreen=Sys.Screen，Sys将设置为Set Sys=GetObject（“C:\Program Files\Attachmate\E！E2K\Sessions\AS400-a.EDP”），屏幕将不会进入下一页@user1787114如果您提到您使用的是SendKeys的附件版本，那就不会有什么坏处了。这在语法上与Myscreen.SendKeys（“”）有何不同？为什么rollup适合于

发送一个向下翻页的按键呢？@greybeard此语法专门用于他试图使用的附件库。