Office中國(guó)論壇/Access中國(guó)論壇

 找回密碼
 注冊(cè)

QQ登錄

只需一步,快速開始

返回列表 發(fā)新帖
查看: 2487|回復(fù): 6
打印 上一主題 下一主題

[Access本身] 用VBA 來(lái)打開 Win7的FAX 窗口

[復(fù)制鏈接]
跳轉(zhuǎn)到指定樓層
1#
發(fā)表于 2011-1-21 15:39:51 | 只看該作者 回帖獎(jiǎng)勵(lì) |倒序?yàn)g覽 |閱讀模式
我想用VBA 來(lái)打開 Win7FAX 窗口
可請(qǐng)教高手指點(diǎn)嗎?
謝謝
分享到:  QQ好友和群QQ好友和群 QQ空間QQ空間 騰訊微博騰訊微博 騰訊朋友騰訊朋友
收藏收藏 分享分享 分享淘帖 訂閱訂閱

點(diǎn)擊這里給我發(fā)消息

2#
發(fā)表于 2011-1-21 21:30:04 | 只看該作者
windows7還沒用到呢
3#
發(fā)表于 2011-1-22 08:07:11 | 只看該作者
c101 發(fā)表于 2011-1-21 15:39
我想用VBA 來(lái)打開 Win7的FAX 窗口可請(qǐng)教高手指點(diǎn)嗎?謝謝

1、與Win7中找到FAX的快捷方式,右擊屬性找到其地址,抄下這個(gè)地址。
2、用shell函數(shù)打開FAX窗口
If Shell("explorer.exe " & "FAX文件地址", vbNormalFocus) = 0 Then Exit Sub
4#
 樓主| 發(fā)表于 2011-1-22 09:42:19 | 只看該作者
T大:
謝謝
MyFAX地址=”控制臺(tái)\硬件和音效\裝置和打印機(jī)”
If Shell("explorer.exe " & MyFAX地址, vbNormalFocus) = 0 Then Exit Sub

打開的地址 卻是 C:\Users\L\Documents
我哪里弄錯(cuò)了?
5#
發(fā)表于 2011-1-22 09:44:54 | 只看該作者
本帖最后由 todaynew 于 2011-1-22 09:58 編輯

MyFAX地址=”控制臺(tái)\硬件和音效\裝置和打印機(jī)”
以上不是文件地址,只是一個(gè)文件夾地址。要找到文件的地址(最后應(yīng)該是文件名)。

你的問(wèn)題是不是就是打開打印機(jī)設(shè)置窗體?如果是這樣的話,只需:
DoCmd.RunCommand acCmdPrint
6#
發(fā)表于 2011-1-22 10:53:46 | 只看該作者
Shell "C:\Windows\system32\WFS.exe", WindowStyle:=1
7#
 樓主| 發(fā)表于 2011-1-22 11:01:34 | 只看該作者
貓大 & T大:
謝謝
Shell "C:\Windows\system32\WFS.exe", WindowStyle:=1 OK

謝謝
您需要登錄后才可以回帖 登錄 | 注冊(cè)

本版積分規(guī)則

QQ|站長(zhǎng)郵箱|小黑屋|手機(jī)版|Office中國(guó)/Access中國(guó) ( 粵ICP備10043721號(hào)-1 )  

GMT+8, 2024-10-23 08:40 , Processed in 0.122213 second(s), 30 queries .

Powered by Discuz! X3.3

© 2001-2017 Comsenz Inc.

快速回復(fù) 返回頂部 返回列表