Tag: listbox

列表框文本在Userform Excel VBA中缩进

[ 更新：提供的截图 ] 如何删除excel用户窗体中的列表框的文本缩进？ 我一直在努力寻找这个解决scheme很长一段时间，我找不到任何帮助在线或离线。 我可以做一个文本框，但将SelectionMargin属性设置为False 。 但是我找不到这个列表框。 我试图附上截图，但我没有10声望。 🙁 截图： 任何帮助，将不胜感激。 谢谢。

如何使用Apache POI在Java中读取Excel ListBox值

如何使用Apache POI在Java中读取Excel ListBox值？ 在networking上，这是讨论这个问题的唯一线索。 http://apache-poi.1045710.n5.nabble.com/sample-code-to-read-excel-listbox-values-td2308018.html 但是这个代码不起作用。 它使用这个代码 HSSFWorkbook workbook = null; HSSFSheet sheet = null; HSSFRow row = null; HSSFCell cell = null; HSSFDataValidation dataValidation = null; try { inputStream = new java.io.FileInputStream(new java.io.File("C:/temp/data validation.xls")); workbook = new HSSFWorkbook(inputStream); sheet = workbook.getSheetAt(0); validationRecords = sheet.getDVRecords(); 但是在我使用的HSSF版本中，“getDVRecords”方法在HSSFSheet中不可用。 有没有更好的工作代码？ 编辑：我已经有代码读取正常单元格或下拉列表的值。 我正在寻找代码来阅读列表框。 列表框是您可以select多个值的地方。 列表框不绑定到任何特定的单元格。 它们以叠加在表单上的组件forms出现 请参考这个链接看看如何添加列表框。 这将有助于更好地理解我的问题。 http://office.microsoft.com/en-in/excel-help/add-a-list-box-or-combo-box-to-a-worksheet-HP010236681.aspx

Excel VBA Multicollumn列表框添加非连续的范围

我试图找出如何添加一个不连续的单元格的行范围到多列列表框，但只有第二行波纹pipe的作品。 lbxSelectable.List = Sheets("DB").Range("A1,B1,C1").Value lbxSelectable.List = Sheets("DB").Range("A1:C1").Value 是否有任何有效的function，可以让我select连续的某些列并将其粘贴在多列列表框的条目中？ 非常感谢

Excel 2010 VBA创buildActiveX列表框给出'对象不支持此属性或方法'

我试图用这个代码清除所有的ActiveX对象，然后创build一个ActiveX列表框。 在“对象不支持此属性或方法”创build列表框结果。 Sub DeleteActiveXObjects() Dim oOBJECT As Shape For Each oOBJECT In Sheets("Search").Shapes If oOBJECT.Type = 12 Then oOBJECT.Delete Next oOBJECT ActiveSheet.Select End Sub Sub CreateListBox() Dim oLISTBOX As OLEObject Set oLISTBOX = Sheets("Search").OLEObjects.Add(classtype:="Forms.ListBox.1") Sheets("Search").ListBox1.Object.IntegralHeight = False Sheets("Search").ListBox1.Object.Font.Size = 11 Sheets("Search").ListBox1.Top = 220.5 Sheets("Search").ListBox1.Left = 20 Sheets("Search").ListBox1.Width = 1100 Sheets("Search").ListBox1.Height = 500.25 End Sub 然而，如果我将代码分成一个创buildListBox的Sub，然后一个设置属性，如果我手动执行它们，它工作正常。 […]

操纵11列的列表框

我有一个11列的列表框。 当我尝试将数据添加到其中一列时，出现错误。 ListBox1.Column(10, j) = shtG.Cells(k, 13) 我不明白为什么会发生这种情况，用户窗体上的列表框的列数为11 。 我得到的错误 ： “运行时错误380：无法设置列属性。无效的属性值。 所选单元格的值是“组16”。 更多信息： 码： 'adding this doesn't help ListBox1.Clear ListBox1.ColumnCount = 20 While shtG.Cells(k, 1) <> "" If 'some long working condition Then frmTP.ListBox1.AddItem (shtG.Cells(k, kolID)) frmTP.ListBox1.Column(1, j) = shtG.Cells(k, kolVnm) & strSpace & shtG.Cells(k, kolTV) & strSpace & shtG.Cells(k, kolAnm) frmTP.ListBox1.Column(2, j) = […]

