时间戳

首页 > 解决方案 > 在从组合框中选择项目的模式下显示两个值（列）-VBA

excel - 在从组合框中选择项目的模式下显示两个值（列）-VBA

问题描述

Combobox1列出了Sheet1 Excel中单元格A和B的两列值。但是通过选择一项，仅显示单元格 A（隐藏单元格 B）。如何在选择模式下显示两个值？

我的 VBA 代码：

Private Sub UserForm_Initialize()
Dim xrg   As Range
Set xrg = ThisWorkbook.Worksheets("Sheet1").Range("A1:B5")
With Me.ComboBox1
  .List = xrg.Value
  .ColumnCount = 2
End With
End Sub

标签： excelvbacomboboxuserform

解决方案

你根本不能

但你可以解决它：

  • 在组合框值显示中放置两个文本框，每个文本框与一个“列”重叠

文本框重叠组合框

在此处输入图像描述

在此处输入图像描述

  • 将以下代码放在用户表单代码窗格中：

    Private Sub ComboBox1_Change()
    If Me.ComboBox1.ListIndex > -1 Then
        Me.TextBox1.Value = Me.ComboBox1.List(Me.ComboBox1.ListIndex, 0)
        Me.TextBox2.Value = Me.ComboBox1.List(Me.ComboBox1.ListIndex, 1)
    End If
End Sub

（更改文本框名称以匹配您的选择）

推荐阅读