Note: The other languages of the website are Google-translated. Back to English
登陆  \/ 
x
or
x
点此注册  \/ 
x

or

Excel下拉列表:创建,编辑,删除和更多高级操作

下拉列表类似于列表框,允许用户从选择列表中选择一个值。 本教程将演示下拉列表的基本操作:在excel中创建,编辑和删除下拉列表。 除此之外,本教程还为下拉列表提供了高级操作,以增强其功能以解决更多Excel问题。

本教程主要介绍: (单击下面或右边的目录中的任何标题,以导航到相应的内容。)


创建简单的下拉列表

对于使用下拉列表,您需要首先学习如何创建它。 本节提供了6种方法来帮助您在Excel中创建下拉列表。

从一系列单元格创建下拉列表

在此演示从Excel中的单元格区域创建下拉列表的步骤。 请做如下

1.选择一个单元格范围以查找下拉列表。

窍门:您可以通过按住,同时为多个不连续的单元格创建下拉列表 按Ctrl 键,一一选择单元格。

2。 点击 数据 > 数据验证 > 数据验证.

3。 在里面 数据验证 对话框中的 设置 标签,请进行以下配置。

3.1)在 下拉列表,选择列表;
3.2)在 来源 框,选择要在下拉列表中显示的值的单元格范围;
3.3)点击 OK 按钮。

说明:

1)您可以选中或取消选中 忽略空白 框取决于您要如何处理选定范围内的空白单元格;
2)确保 单元内下拉 框被选中。 如果未选中此框,则在选择单元格时不会出现下拉箭头。
3)在 来源 框,您可以手动输入以逗号分隔的值,如下面的屏幕截图所示。

现在,下拉列表已创建。 单击下拉列表单元格时,将在其旁边显示一个箭头,单击箭头以展开列表,然后可以从中选择一个项目。

从表创建动态下拉列表

您可以将数据范围转换为Excel表,然后根据表范围创建动态下拉列表。

1.选择原始数据范围,然后按 按Ctrl + T 键。

2。 点击 OK 在弹出 创建表 对话框。 然后将数据范围转换为表格。

3.选择一个单元格区域以放入下拉列表,然后单击 数据 > 数据验证 > 数据验证.

4。 在里面 数据验证 对话框,您需要:

4.1)选择 名单 下拉列表;
4.2)在表格中选择表格范围(不包括标题) 来源 框;
4.3)点击 OK 按钮。

然后创建动态下拉列表。 在表范围内添加或删除数据时,下拉列表中的值将自动更新。

使用公式创建动态下拉列表

除了从表范围创建动态下拉列表之外,您还可以使用公式在Excel中创建动态下拉列表。

1.选择要在其中输出下拉列表的单元格。

2。 点击 数据 > 数据验证 > 数据验证.

3。 在里面 数据验证 对话框,请进行以下配置。

3.1)在 框中选择 名单;
3.2)在 来源 框中,输入以下公式;
=偏移($ A $ 13,0,0,COUNTA($ A $ 13:$ A $ 24),1)
备注:在此公式中,$ A $ 13是数据范围的第一个单元格,而$ A $ 13:$ A $ 24是您将基于其创建下拉列表的数据范围。
3.3)点击 OK 按钮。 看截图:

然后创建动态下拉列表。 在特定范围内添加或删除数据时,下拉列表中的值将自动更新。

从命名范围创建下拉列表

您还可以从Excel中的命名范围创建下拉列表。

1.首先,创建一个命名范围。 选择您要基于其创建命名范围的单元格范围,然后在范围名称中键入 名称: 框,然后按 输入 键。

2。 点击 数据 > 数据验证 > 数据验证.

3。 在里面 数据验证 对话框,请进行以下配置。

3.1)在 框中选择 名单;
3.2)点击 来源 框,然后按 F3 键。
3.3)在 粘贴名称 对话框中,选择您刚才创建的范围名称,然后单击 OK 按钮;
提示:您也可以手动输入 =范围名称来源 框。 在这种情况下,我将输入 =城市.
3.4)点击 OK 当它返回到 数据验证 对话框。 看截图:

现在,将使用来自命名范围的数据创建下拉列表。

从另一个工作簿创建下拉列表

