[發問] 請問一下如何獲取樞鈕欄位裡項目??

yiwei0707

下載 (43.79 KB)

2017-10-26 01:39

請問一下各位大大，是否可以指導一下如何獲取例如像大分類樞鈕欄位裡的所有項目名稱呢??謝謝

kim223824

可以提供檔案嗎?
另外目前得知無法直接取得大分類中的項目，可以變通一下間接取得。

ikboy

1. Range("B3").ShowDetail = True

複製代碼

Hsieh

回復 1# yiwei0707

下載 (102.33 KB)

2017-10-30 15:14

yiwei0707

回復 2# kim223824


    附上檔案，謝謝。

活頁簿1.xls.zip (13.91 KB)

下載次數: 5

2017-10-31 19:27

yiwei0707

回復 3# ikboy


    大大~這好像不是我想要的方法…不過還是謝謝您的回答。謝謝

yiwei0707

回復 4# Hsieh


    感謝大大的回覆，但我想要的是取得各分類欄位中所有的項目名稱，
    因各分類的項目名稱沒有固定的數值，每個月份都會不一樣，有時有有時又沒有，或者有新增的項目
    附上檔案，給大大看一下。謝謝

活頁簿1.xls.zip (13.91 KB)

下載次數: 6

2017-10-31 19:29

kim223824

以下幾個問題與您確認下:
1. 你的資料範圍怪怪的。

下載 (192.55 KB)

2017-11-1 10:37

2. 金額&數值應該要拉到值的欄位裡。

下載 (20.44 KB)

2017-11-1 10:40

3. 若要看到詳細的內容應該要把 "大分類"拉到 列標籤，
就可以看到裡面的值。

下載 (187.88 KB)

2017-11-1 10:46

4. 再將您要的範圍先"複製" ，
再到K1欄 ，按滑鼠右鍵 "選擇性貼上" 值，
再將空格填滿你要的值，就是你要的清單。

下載 (206.32 KB)

2017-11-1 10:48

將以上的動作用巨集錄製起來就是您要的程式了。
瘣駁_蝪_-1.zip (9.76 KB)

下載次數: 2

2017-11-1 10:49

yiwei0707

回復 8# kim223824


    資料我有刪除一些掉…我主要的是想用VBA去如何得知三個分類欄位裡所有的項目名稱而已
    因那個三個欄位每個月的項目都不一定一樣沒辦法用巨集去錄製…所以才想上來請問各位大大是否有辦法取得。謝謝

kim223824

Sub EX_1()

    Range("A1").Select
    Selection.End(xlDown).Select
   
    ROW1 = ActiveCell.Row
   
    Range("AD1:AD" & ROW1).Value = Range("A1:A" & ROW1).Value

End Sub

瘣駁_蝪_ -2.zip (22 Bytes)

下載次數: 4

2017-11-1 13:49

下載 (167.49 KB)

2017-11-1 13:50