小编Mad*_*ina的帖子

如何在VBA中更改打印机对话框的默认名称?(使用打印机对话框的句柄时)

我从SAP获得了一些数据,然后我按下了SAP的打印按钮以打印数据.然后出现PRINT窗口:

  1. 我把它处理成了hWnd变量(请在LINE 1评论中找到);

  2. 然后我想将默认打印机名称更改为"Microsoft Print to PDF"(我不知道如何更改它);

  3. 然后我按了按钮OK(请找LINE 4评论);

这是代码:

Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" _
    (ByVal lpClassName As String, ByVal lpWindowName As String) As Long
Private Declare Function FindWindowEx Lib "user32" Alias "FindWindowExA" _
    (ByVal hWnd1 As Long, ByVal hWnd2 As Long, ByVal lpsz1 As String, ByVal lpsz2 As String) As Long
Private Declare Function SendMessage Lib "user32" Alias "SendMessageA" _
    (ByVal hWnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any) …
Run Code Online (Sandbox Code Playgroud)

printing sap winapi vba

5
推荐指数
1
解决办法
437
查看次数

标签 统计

printing ×1

sap ×1

vba ×1

winapi ×1