假设有一本名为“源数据”,并且您要根据此“中的数据”在另一个工作簿中创建下拉列表源数据”工作簿,请执行以下操作。

1.打开“ SourceData”工作簿。 在此工作簿中,选择要创建的数据下拉列表,在其中输入范围名称 名称: 框,然后按 输入 键。

在这里,我将范围命名为City。

2.打开要插入的工作表下拉列表。 请点击 公式 > 定义名称.

3。 在里面 新名字 在对话框中,您需要根据在工作簿“ SourceData”中创建的范围名称创建一个命名范围,请进行以下配置。

3.1)在 名称: 框;
3.2)在 框中,输入以下公式。
= SourceData.xlsx!City
3.3)点击 OK 保存

说明:

1)。 在公式, 源数据 是工作簿的名称,其中包含您将基于其创建下拉列表的数据; 城市 是您在SourceData工作簿中指定的范围名称。
2)。 如果源数据工作簿的名称中包含空格或其他字符(例如-,#…),则需要用单引号将工作簿名称引起来,例如 ='Source Data.xlsx'! 市.

4.打开您将插入下拉列表的工作簿,选择下拉列表的单元格,然后单击 数据 > 数据验证 > 数据验证.

5。 在里面 数据验证 对话框,请进行以下配置。

5.1)在 框中选择 名单;
5.2)点击 来源 框,然后按 F3 键。
5.3)在 粘贴名称 对话框中,选择您刚才创建的范围名称,然后单击 OK 按钮;
窍门:您也可以手动输入 =范围名称来源 框。 在这种情况下,我将输入 =测试.
5.4)点击 OK 当它返回到 数据验证 对话框。

现在,下拉列表已插入到选定范围内。 下拉值来自另一个工作簿。

使用出色的工具轻松创建下拉列表

在这里强烈推荐 创建简单的下拉列表 实用程序 Kutools for Excel。 使用此功能,您可以轻松创建具有特定单元格值的下拉列表,也可以使用在Excel中预设的自定义列表创建下拉列表。

1.选择要插入的单元格下拉列表,然后单击 库工具 > 下拉列表 > 创建简单的下拉列表.

2。 在里面 创建简单的下拉列表 对话框,请进行以下配置。

3.1)在 适用于 框,您可以看到所选范围显示在此处。 您可以根据需要更改应用的单元格范围。
3.2)在 来源 部分,如果您要基于单元格区域的数据创建下拉列表,或者只需要手动输入值,请选择 输入值或引用单元格值 选项。 在文本框中,选择单元格范围或键入值(以逗号分隔),然后将基于该值创建下拉列表。
3.3)点击 OK.

备注:如果要基于在Excel中预设的自定义列表创建下拉列表,请选择 自定义列表 在选项 来源 部分中,在 自定义列表 框,然后单击 OK 按钮。

现在,下拉列表已插入到选定范围内。


编辑下拉列表

如果要编辑下拉列表,此部分中的方法可能会对您有所帮助。

根据单元格范围编辑下拉列表

要根据单元格范围编辑下拉列表,请执行以下操作。

1.选择要编辑的包含下拉列表的单元格,然后单击 数据 > 数据验证 > 数据验证.

2。 在里面 数据验证 对话框中,更改单元格引用 来源 框,然后单击 OK 按钮。

根据命名范围编辑下拉列表

假设您添加或删除命名范围内的值,并且基于该命名范围创建下拉列表。 要在下拉列表中显示更新的值,请执行以下操作。

1。 点击 公式 > 名称管理员.

窍门:您可以打开 名称管理员 按下 按Ctrl + F3 键。

2。 在里面 名称管理员 窗口,您需要配置如下:

2.1)在 名称: 框,选择要更新的命名范围;
2.2)在 部分,单击按钮 为下拉列表选择更新的范围;
2.3)点击 关闭 按钮。

3.然后 微软的Excel 弹出对话框,单击 按钮保存更改。

然后基于此命名范围的下拉列表将更新。


删除下拉列表

本节讨论在Excel中删除下拉列表。

使用Excel内置功能删除下拉列表

Excel提供了一个内置功能,可帮助从工作表中删除下拉列表。 请执行以下操作。

1.选择包含要删除的下拉列表的单元格区域。

