excel vba 陣列中的資料如何丟給一個另外定義的RANGE - Excel程式區 - 麻辣家族討論版版

麻辣家族討論版版 » Excel程式區 » excel vba 陣列中的資料如何丟給一個另外定義的RANGE

返回列表下一主題上一主題發帖

[發問] excel vba 陣列中的資料如何丟給一個另外定義的RANGE

大學生 Rank: 4

帖子: 1018
主題: 15
精華: 0
積分: 1058
點名: 0
作業系統: win7 32bit
軟體版本: Office 2016 64-bit
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2012-5-9
最後登錄: 2022-9-28

1^# 跳轉到 »

發表於 2012-12-2 11:40 | 顯示全部帖子

回復 1# alexlkklin
不是很確定你是不是在問這個...
假設你的Array是rg7po , 你要把Q欄資料讀到rg7po裡面
dim rg7po
rg7po = Application.Transpose(Range(Sheets("表1").[q2], Sheets("表1").[q65535].End(xlUp)))

就可以讀到 rg7po(1), rg7po(2), ... 裡面了

大學生 Rank: 4

帖子: 1018
主題: 15
精華: 0
積分: 1058
點名: 0
作業系統: win7 32bit
軟體版本: Office 2016 64-bit
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2012-5-9
最後登錄: 2022-9-28

2^#

發表於 2012-12-2 15:34 | 顯示全部帖子

回復 3# alexlkklin
那沒錯啊 , 再定義一個Arr變數
Arr = Application.Transpose(Range(Sheets("表1").[q2], Sheets("表1").[q65535].End(xlUp)))
這樣就可以將Q欄的資料轉為一維陣列了

大學生 Rank: 4

帖子: 1018
主題: 15
精華: 0
積分: 1058
點名: 0
作業系統: win7 32bit
軟體版本: Office 2016 64-bit
閱讀權限: 50
性別: 男
來自: 桃園
註冊時間: 2012-5-9
最後登錄: 2022-9-28

3^#

發表於 2012-12-2 15:53 | 顯示全部帖子

回復 3# alexlkklin
好像不是 , 這好像跟你發問的標題相反...
你有提到sumif 怎麼不把公式列出來
還有你已經整理好的產品品號是放在哪?? 是工作表還是變數裡
這樣猜真的很難懂

靜思自在 : 【是否發揮了良能？】人間壽命因為短暫，才更顯得珍貴。難得來一趟人間，應問是否為人間發揮了自己的良能，而不要一味求長壽。

返回列表下一主題上一主題