第壹步:做壹個數據表,數據——導入外部數據——新建壹個WEB查詢,寫入數據的源地址。
第二步:制作股價圖,先按照股價圖要求的順序將公式引用到當前表格中,然後插入圖表——選擇股價圖(第四種)調整圖表。
第三步:編寫程序實現實時刷新功能。您可以根據所需位置復制下列程序。
在模塊中編寫以下程序段刷新行情表,“00:00:10”表示刷新間隔,可以根據需要調整。
暗淡結束標簽
次刷新市場()
工作表(“每日數據”)。範圍(" a1 ")。查詢表。刷新。
BackgroundQuery:=False
工作表(“分數數據”)。範圍(" a1 ")。查詢表。刷新。
BackgroundQuery:=False
If結束標記
& lt& gt1然後申請。現在準時+
TimeValue("00:00:10 "),"刷新市場"
末端接頭
Sub開始刷新()
結束標記= 0
刷新市場
末端接頭
子端刷新()
結束標記= 1
末端接頭
在此工作簿中編寫以下代碼,以便在表打開時開始市場刷新。
私有子工作簿_Open()
刷新市場
末端接頭
以上制作完成後,保存後打開表格,就可以得到實用的股市走勢圖和實時數據進行數據分析。