2。 点击 数据 > 数据验证 > 数据验证.

3。 在里面 数据验证 对话框中,单击 全部清除 按钮,然后单击 OK 保存更改。

现在,下拉列表将从选定范围中删除。

使用出色的工具轻松删除下拉列表

Kutools for Excel 提供了一个方便的工具- 清除数据验证限制s 以帮助轻松地一次从一个或多个选定范围中删除下拉列表。 请执行以下操作。

1.选择包含要删除的下拉列表的单元格区域。

2。 点击 库工具 > 防止打字 > 清除数据验证限制。 看截图:

3.然后 Kutools for Excel 弹出对话框询问您是否清除下拉列表,请单击 OK 按钮。

然后,将立即删除此选定范围内的下拉列表。


添加颜色到下拉列表

在某些情况下,您可能需要创建一个以颜色编码的下拉列表,以便一眼就能区分出下拉列表单元格中的数据。 本节提供了两种方法来帮助您详细解决问题。

使用条件格式将颜色添加到下拉列表

您可以为包含下拉列表的单元格创建条件规则,以使其具有颜色编码。 请执行以下操作。

1.选择包含要对其进行颜色编码的下拉列表的单元格。

2。 点击 首页 > 条件格式 > 管理规则.

3。 在里面 条件格式规则管理器 对话框中,单击 新规则 按钮。

4。 在里面 新格式规则 对话框,请进行以下配置。

4.1)在 选择规则类型 框,选择 仅格式化包含以下内容的单元格 选项;
4.2)在 仅格式化带有 部分,选择 特定文本 从第一个下拉列表中选择 包含 从第二个下拉列表中,然后在第三个框中选择源列表的第一项;
窍门:在这里,我在第三个文本框中选择单元格A16。 A16是我创建下拉列表所基于的源列表的第一项。
4.3)点击 格式 按钮。
4.4)在 单元格格式 对话框,转到 标签,为指定的文本选择背景色,然后单击 OK 按钮。 或者,您可以根据需要为文本选择某种字体颜色。
4.5)点击 OK 当它返回到 新格式规则 对话框。

5.返回到 条件格式规则管理器 对话框,重复上述步骤3和4,为其他下拉菜单项指定颜色。 指定完颜色后,点击 OK 保存更改。

从现在开始,当从下拉列表中选择项目时,单元格将根据选定的文本以指定的背景色突出显示。

使用出色的工具轻松添加颜色到下拉列表

这里介绍 彩色下拉列表 的特点 Kutools for Excel 帮助您轻松在Excel的下拉列表中添加颜色。

1.选择包含要添加颜色的下拉列表的单元格。

2。 点击 库工具 > 下拉列表 > 彩色下拉列表.

3。 在里面 彩色下拉列表 对话框,请执行以下操作。

3.1)在 适用于 部分,选择 下拉列表单元格 选项;
3.2)在 数据验证(下拉列表)范围 框,您可以看到所选的单元格引用显示在其中。 您可以根据需要更改单元格范围;
3.3)在 清单项目 框(此处显示选定范围内的所有下拉项目),选择一个您要为其指定颜色的项目;
3.4)在 选择颜色 部分,选择背景色;
备注:您需要重复步骤3.3和3.4为其他项目指定不同的颜色;
3.5)点击 OK 按钮。 看截图:

窍门:如果要根据下拉列表选择突出显示行,请选择 数据范围行 在选项 适用于 部分,然后选择要在 突出显示行 框。

现在,下拉列表使用颜色编码,如下面的屏幕截图所示。

根据下拉列表选择突出显示单元格

根据下拉列表选择突出显示行


在Excel或Google表格中创建从属下拉列表

从属下拉列表有助于显示选择,具体取决于第一个下拉列表中选择的值。 如果您需要在Excel工作表或Google工作表中创建一个从属(层叠)下拉列表,则本节中的方法可能会对您有所帮助。

在Excel工作表中创建一个依赖下拉列表

下面的演示在Excel工作表中显示从属下拉列表。

请点击 如何在Excel中创建从属级联下拉列表? 以获得逐步指南教程。

在Google工作表中创建一个依赖下拉列表

