返回列表 上一主題 發帖

[發問] 請問 自訂表單 的下拉清單會有大量空白

本帖最後由 lpk187 於 2015-5-26 16:57 編輯

回復 3# starry1314

我先假設你有可能用到A50好了,若沒有用到A50貼只顯示到你有資料之處
在資料驗證的來源處填入如下的函數
=OFFSET(A1,,,COUNTA(A1:A50),)

TOP

回復 3# starry1314


   如圖

TOP

本帖最後由 lpk187 於 2015-5-26 20:49 編輯

回復 6# starry1314


不好意思,我以為是驗證清單
如下:
  1. Private Sub UserForm_Initialize()
  2. arr = Sheets("數據").Range("a2:a" & Sheets("數據").Cells(Rows.Count, 1).End(xlUp).Row)
  3. ComboBox1.List = arr
  4. End Sub
複製代碼

TOP

        靜思自在 : 做好事不能少我一人,做壞事不能多我一人。
返回列表 上一主題