Re: [算表] excel web查詢之資料處理--定期,VBA
後續討論整理
問題檔
http://www.mediafire.com/download.php?jzmdjdtdjdc
要作圖公式改為
=--MID(G2,FIND(":",G2)+1,9^9)
關於vba
If Not Application.Intersect([OpenInterest], Target) Is Nothing Then
With Sheet1.Columns(1)
Set pt = .Cells(.Cells.Count).End(xlUp)
End With
If pt <> [Date_Today] Then
[Date] = [Date_Today]
[FINI_OpenInterest] = [外資_留倉]
[ITC_OpenInterest] = [投信_留倉]
[Dealer_OpenInterest] = [自營商_留倉]
End If
End If
pt用來找a欄最後一個有資料的格子
也可以簡單寫為
[A65536].End(xlUp)
不過2007和2003就要寫不一樣
雖然應該也不會用到65536列 已經夠了
pt這個寫法我是在
http://blog.xuite.net/crdotlin/excel/9054970
看到的,而該網站很多vba的東西
有一網頁我常查
http://gb.twbts.com/index.php/topic,768.0.html
整理了一些選範圍、複製的語法
※ 引述《matmoki ( )》之銘言:
: 軟體:excel
: 版本:2007
: Sheet1 用web查詢匯入資料
: Sheet2 利用對應從Sheet1中抽出我要的資料
: Sheet3 把Sheet2中的資料累計做成圖表
: web資料是每日更新 我的問題是 如何讓Sheet3更新完當日資料後自動跳下一行
: 例子:
: A B
: 1 4/4 今天的值
: 2 4/5 明天的值
: 目的就是當天手動或是自動更新完可以自動新增資料 一天一天累計 完全不用手動更改
: 謝謝~
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 218.164.54.105
討論串 (同標題文章)
本文引述了以下文章的的內容:
完整討論串 (本文為第 2 之 2 篇):
Office 近期熱門文章
PTT數位生活區 即時熱門文章