如果要在Google工作表中创建从属下拉列表,请参阅 如何在Google表格中创建从属下拉列表?


创建可搜索的下拉列表

对于工作表中包含较长项目列表的下拉列表,从列表中选择某个项目并不容易。 如果您记得某个项目的初始字符或几个连续的字符,则可以在下拉列表中执行搜索功能以轻松对其进行过滤。 本节将演示如何在Excel中创建可搜索的下拉列表。

假设您要基于Sheet1的A列中的位置创建下拉列表的源数据,如下图所示。 请执行以下操作以使用这些数据在Excel中创建可搜索的下拉列表。

1.首先,使用数组公式在源数据列表旁边创建一个帮助器列。

在这种情况下,我选择单元格B2,在其中输入以下公式,然后按 按Ctrl + 转移 + 输入 键以获得第一个结果。

=IFERROR(INDEX($A$2:$A$50,SMALL(IFERROR(MATCH(IF(FIND(CELL("contents"),$A$2:$A$50)>0,$A$2:$A$50,""),$A$2:$A$50,0),""),ROW(A1))),"")

选择第一个结果单元格,然后拖动其 填充手柄 一直到列表末尾。

备注:在此数组公式中,$ A $ 2:$ A $ 50是您将基于其创建下拉列表的源数据范围。 请根据您的数据范围进行更改。

2。 点击 公式 > 定义名称.

3。 在里面 编辑名称 对话框,请进行以下配置。

3.1)在 名称: 框中,输入命名范围的名称;
3.2)在 框中,输入以下公式;
=OFFSET(Sheet1!$B$2,0,0,COUNTA(Sheet1!$B$2:$B$50)-COUNTIF(Sheet1!$B$2:$B$50,""),1)
3.3)点击 OK 按钮。 看截图:

现在,您需要基于命名范围创建下拉列表。 在这种情况下,我将在Sheet2中创建可搜索的下拉列表。

4.打开Sheet2,为下拉列表选择单元格范围,然后单击 数据 > 数据验证 > 数据验证.

5。 在里面 数据验证 对话框,请执行以下操作。

5.1)在 框中选择 名单;
5.2)点击 来源 框,然后按 F3 键;
5.3)在弹出 粘贴名称 对话框中,选择您在步骤3中创建的命名范围,然后单击 OK;
窍门:您可以直接输入命名范围为 =命名范围来源 框。
5.4)点击 错误警报 标签,取消选中 输入无效数据后显示错误警报 框,最后单击 OK 按钮。

6.右键单击工作表选项卡(Sheet2),然后选择 查看代码 从右键单击菜单中。

7.在开幕 Microsoft Visual Basic应用程序 窗口中,将下面的VBA代码复制到代码编辑器中。

VBA代码:在Excel中创建可搜索的下拉列表

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
Application.Calculate
End Sub

8。 按 其他 + Q 关闭键 Microsoft Visual Basic应用程序 窗口。

现在创建了可搜索的下拉列表。 如果要提取一个项目,只需在下拉单元格中输入该项目的一个或几个连续字符,单击下拉箭头,然后基于输入内容的项目就会在下拉列表中列出。 看截图:

备注:此方法区分大小写。


创建下拉列表,但显示不同的值

假设您已经创建了一个下拉列表,从中选择项目时,您希望在单元格中显示其他内容。 如下面的演示所示,您已经基于国家/地区名称列表创建了一个下拉列表,当从下拉列表中选择国家/地区名称时,您想要在下拉单元格中显示所选国家/地区名称的缩写。 本节提供了VBA方法来帮助您解决问题。

1.在源数据的右侧(“国家名称”列),创建一个新列,其中包含要在下拉单元格中显示的国家名称的缩写。

2.选择国家名称列表和缩写列表,然后在 名称: 框,然后按 输入 键。

3.选择下拉列表的单元格(此处选择D2:D8),然后单击 数据 > 数据验证 > 数据验证.

4。 在里面 数据验证 对话框,请进行以下配置。

4.1)在 框中选择 名单;
4.2)在 来源 在框中,选择源数据范围(在这种情况下为国家名称列表);
4.3)点击 OK.

5.创建下拉列表后,然后右键单击工作表选项卡,然后选择 查看代码 从右键单击菜单中。

