返回列表 上一主題 發帖

用參數進行工作表的複製問題

mimic1

帖子
1 
主題
1 
精華
0 
積分
2 
點名
0  
作業系統
win10 
軟體版本
office2013 
閱讀權限
10 
註冊時間
2015-9-18 
最後登錄
2015-9-25 
1# 跳轉到 » 倒序看帖
打印
tT
發表於 2015-9-24 23:32 | 顯示全部帖子

用參數進行工作表的複製問題

[版主管理留言]
  • GBKEE(2015/9/25 07:06): 附檔看清楚

本帖最後由 GBKEE 於 2015-9-25 07:04 編輯

' 讀取檔名
    Dim Copywb As String
    Copywb = TextBox1.Value   
    MsgBox (Copywb)
' 讀取工作表
    Dim Copyws As String
    Copyws = ComboBox1.Value
    MsgBox (Copyws)
' 複製工作表
   Workbooks(Copywb).Sheets(Copyws).Copy before:=Workbooks("A.xls").Sheets("Sheet2")

請問
我從兩個下拉選單中讀出值，並用MsgBox ()確認正確
但是 我卻沒有辦法用讀出的值
來進行兩個活頁簿中工作表的複製
收藏 分享

        靜思自在 : 【時間如鑽石】時間對一個有智慧的人而言，就如鑽石般珍貴；但對愚人來說，卻像是一把泥土，一點價值也沒有。
返回列表 上一主題