返回列表下一主題上一主題發帖

[發問] dde 連結公式更改 ?

t8899

大學生 Rank: 4

帖子: 766
主題: 256
精華: 0
積分: 1035
點名: 0
作業系統: windows 11
軟體版本: OFFICE2021
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2026-10-2

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2014-11-29 09:38 | 顯示全部帖子

[發問] dde 連結公式更改 ?

dde 連結 =XQKGIAP|Quote!'2317.TW-Name'
想把 2317 用A2的值取代 ,不知如何更改?

樓主熱帖

t8899

大學生 Rank: 4

帖子: 766
主題: 256
精華: 0
積分: 1035
點名: 0
作業系統: windows 11
軟體版本: OFFICE2021
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2026-10-2

2^#

發表於 2014-12-3 07:36 | 顯示全部帖子

本帖最後由 t8899 於 2014-12-3 07:37 編輯

[C3].Formula="=XQKGIAP|Quote!'" & [A2] & ".TW-Name'"
luhpro 發表於 2014-12-2 21:53

我是要直接在公式裡改(直接套用)，不是用VB去改公式

TOP

t8899

大學生 Rank: 4

帖子: 766
主題: 256
精華: 0
積分: 1035
點名: 0
作業系統: windows 11
軟體版本: OFFICE2021
閱讀權限: 50
性別: 男
註冊時間: 2011-5-30
最後登錄: 2026-10-2

3^#

發表於 2014-12-10 09:29 | 顯示全部帖子

就我所知 :

那當然是不行的啦.
你的需求是在儲存格公式內的 DDE連結可直接參照另一儲存格的內容做變 ...
luhpro 發表於 2014-12-10 00:16

我的想法也是只能用 INDIRECT ，但失效 :-(
我改用vb 用replace 做，因為按照權值大小排序,一段時間，須排序一次
For Each rng In Range(Cells(i, "b"), Cells(i, "m"))
rng.Replace What:="!'????", Replacement:="!'" & Cells(i, 1), LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Next rng

TOP

t8899