6.在开幕 Microsoft Visual Basic应用程序 窗口中,将下面的VBA代码复制到代码编辑器中。

VBA代码:在下拉列表中显示不同的值

Private Sub Worksheet_Change(ByVal Target As Range)
'Updateby Extendoffice 20201027
    selectedNa = Target.Value
    If Target.Column = 4 Then
        selectedNum = Application.VLookup(selectedNa, ActiveSheet.Range("dropdown"), 2, False)
        If Not IsError(selectedNum) Then
            Target.Value = selectedNum
        End If
    End If
End Sub

说明:

1)在代码中,该行中的数字4 如果Target.Column = 4 然后代表您在第3步和第4步中创建的下拉列表的列号。如果您的下拉列表位于F列,请将数字4替换为6;否则将数字替换为XNUMX。
2)“下拉第五行中的“”是您在第2步中创建的范围名称。您可以根据需要进行更改。

7。 按 其他 + Q 关闭键 Microsoft Visual Basic应用程序 窗口。

从现在开始,当从下拉列表中选择某个国家名称时,所选国家名称的相应缩写将显示在单元格中。


创建带有复选框的下拉列表

许多Excel用户倾向于创建带有多个复选框的下拉列表,以便他们只需勾选复选框即可从列表中选择多个项目。

如下面的演示所示,当单击包含下拉列表的单元格时,将出现一个列表框。 在列表框中,每个项目之前都有一个复选框。 您可以勾选复选框以在单元格中显示相应的项目。

如果要在Excel中创建带有复选框的下拉列表,请参阅 如何在Excel中创建具有多个复选框的下拉列表?.


将自动完成添加到下拉列表

如果您有一个包含大项目的数据验证下拉列表,则需要在列表中上下滚动以找到合适的列表,或者直接在列表框中键入整个单词。 如果下拉列表在输入第一个字母时可以自动完成,那么一切将变得更加容易。

有关使下拉列表在Excel工作表中自动完成的信息,请参见 在Excel下拉列表中键入时如何自动完成?.


根据下拉列表选择过滤数据

本节将演示如何应用公式来创建下拉列表过滤器,以便基于从下拉列表中的选择提取数据。

1.首先,您需要创建一个下拉列表,其中包含提取数据所基于的特定值。

窍门:请按照上述步骤操作 在Excel中创建一个下拉列表.

创建具有唯一项列表的下拉列表

如果您的范围内有重复项,并且您不想创建一个重复项的下拉列表,则可以按以下方式创建唯一项列表。

1)复制您将基于创建的单元格下拉列表 按Ctrl + C 键,然后将它们粘贴到新的范围。

2)选择新范围内的单元格,单击 数据 > 删除重复.

3)在 删除重复 对话框中,单击 OK 按钮。

4)然后 微软的Excel 弹出窗口告诉您要删除多少重复项,请单击 OK.

现在您获得了项目的唯一列表,现在可以基于此唯一列表创建下拉列表。

2.然后,需要创建三个助手列,如下所示。

2.1)对于第一助手列(在这里我选择D列作为第一助手列),将以下公式输入到第一个单元格中(列标题除外),然后按 输入 键。 选择结果单元格,然后拖动 填充手柄 一直向下直到到达范围的底部。
=行($ A $ 2:A2)
2.2)对于第二个帮助器列(E列),在单元格E2中输入以下公式,然后按 输入 键。 选择E2,然后拖动 填充手柄 到范围的底部。
注意:如果在下拉列表中未选择任何值,则公式的结果将在此处显示为空白。
= IF(A2 = $ H $ 2,D2,“”)
2.3)对于第三个帮助列(F列),在F2中输入以下公式,然后按 输入 键。 选择F2,然后拖动 填充手柄 到范围的底部。
备注:如果在下拉列表中未选择任何值,则公式的结果将显示为空白。
= IFERROR(SMALL($ E $ 2:$ E $ 17,D2),“”)

3.根据原始数据范围创建一个范围,以使用以下公式输出提取的数据。

3.1)选择第一个输出单元格(在这里我选择J2),在其中输入以下公式,然后按 输入 键。
=IFERROR(INDEX($A$2:$C$17,$F2,COLUMNS($J$2:J2)),"")
3.2)选择结果单元格,然后拖动 填充手柄 跨到右边的两个单元格。
3.3)保持选择范围J2:l2,将填充手柄一直向下拖动直到到达范围的底部。

