Tag: 下拉菜单

创build整个数字的dynamic下拉列表

道歉，如果这已经被问到的地方！ 我试图在Excel中创builddynamic下拉列表，其中唯一可用的选项是1和x之间的整数，其中x是任何整数（通常不会大于20左右）。 x由该行另一个单元格中的值定义。 所以理想情况下，我会有一个2列的表，其中一列有整个数字x（代表列表的最大值），其旁边的列将有1和x之间的下拉菜单。 因此，创build数据validation下拉菜单时需要使用的公式是什么。 一些代表：“最小1到最大x范围内的所有数字” 下面是一个看起来如何的例子： 例子 谢谢！

数据validation，无需下拉列表

我想知道是否完全可以在Microsoft Excel（2007）中使用数据validation而不创build下拉列表。 我目前正在制定一个工作的座位计划。 我希望用户能够在单元格（Desk）中自由input名称。 有7队约10-12人。 所以在一个长列表中find一个名字将花费太多的时间。 然而，单元格中input的名称必须与电子表格中其他位置存储的列表完全匹配。 原因是我用一个公式来显示是否每个人都坐着。 如果input名称，而不是确切的我想要一个错误消息popup。 任何想法，如果这是可能的？ 即时开放给VBA。 但是对于VBA来说却是一个完整的noob。 提前致谢。 汤姆

Excel – 多选下拉列表 – 不重复select

我已经开发了我的Excel电子表格，可以使用下面的代码在下拉列表中select多个项目： Private Sub Worksheet_Change(ByVal Target As Range) Dim rngDV As Range Dim oldVal As String Dim newVal As String If Target.Count > 1 Then GoTo exitHandler On Error Resume Next Set rngDV = Cells.SpecialCells(xlCellTypeAllValidation) On Error GoTo exitHandler If rngDV Is Nothing Then GoTo exitHandler If Intersect(Target, rngDV) Is Nothing Then Else Application.EnableEvents = False […]

Excel：创build两列下拉列表，一列依赖于另一列

