小男孩‘自慰网亚洲一区二区,亚洲一级在线播放毛片,亚洲中文字幕av每天更新,黄aⅴ永久免费无码,91成人午夜在线精品,色网站免费在线观看,亚洲欧洲wwwww在线观看

搜索
分享

Excel | 如何給列表框控件（ListBox）添加條目、設置列寬、添加標題？ | 控件,添加,ListBox,條目

 陳永平Davy 2019-05-24

Q：如何給列表框控件（ListBox）添加條目、設置列寬、添加標題？

A：一、添加條目以下幾種方法都可以。
1、在控件的 RowSource 屬性輸入引用的單元格地址。
知識擴展：輸入單元格地址后，在窗體中將直接顯示可以看到的結果，如下圖所示：
如何給列表框控件（ListBox）添加條目、設置列寬、添加標題？

注意：在控件的 RowSource 屬性輸入引用的單元格地址時，必須包含工作表名，否則，顯示的條目將是活動工作表的單元格內容。
2、在窗體的 Initialize 事件設置RowSource 屬性，示例代碼如下：
  1. Private Sub UserForm_Initialize()
  2.     Me.ListBox1.RowSource = "Sheet1!A1:A6"
  3. End Sub
3、使用 AddItem 方法，示例代碼如下：
  1. Private Sub UserForm_Initialize()
  2.     With Me.ListBox1
  3.         .RowSource = ""
  4.         .AddItem "初中及以下"
  5.         .AddItem "高中或中專"
  6.         .AddItem "大專"
  7.         .AddItem "本科"
  8.         .AddItem "碩士研究生"
  9.         .AddItem "博士研究生"
  10.     End With
  11. End Sub
4、使用數組對 ListBox 的 List 屬性賦值，示例代碼如下：
  1. Private Sub UserForm_Activate()
  2.     MyList = Array("初中及以下", "高中或中專", "大專", "本科", "碩士研究生", "博士研究生")
  3.     Me.ListBox1 .RowSource = ""
  4.     Me.ListBox1.List = MyList
  5. End Sub
二、添加多列、并設置列寬和標題，示例代碼如下：
  1. Private Sub UserForm_Initialize()
  2.     With Me.ListBox1
  3.         .RowSource = "Sheet1!I2:K7"
  4.         .ColumnCount = 3  '設置3列
  5.         .ColumnHeads = True '設置標題
  6.         .ColumnWidths = "30;30;30"  '設置列寬
  7.     End With
  8. End Sub
注意：有列標題時，不要把列標題包含RowSource屬性的單元格區(qū)域，VBA會自動取RowSource指向的單元格區(qū)域第1行上方的行單元格。
知識擴展：列寬由ColumnWidths屬性決定，每個數字間用半角分號隔開，列寬單位為磅（pints），既1/72英寸。

    本站是提供個人知識管理的網絡存儲空間，所有內容均由用戶發(fā)布，不代表本站觀點。請注意甄別內容中的聯系方式、誘導購買等信息，謹防詐騙。如發(fā)現有害或侵權內容，請點擊一鍵舉報。
    轉藏 分享 獻花（0）

    0條評論

    發(fā)表

    請遵守用戶 評論公約

    類似文章 更多