说明:

1)如果在下拉列表中未选择任何值,则公式的结果将显示为空白。
2)您可以根据需要隐藏三个帮助器列。

现在创建了一个下拉列表过滤器,您可以基于下拉列表选择轻松地从原始数据范围中提取数据。


从下拉列表中选择多个项目

默认情况下,下拉列表允许用户每次在一个单元格中仅选择一项。 在下拉列表中重新选择项目时,先前选择的项目将被覆盖。 但是,如果要求您从下拉列表中选择多个项目并在下拉单元格中显示所有项目,如下面的演示所示,该怎么办?

要从Excel的下拉列表中选择多个项目,请参阅 如何在Excel中创建具有多个选择或值的下拉列表?。 本教程详细提供了两种方法来帮助您解决问题。


设置下拉列表的默认(预选)值

默认情况下,下拉列表单元格显示为空白,下拉箭头仅在您单击该单元格时出现。 如何一目了然地找出哪些单元格包含工作表中的下拉列表?

本节将演示如何在Excel中为下拉列表设置默认(预选)值。 请执行以下操作。

在应用以下两种方法之前,需要创建下拉列表并进行如下配置。

1.选择下拉列表的单元格,然后单击 数据 > 数据验证 > 数据验证.

窍门:如果您已经创建了下拉列表,请选择包含下拉列表的单元格,然后单击 数据 > 数据验证 > 数据验证.

2。 在里面 数据验证 对话框,请进行以下配置。

2.1)在 框中选择 名单;
2.2)在 来源 框,选择您将在下拉列表中显示的源数据。
窍门:对于已经创建的下拉列表,请跳过这两个步骤。
2.3)然后转到 错误警报 标签,取消选中 输入无效数据后显示错误警报 框;
2.4)点击 OK 按钮。

创建下拉列表后,请应用以下方法之一为其设置默认值。

使用公式设置下拉列表的默认值

您可以按照下面的步骤使用以下公式为创建的下拉列表设置默认值。

1.选择下拉列表单元格,在其中输入以下公式,然后按 输入 键显示默认值。 如果下拉列表单元格是连续的,则可以拖动 填充手柄 结果单元格以将公式应用于其他单元格。

= IF(C2 =“”,“-从列表中选择项目-”)

说明:

1)在公式中 C2 是下拉列表单元格旁边的空白单元格,您可以根据需要指定任何空白单元格。
2) -从列表中选择项目- 是要显示在下拉列表单元格中的默认值。 您也可以根据需要更改默认值。
3)该公式仅在从下拉列表中选择项目之前有效,从下拉列表中选择项目之后,默认值将被覆盖并且公式将消失。
使用VBA代码一次为工作表中的所有下拉列表设置默认值

假设有很多下拉列表位于工作表中的不同范围内,要为所有列表设置默认值,则需要重复应用公式。 那很费时间。 本节提供了有用的VBA代码,可用于您一次为工作表中的所有下拉列表设置默认值。

1.打开包含您要设置默认值的下拉列表的工作表,然后按 其他 + F11 键打开 Microsoft Visual Basic应用程序 窗口。

2。 在里面 Microsoft Visual Basic应用程序 窗口中,单击 插页 > 模块,然后将下面的VBA代码粘贴到“代码”窗口中。

VBA代码:一次为工作表中的所有下拉列表设置默认值

Sub SetDropDownListToDefaultValue()
'Updated by Extendoffice 20201026
Dim xWs As Worksheet
Dim xRg, xFRg As Range
Dim xET: xET = Null
Dim xStr As String
xStr = "- Choose from the list -"
Set xWs = Application.ActiveSheet
Set xRg = xWs.UsedRange.Cells
    On Error Resume Next
    For Each xFRg In xRg
    xET = Null
    xET = xFRg.Validation.Type
    If Not IsNull(xET) Then
        If xFRg.Validation.Type = 3 Then
            xFRg.Value = "'" & xStr
        End If
    End If
    Next
End Sub

