廣告廣告
  加入我的最愛 設為首頁 風格修改
首頁 首尾
 手機版   訂閱   地圖  簡體 
您是第 5980 個閱讀者
 
發表文章 發表投票 回覆文章
  可列印版   加為IE收藏   收藏主題   上一主題 | 下一主題   
ichol
數位造型
個人文章 個人相簿 個人日記 個人地圖
路人甲
級別: 路人甲 該用戶目前不上站
推文 x0 鮮花 x0
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片
推文 x0
[Basic][求助] EXCEL VBA樞紐分析問題
用EXCEL VBA寫了樞紐分析 想把資料區域定義為全部資料
可是都會出現錯誤...

程式碼為

Set Pvio1 = ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
        "Sheet1!R1C1:R21C7").CreatePivotTable(TableDestination:="", TableName:= _
        "樞紐分析表1", DefaultVersion:= ..

訪客只能看到部份內容,免費 加入會員 或由臉書 Google 可以看到全部內容



獻花 x0 回到頂端 [樓 主] From:台灣中華電信 | Posted:2010-08-23 23:38 |
年輕戰士
個人文章 個人相簿 個人日記 個人地圖
路人甲
級別: 路人甲 該用戶目前不上站
推文 x0 鮮花 x1
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

下面是引用 ichol 於 2010-08-23 23:38 發表的 EXCEL VBA樞紐分析問題: 到引言文
用EXCEL VBA寫了樞紐分析 想把資料區域定義為全部資料
可是都會出現錯誤...
程式碼為
Set Pvio1 = ActiveWorkbook.PivotCaches.Add(SourceType:=xlDatabase, SourceData:= _
        "Sheet1!R1C1:R21C7").CreatePivotTable(TableDestination:="", TableName:= _
.......


因為你的區域是被錄製出來的,所以想要突破這點就別錄了


獻花 x0 回到頂端 [1 樓] From:台灣中華電信 | Posted:2010-08-24 13:43 |
Lenki
數位造型
個人文章 個人相簿 個人日記 個人地圖
小人物
級別: 小人物 該用戶目前不上站
推文 x0 鮮花 x10
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

從 A1 欄位,使用End 函數,End(往下找),取得最後一列有資料的列號
程式如下
複製程式
Dim lnLastRow As Long
lnLastRow = Range("A1").End(xlDown).Row
...
...
.....   SourceData:= "Sheet1!R1C1:R" & Trim(Str(lnLastRow)) & "C7") ......



獻花 x0 回到頂端 [2 樓] From:台灣中華電信 | Posted:2010-08-27 22:21 |
Lenki
數位造型
個人文章 個人相簿 個人日記 個人地圖
小人物
級別: 小人物 該用戶目前不上站
推文 x0 鮮花 x10
分享: 轉寄此文章 Facebook Plurk Twitter 複製連結到剪貼簿 轉換為繁體 轉換為簡體 載入圖片

下面是引用 年輕戰士 於 2010-08-24 13:43 發表的 : 到引言文
 

因為你的區域是被錄製出來的,所以想要突破這點就別錄了

我認為錄製功能很強大也很方便,只要懂得利用還是閒來沒事就錄製一些巨集研究吧!
有些功能錄製後稍作修改即可使用,何樂而不為。
並不是錄製出來的就沒辦法突破,多操作多瞭解它錄製出來的程式,一定會找到很多可以學習的內容。

我的個人看法,無意引戰!


獻花 x0 回到頂端 [3 樓] From:台灣中華電信 | Posted:2010-08-27 22:29 |

首頁  發表文章 發表投票 回覆文章
Powered by PHPWind v1.3.6
Copyright © 2003-04 PHPWind
Processed in 0.022589 second(s),query:16 Gzip disabled
本站由 瀛睿律師事務所 擔任常年法律顧問 | 免責聲明 | 本網站已依台灣網站內容分級規定處理 | 連絡我們 | 訪客留言