返回列表 上一主題 發帖

(陣列問題)將某一直欄存至陣列中並取出某陣列值所在的列數

(陣列問題)將某一直欄存至陣列中並取出某陣列值所在的列數

本帖最後由 greetingsfromtw 於 2016-10-7 12:45 編輯

各位前輩好,
小弟初學陣列,有個問題想請教,
附檔及程式碼如下:

20161007-問題-取出陣列值的列數.zip (13.17 KB)
  1. Sub arrayTest()

  2. Dim ar

  3. Range("a2").Resize(Cells(Rows.Count, 1).End(xlUp).Row, 1).Select
  4. Selection.Resize(Selection.Rows.Count - 1, 1).Select


  5. ar = Selection

  6. MsgBox ar(3, 1)

  7. ar(3, 1).Select

  8. End Sub
複製代碼
假設今天有一欄位,此例為A欄,
想把該欄位(從A2開始)的非空白儲存格存進陣列中,
並取出該陣列值的所在列數,

不知是否可行?

小弟試著用msgbox去顯示陣列的值,可以正常顯示,
但是想要顯示該陣列值的所在列數,
就會提示錯誤:
此處需要物件,

希望前輩可以不吝指點迷津,十分感謝.

回復 2# PKKO


很謝謝PKKO大熱心提供的程式碼,
確實這樣就可以選取了,
我再研究一下.

再次感謝.

TOP

        靜思自在 : 靜坐常恩己過、閒談莫論人非。
返回列表 上一主題