说明:在上面的代码中, - 从列表中选择 - 是要显示在下拉列表单元格中的默认值。 您也可以根据需要更改默认值。

3。 按 F5 键,然后弹出一个“宏”对话框,请确保 下拉列表到默认值 在中选择 宏名 框,然后单击 运行 按钮运行代码。

然后,将指定的默认值立即填充到下拉列表单元格中。


增加下拉列表字体大小

通常,下拉列表具有固定的字体大小,如果字体大小很小以至于无法读取,则可以尝试使用以下VBA方法进行放大。

1.打开包含要放大字体大小的下拉列表的工作表,右键单击工作表选项卡,然后选择 查看代码 从右键单击菜单中。

2。 在里面 Microsoft Visual Basic应用程序 窗口中,将下面的VBA代码复制到代码编辑器中。

VBA代码:放大工作表中下拉列表的字体大小

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
'updateby Extendoffice 20201027
    On Error GoTo LZoom
    Dim xZoom As Long
    xZoom = 100
    If Target.Validation.Type = xlValidateList Then xZoom = 130
LZoom:
    ActiveWindow.Zoom = xZoom
End Sub

备注: 这里 x变焦= 130 代码中的表示您将把当前工作表中所有下拉列表的字体扩大到130。您可以根据需要进行更改。

3。 按 其他 + Q 关闭键 Microsoft Visual Basic应用程序 窗口。

从现在开始,当单击下拉单元格时,当前工作表的缩放级别将被放大,单击下拉箭头,您会看到所有下拉项的字体大小也被放大。

从下拉列表中选择项目后,您可以单击下拉单元格之外的任何单元格以返回到原始缩放级别。


最佳办公效率工具

Kutools for Excel解决了您的大多数问题,并使您的生产率提高了80%

  • 重用: 快速插入 复杂的公式,图表 以及您以前使用过的任何东西; 加密单元 带密码 创建邮件列表 并发送电子邮件...
  • 超级公式栏 (轻松编辑多行文本和公式); 阅读版式 (轻松读取和编辑大量单元格); 粘贴到过滤范围...
  • 合并单元格/行/列 不会丢失数据; 拆分单元格内容; 合并重复的行/列...防止细胞重复; 比较范围...
  • 选择重复或唯一 行; 选择空白行 (所有单元格都是空的); 超级查找和模糊查找 在许多工作簿中; 随机选择...
  • 确切的副本 多个单元格,无需更改公式参考; 自动创建参考 到多张纸; 插入项目符号,复选框等...
  • 提取文字,添加文本,按位置删除, 删除空间; 创建和打印分页小计; 在单元格内容和注释之间转换...
  • 超级滤镜 (将过滤方案保存并应用于其他工作表); 高级排序 按月/周/日,频率及更多; 特殊过滤器 用粗体,斜体...
  • 结合工作簿和工作表; 根据关键列合并表; 将数据分割成多个工作表; 批量转换xls,xlsx和PDF...
  • 超过300种强大功能。 支持Office / Excel 2007-2019和365。支持所有语言。 在您的企业或组织中轻松部署。 完整功能30天免费试用。 60天退款保证。
kte选项卡201905

Office选项卡为Office带来了选项卡式界面,使您的工作更加轻松

  • 在Word,Excel,PowerPoint中启用选项卡式编辑和阅读,发布者,Access,Visio和Project。
  • 在同一窗口的新选项卡中而不是在新窗口中打开并创建多个文档。
  • 每天将您的工作效率提高50%,并减少数百次鼠标单击!
officetab底部
Say something here...
symbols left.
You are guest
or post as a guest, but your post won't be published automatically.
Loading comment... The comment will be refreshed after 00:00.
  • To post as a guest, your comment is unpublished.
    通りすがりのわんこ · 3 months ago
    こちらはOffice365ですが、どうやらそのコーディングでは動作しないようです。
    代わりに初歩的ですが、以下にて動作を確認出来ました。

    Private Sub Worksheet_SelectionChange(ByVal Target As Range)

    Dim xZoom As Variant
    If (Target.Row >= 11 And Target.Row <= 35 And Target.Column >= 3 And Target.Column <= 6) Then
    ActiveWindow.zoom = 150
    Else
    ActiveWindow.zoom = 60
    End If
    End Sub