VBA列表框问题

我的列表框有问题。 在用户窗体初始化事件我使用下面的代码来填充它： RecordSelectionBox.List = WorkingCopy.Worksheets(1).Range("A2:P20").Value 哪个工作得很好。 我有列宽调整，也很好。 一旦用户select了一条logging，从列表框中的一行，我将一堆标签的标题设置为列表框列的值。 它填写标签说明1至15就好了。 当它命中16我得到一个错误“无法获得列属性。无效的参数”“运行时错误”-2147024809（80070057）'“ 这里是代码： Explanation.Caption = RecordSelectionBox.Column(16) RecordSelectionBox.ColumnCount的debug.print显示我确实有16列。 解释字段是我使用的字段中最长的字段，但我不确定是否会看到这会成为问题。 如果有人有一个想法，我全部耳朵。

用命名范围填充列表框

我正在开展我的第一个VBA项目，需要一些绝对的新手指导。 我有一个工作人员将用来提交每日KPI的提交表格。 我有一个名为“lstName”的用户表单中的列表框控件，员工将在提交表单之前使用它们select其名称 员工姓名存储在名为“EmpName”的“Sheet11”上的命名范围内。 我想指示列表框从Sheet11上的“EmpName”范围中绘制名称列表; 但不知道如何在VBA中做到这一点。 我打算使用RowSource将列表框指向数据，但是我失去了如何做到这一点。 真的很简单的问题，我知道，它可能已经在网站上以某种方式回答，但由于我是VBA的新手，答案是超出了我的。 如果有人可以提供一个解决什么代码是做得很出色的答案。

在Excel工作表上填充第二列+列表框

我有一个Excel 2007工作表上的ActiveX列表框。 我想直接填充它，而不是通过将其RowSource属性指向一个范围，因为没有范围具有所需的值。 列表框的ColumnCount设置为2.我将ColumnWidths设置为“20; 20”，现在它返回：20 pt; 20 pt 所以据我所知，列表框中的两列应该是可用的，对吗？ 填充第一列是没有问题的： activesheet.lstApplyCurves.List = array("Select All","Deselect All","aaa","bbb","ccc") （要么） activesheet.lstApplyCurves.additem activesheet.lstApplyCurves.List(0,0) = "Col1, Row1" 但是，我如何填充第2列？ 我得到一个错误380（“无法设置列表属性。无效的属性值。”）： activesheet.lstApplyCurves.List(0,1) = "Col2, Row1" FWIW我也试过这个，但得到同样的错误： activesheet.lstApplyCurves.List(1,1) = "Col2, Row2" 所以…我如何在第二列设置数值？ 更新： 除了下面的答案，FWIW我还发现可以将一个multidimensional array分配给List属性，这是更快的： Dim ArrayToListbox() As Variant ReDim ArrayToListbox(0 To 4, 0 To 2) ArrayToListbox(0, 0) = "Select All" ArrayToListbox(1, 0) = […]

从Excel列表框（多选）作为列或范围输出

我有一个汇总报告是指另一张表上的多个国家的原始数据。 用户可以使用简单的validation单元格下拉菜单select要显示的国家/地区的数据。 然而，这是单选，我希望使这个列表多选。 看来我应该使用一个列表框（ActiveX）来做到这一点。 我创build了一个国家范围的列表框，但我找不到如何使用所选国家。 我想将选定的国家输出到表单中的一列中，或者直接input到公式中引用的范围。 这是可能的，还是有更好的方法？

VBA多选列表框，用所选项填充列

我有一个多选列表框填充另一个工作表的独特的城市名称。 它只有一列数据在列表中。 它是填充下面的代码是在一些可爱的人们协助堆栈交换开发的。 在这个列表框中，我希望将用户select的项目填入同一张表中的列a中。 我敢肯定，这只是几行代码，但我不知道如何去做，我没有任何成功的计数在列表中select的项目。 任何帮助非常感谢。 干杯 Sub FilterUniqueData_multi() Dim Lrow As Long, test As New Collection Dim Value As Variant, temp() As Variant ReDim temp(0) Dim Value1 As Variant Dim endrow As Long On Error Resume Next Set Billed_sheet = Workbooks("Billed_customers.xlsx").Sheets("Non Household Metered Users") With Billed_sheet 'clear formatting to get rid of merging .Range("a:v").ClearFormats […]