cheng17875

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 10
點名: 0
作業系統: XP
軟體版本: 2000
閱讀權限: 10
註冊時間: 2010-7-26
最後登錄: 2010-8-14

1^# 跳轉到 » 倒序看帖

打印

字體大小: tT

發表於 2010-7-26 13:30 | 只看該作者

有請解答! 如何製作此一欄位??

kimbal

版主 Rank: 7 Rank: 7 Rank: 7

帖子: 472
主題: 5
精華: 0
積分: 485
點名: 0
作業系統: Windows
軟體版本: MS Office
閱讀權限: 100
性別: 男
來自: 香港
註冊時間: 2010-7-4
最後登錄: 2014-12-28

論壇貢獻勳章

2^#

發表於 2010-7-26 13:47 | 只看該作者

用vlookup等可以從表回傳結果.

你的excel表布局是如何?

懂得發問,答案就會在其中

今日の一秒は明日にない
http://kimbalko-chi.blogspot.com
http://kimbalko.blogspot.com

TOP

cheng17875

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 10
點名: 0
作業系統: XP
軟體版本: 2000
閱讀權限: 10
註冊時間: 2010-7-26
最後登錄: 2010-8-14

3^#

發表於 2010-7-26 13:52 | 只看該作者

本帖最後由 cheng17875 於 2010-7-26 14:03 編輯

用vlookup等可以從表回傳結果.

你的excel表布局是如何?
kimbal 發表於 2010-7-26 13:47

不好意思! 沒說明一時手快
這是由股票軟體直接DDE連結的
你所看到的是 DDE連結的"內碼"
我想在第一欄可以輸入任意股票代碼
能夠取代該列每一欄內的DDE內碼
不知這樣說明看得懂嗎?

TOP

jackdream

　暱稱: Jack

中學生 Rank: 2

帖子: 130
主題: 8
精華: 0
積分: 143
點名: 0
作業系統: Win10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2010-5-1
最後登錄: 2023-8-3

4^#

發表於 2010-7-26 14:19 | 只看該作者

回復 3# cheng17875

如果用 Worksheet_Change 去觸發更新程序呢?

TOP

cheng17875

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 10
點名: 0
作業系統: XP
軟體版本: 2000
閱讀權限: 10
註冊時間: 2010-7-26
最後登錄: 2010-8-14

5^#

發表於 2010-7-26 14:29 | 只看該作者

回復 4# jackdream

不好意思! 不知道怎樣弄啦!
可否給小學生我多一點簡單白話的指示
因為我還不大會其中一些程式

TOP

jackdream

　暱稱: Jack

中學生 Rank: 2

帖子: 130
主題: 8
精華: 0
積分: 143
點名: 0
作業系統: Win10
軟體版本: Office 2010
閱讀權限: 20
性別: 男
來自: 高雄
註冊時間: 2010-5-1
最後登錄: 2023-8-3

6^#

發表於 2010-7-26 14:46 | 只看該作者

回復 jackdream
不好意思! 不知道怎樣弄啦!
可否給小學生我多一點簡單白話的指示
cheng17875 發表於 2010-7-26 14:29

請將以下內容放在 sheet 裡面(不是放在模組裡面)

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A2")) Is Nothing Then '若有更改 A2 內容
If Not Cells(Target.Row, Target.Column) = Empty Then
Call xxx '觸發程序 (xxx 代表指進行股票更新的模組)
End If
End If
End Sub

複製代碼

TOP

cheng17875

小學生 Rank: 1

帖子: 9
主題: 1
精華: 0
積分: 10
點名: 0
作業系統: XP
軟體版本: 2000
閱讀權限: 10
註冊時間: 2010-7-26
最後登錄: 2010-8-14

7^#

發表於 2010-7-27 11:09 | 只看該作者

回復 6# jackdream

我好像搞不起來~~~sorry!我太笨了

真不好意思...
說明如下"
1.我是先開啟券商的免費股市報價軟體
2.然後將個股DDE直接拉到EXCEL儲存格中
3.想要在空白儲存格建立"輸入股票代號" 即可改變該列其他欄位的報價
大大所說的我有寫到儲存格中但好像不能執行
PS:我的是2000

TOP

jackdream