Excel - 为下拉列表中的项目着色

Excel - 为下拉列表中的项目着色

我在 Excel 上创建了一个下拉列表,但其中有很多项目。我想对列表中的项目进行分类,并使相似的项目以相同的颜色显示。到目前为止,我所能找到的只是如何根据我选择的项目(使用条件格式)为包含下拉列表的单元格着色,但我实际上如何为下拉列表中的项目着色?

答案1

我实际上如何为下拉列表中的项目着色?

无法使用内置下拉菜单执行此操作

如果真的是必须的,那么您可以使用这样的列表开发自己的表格,但那样的话就会非常复杂。

答案2

这解决了这个问题:

方法 1:

以下是非 VBA(宏)方法,可与工作表上的下拉菜单一起使用。

在此处输入图片描述


怎么运行的:

  • 在 中创建源数据H126:H128
  • 选择单元格I126
  • 来自的确认ata TAB。
  • 选择H126:H128作为列表源,结束k.

在此处输入图片描述


  • 选择单元格I126并来自H部分 TAB 命中C条件格式。
  • 然后新规则,现在选择F格式化仅单元格包含。
  • 为了Rule,选择选项单元格值,等于单元格 $H$126。

在此处输入图片描述


  • 应用适当的单元格格式并完成k.
  • 对其他颜色重复步骤 5 至 8。

开始单击下拉菜单您将获得颜色效果。


編輯:

方法 2:

:警告:

由于无法将颜色直接应用于下拉菜单,因此唯一的选择就是使用组合框的宏(VBA 代码)。

这包括 VBA 宏和组合框、Active X 控件。


在此处输入图片描述


在此处输入图片描述


怎么运行的:

  • 要打开 VBA 编辑器,请按Alt+F11或者R右键单击 Sheet TAB。
  • 来自项目资源管理器窗口,双击电视他的工作簿图标。
  • 将此代码复制并粘贴为标准模块。

     Private Sub Workbook_Open()

     Application.EnableEvents = False


    With Sheet1.ComboBox1
        .AddItem "Fruits"
        .AddItem "Vegetables"
        .AddItem "Soaps"
        .AddItem "Beverages"
    End With

      Application.EnableEvents = True
    End Sub

注意: 您可以放置​​您自己的物品清单(可编辑)。


  • F点击菜单C丢失并返回 Microsoft Excel 或命中Alt+Q

  • 现在在 Sheet 上,来自开发者 TAB 命中设计并从左侧单击插入。

  • AactiveX 控件选择Combobox 图标并在工作表的合适位置绘制。

  • R右键单击C功能区框并从弹出菜单中选择绳索。

在此处输入图片描述

  • 设置字体颜色和链接单元格属性。

注意:您可以根据需要设置字体颜色和线条单元格(可编辑)。

  • 现在CCombo 框及其C悬挂事件C奥皮&粘贴此代码。

    Private Sub ComboBox1_Change()

    Cells.Range("A6").Select
    Cells.Range("A6").Font.ColorIndex = 3       

    '=== below shown Font Bold, Name & Size properties are optional you may skip.

     Selection.Font.Bold = True

     With Selection.Font
        .Name = "Calibri"
        .Size = 11
     End With
     End Sub

  • Alt+Q保存并返回工作表。
  • 最后从开发者TABC再次舔取消激活按钮来停用它。

注意:

  • 将工作簿另存为已启用 acro (.xlsm)。
  • 现在组合框已准备好工作了。

  • 查看上面的屏幕截图。

相关内容