返回列表 上一主題 發帖

關於VBA列印問題

gn00487767

帖子
58 
主題
8 
精華
0 
積分
94 
點名
0  
作業系統
XP 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
註冊時間
2010-12-6 
最後登錄
2014-2-17 
1# 跳轉到 » 正序看帖
打印
tT
發表於 2011-2-14 21:05 | 只看該作者

關於VBA列印問題

請問各位大大
VBA有辦法選擇列印工作表嗎
工作表裡面的儲存格等於要列印的工作表名 就列印該工作表
列如A1儲存格 等於 AAA 就會列印出 AAA 的工作表
    A1儲存格 等於 BBB 就會列印出 BBB 的工作表

如下裡面紅色的AAA要隨著儲存格改變
With Sheets("AAA").PrintOut '列印
End With

要如何做修正呢
收藏 分享

gn00487767

帖子
58 
主題
8 
精華
0 
積分
94 
點名
0  
作業系統
XP 
軟體版本
office 2003 
閱讀權限
20 
性別
男 
註冊時間
2010-12-6 
最後登錄
2014-2-17 
3#
發表於 2011-2-15 11:02 | 只看該作者
回復 2# Hsieh

感謝 Hsieh 大大
因為這個方法小弟不知道怎麼使用巨集取得
所以上來發問
小弟測試後 可正常使用
萬分感謝

TOP

Hsieh

帖子
4901 
主題
44 
精華
24 
積分
4916 
點名
277  
作業系統
Windows 7 
軟體版本
Office 20xx 
閱讀權限
150 
性別
男 
來自
台北 
註冊時間
2010-4-30 
最後登錄
2024-12-23 

2023年全勤獎章2022虎年全勤獎章2021牛年全勤獎章2020鼠年全勤獎章2019 豬年全勤獎章2018 狗年全勤獎章2017 雞年全勤獎章2016猴年全勤獎章2015羊年全勤獎章2014馬年全勤獎章2013蛇年全勤獎章2012龍年全勤獎章論壇貢獻勳章熱心公益勳章2011兔年全勤獎章
2#
發表於 2011-2-14 21:24 | 只看該作者
With Sheets([A1].text).PrintOut '列印
End With
學海無涯_不恥下問

TOP

        靜思自在 : 多做多得。少做多失。
返回列表 上一主題