这似乎是一个简单的问题，我无法find答案。 我在Excel中input产品列表。 我们的商店在这些部门里设置了部门和类别。 我有一列标记为“部门”，从另一张工作表中的名字列表中拉（使用数据validation）。 [也就是说，在“validation：设置”中，源代码是“=部门”，这就是我所指定的部门列表]。 这工作得很好，我理解数据validation。 我将整个Department列设置为使用数据validation在每个新logging上显示此列表。 每次工作，运作良好。 这是问题。 类依赖于部门。 为了使这个简单想象我有2个部门（我真的有大约40个部门和100个class）： 电脑 显示器 每个部门都有自己的产品类别： 电脑=笔记本电脑，台式机，机架式，服务器 显示器= LCD，CRT，OLED 为了存储这些，我在第二张纸上列出了“计算机”的所有类，并将该列表命名为“计算机”。 我在另一张表的C列中列出了三个监视器类，并将该列表命名为“监视器” 如果用户select一个新产品的部门计算机，下一列，class级应显示可能的类为计算机（笔记本电脑，桌面…） 从我读过的所有东西，我应该做一个间接（）查找…我可以很容易地为列中的单个单元格。 我可以去第4行，点击类单元格，并把这个公式进行数据validation： =INDIRECT($AF$4) 在这种情况下，“AF4”是一个具有部门LOWER的计算，其中名称中的空格用下划线replace（然后我在列表中使用相同的命名约定）。 例如： =LOWER(SUBSTITUTE(I17," ","_")) 正如我所解释的，这对单个细胞是有效的。 它不适用于整个列。 也就是说，我不能select整个专栏，并把它放在这个公式中……它总是依附于AF4（或者放在那里的任何东西）。 我需要它来改变每一行。 我已经尝试了所有这些 – 他们都没有工作。 =INDIRECT(OFFSET(INDIRECT(ADDRESS(ROW(), COLUMN())),0,4)) =INDIRECT(ADDRESS(ROW(), "AF")) =INDIRECT(INDIRECT("AF"&ROW())) 几乎每次我收到一个错误说：“源目前评估到一个错误 – 继续？” 这意味着它永远不会工作:-( 我希望这是一些Excel专家在那里帮助我的足够信息。 谢谢！

通过VBA下拉列表进行迭代

我有三个下拉validation列表，我试图编写一些代码，遍历所有可用的“pipe理方法”排列。 我可以找出遍历一个列表的第一步（例如通过Excel下拉列表/validation列表和其他列表迭代 ），但是我无法弄清楚如何通过其中的三个列表。 理想情况下，即使增加了更多的选项，我也希望能够以一种可行的方式编写。 为了达到这个目的，我想你需要一种方法来计算每个列表中有多less个选项，然后从0-n开始迭代。 任何帮助将非常感激。 Sub LoopThroughList() Dim Dropdown1, Dropdown2, Dropdown3 As String Dim Range1, Range2, Range3 As Range Dim option1, option2, option3 As Range ' *** SET DROPDOWN LOCATIONS HERE *** ' *********************************** Dropdown1 = "C6" Dropdown2 = "D6" Dropdown3 = "E6" ' *********************************** ' *********************************** Set Range1 = Evaluate(Range(Dropdown1).Validation.Formula1) Set Range2 = […]

Excel总计（总和）为每个filter标准（文本标准）

目前在Excel 2010中，我在位置列E行1中有一个筛选器（下拉列表）设置。 在该位置filter中有五（5）个不同的位置。 我想要完成什么？ 当我从位置filter（下拉列表）中select1个filter（可以说是芝加哥）时，我希望它显示下面一个单元格中列E（当前35行和展开）的总芝加哥位置（单元格编号可以是任意的可以改变它）。 目前，我有这个公式与整数（数字），但不是文本。 =SUBTOTAL(9,E2:E33) 公式不会抛出错误，但总数为零。 任何想法，我在哪里失败？ 如果我不清楚，请告诉我。

如何创buildExcel下拉菜单，其中必须按特定顺序select项目？

我到处寻找答案。 我想在Excel中创build一个下拉菜单，在项目1b之前必须select“项目1a”; 项目2b之前的项目2a; 项目2c之前的项目2b等。我希望能够以任何顺序select项目1a，项目2a，项目3a等，但是直到select“a”，你不能select“b”。 每个“项目集”都是内部依赖的，但在外部是独立的。 例如：您可以先select项目1a，然后select项目2a，然后select项目2b，然后select项目3a，然后select项目2c，最后select项目1b。 但是你不能select项目1a，项目2b，因为select项目2b的先决条件是在select项目2a之前select项目2a。 这是可能的Excel中，或者我诅咒创造无尽的，复杂的下拉？

基于表中的differt值的Excel下拉列表值

我有下面的表格： AB 1 Fruit Apple 2 Fruit Banana 3 Meat Steak 4 Vegetable Carrot 5 Meat Hamburger 6 Fruit Orange 我希望创build一个下拉列表中的值按B中的唯一值进行分组。我已经设法创build一个下拉列表与A的唯一值，所以如果用户selectA的下拉列表中的一个值，我希望从B得到相应的值。例如： XY 1 Fruit +Apple +Banana +Orange 2 Meat +Steak +Hamburger

如何在Excel 2016中使用VBA创build相关的下拉菜单？

我想要在下面的工作表（规划）的B列中创build一个下拉列表： D3单元格包含要显示的语言。 当在列A中input一个维度时，我想要一个由input的维度过滤的部分的下拉列表。 数据包含在以下工作表（数据）中： 为了使事情复杂化，我希望下拉菜单根据规划中选定的语言来显示数据工作表中的内容。$ D3（如果select英语显示绿色文本，如果select日语显示红色文本）。 只有具有维度和标签==“索引”的行应出现在下拉列表（2，8，15，…）中。 一旦选定，下拉菜单应显示零件数据（蓝色）。 我如何在VBA中创build这样的下拉菜单？

Excel VBA：根据以前的单元格更新更新单元格

我正在使用Excel工作表并使用VBA来完成和更新单元格上的信息。 Excel表中有七列。 其中三个是带有数据validation的下拉列表，我使用了下面的VBA代码来填充它们。 Private Sub TempCombo_KeyDown(ByVal _KeyCode As MSForms.ReturnInteger, _ ByVal Shift As Integer) 'Ocultar caixa de combinação e mover a próxima célula com Enter e Tab Select Case KeyCode Case 9 ActiveCell.Offset(0, 1).Activate Case 13 ActiveCell.Offset(1, 0).Activate Case Else 'Nada End Select End Sub 这些列也使用自动完成，使用下面的代码： Private Sub Worksheet_SelectionChange(ByVal Target As Range) Dim str As […]