Re: [算表] excel web查詢之資料處理--定期,VBA

看板Office作者 (David)時間17年前 (2009/04/05 18:39), 編輯推噓0(000)
留言0則, 0人參與, 最新討論串2/2 (看更多)
後續討論整理 問題檔 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
文章代碼(AID): #19s8fBH9 (Office)
文章代碼(AID): #19s8fBH9 (Office)