註冊
登錄
首頁
論壇版規
禁止列表
說明
地圖
數位書香
私人消息 (0)
公共消息 (0)
論壇任務 (0)
系統消息 (0)
好友消息 (0)
帖子消息 (0)
麻辣家族討論版版
»
Excel程式區
» 請教使用evaluate時,如何設定工作表變數
返回列表
下一主題
上一主題
發帖
[發問]
請教使用evaluate時,如何設定工作表變數
takeshilin88
發短消息
加為好友
takeshilin88
(鹹蛋)
當前離線
UID
23475
帖子
62
主題
13
精華
0
積分
109
金錢
109
點名
0
作業系統
Win 10家用版
軟體版本
Office 2013
閱讀權限
20
性別
女
來自
新北
在線時間
109 小時
註冊時間
2016-1-27
最後登錄
2024-8-12
暱稱:
鹹蛋
中學生
帖子
62
主題
13
精華
0
積分
109
點名
0
作業系統
Win 10家用版
軟體版本
Office 2013
閱讀權限
20
性別
女
來自
新北
註冊時間
2016-1-27
最後登錄
2024-8-12
1
#
跳轉到
»
正序看帖
打印
字體大小:
t
T
發表於 2020-9-11 15:13
|
只看該作者
[發問]
請教使用evaluate時,如何設定工作表變數
請教使用evaluate時,工作表名稱為"空白"時,可正常執行:
Range("q" & Z) = Evaluate("ADDRESS(MATCH(""NOTES"", 空白!A:A,0),1,4)")
如果工作表名稱設定為變數時,
a = ActiveSheet.Name
Range("q" & Z) = Evaluate("ADDRESS(MATCH(""NOTES"", a!A:A,0),1,4)")
會出現錯誤2023,請問該如何修正呢?
樓主熱帖
插入圖片時,等比例放大或縮小
儲存格超連結電子郵件設定
excel 2021選取範圍複製成jpg檔失敗
資料範圍複製到不同檔案&依日期分別複製
儲存格範圍複製&另存成TIF檔
沒有定義這個sub或function
按下儲存格有超連結功能時,同時啟動巨集
把vba程式碼做成切換按鈕(ActiveX控制項)
請教EXCEL時間格式設定
用VBA 在儲存格填入連接字串問題
收藏
分享
takeshilin88
發短消息
加為好友
takeshilin88
(鹹蛋)
當前離線
UID
23475
帖子
62
主題
13
精華
0
積分
109
金錢
109
點名
0
作業系統
Win 10家用版
軟體版本
Office 2013
閱讀權限
20
性別
女
來自
新北
在線時間
109 小時
註冊時間
2016-1-27
最後登錄
2024-8-12
暱稱:
鹹蛋
中學生
帖子
62
主題
13
精華
0
積分
109
點名
0
作業系統
Win 10家用版
軟體版本
Office 2013
閱讀權限
20
性別
女
來自
新北
註冊時間
2016-1-27
最後登錄
2024-8-12
4
#
發表於 2020-9-14 16:40
|
只看該作者
回復
2#
starry1314
謝謝starry1314大大,
原來是用"&變數&"就可以了,
終於解惑了,
感謝~~~
TOP
hcm19522
發短消息
加為好友
hcm19522
當前離線
UID
22069
帖子
1812
主題
192
精華
0
積分
2009
金錢
2009
點名
0
作業系統
WIN
軟體版本
2007
閱讀權限
100
性別
男
在線時間
1986 小時
註冊時間
2015-9-11
最後登錄
2026-10-22
博士班
帖子
1812
主題
192
精華
0
積分
2009
點名
0
作業系統
WIN
軟體版本
2007
閱讀權限
100
性別
男
註冊時間
2015-9-11
最後登錄
2026-10-22
3
#
發表於 2020-9-12 09:46
|
只看該作者
https://blog.xuite.net/hcm19522/twblog/589351342
google"EXCEL迷" blog 或google網址:https://hcm19522.blogspot.com/
TOP
starry1314
發短消息
加為好友
starry1314
(豪)
當前離線
UID
20619
帖子
471
主題
121
精華
0
積分
579
金錢
579
點名
0
作業系統
WIN10
軟體版本
OFFICE2019
閱讀權限
50
性別
男
在線時間
596 小時
註冊時間
2015-4-16
最後登錄
2023-1-17
暱稱:
豪
高中生
帖子
471
主題
121
精華
0
積分
579
點名
0
作業系統
WIN10
軟體版本
OFFICE2019
閱讀權限
50
性別
男
註冊時間
2015-4-16
最後登錄
2023-1-17
2
#
發表於 2020-9-11 17:26
|
只看該作者
回復
1#
takeshilin88
Sub test()
a = ActiveSheet.Name
Range("q" & Z) = Evaluate("ADDRESS(MATCH(""NOTES""," & a & "!A:A,0),1,4)")
End Sub
TOP
靜思自在 :
人事的艱難與琢磨,就是一種考驗。
返回列表
下一主題
上一主題
Excelㄧ般區
EXCEL專屬討論區
Excelㄧ般區
Excel程式區
進階應用專區
OFFICE 系列
Word
PowerPoint
Access
Office不分區
程式語言
VB 與 VB.Net
C 與 C#
Java 與 J#
程式設計不分區
資料庫
ORACLE
My SQL
MS SQL
網頁設計
ASP 與 ASP.NET
PHP
PHP+MySQL 入門實作
JavaScript
FLASH / ActionScript
HTM/ HTML/ CSS
網頁設計不分區
電腦與作業系統
電腦各種硬體討論
一般電腦軟體討論
論壇事務
管理公告
投訴反映
新手測試
愛 • 生活
公益佈告欄
生活與感動
[收藏此主題]
[關注此主題的新回復]
[通過 QQ、MSN 分享給朋友]
申請友情鏈接
Facebook粉絲