Tag: 下拉菜单

Excel多个Drop-Boxes

我正在试图创build一个电子表格,其中1 = Name 2 = Month。 我试图做到这一点,如果你select月份和名称,它会显示相应的数据。 有人可以请帮助最好的方式来做到这一点? 请让我知道如果我需要详细阐述我的问题。 由于我无法上传照片…我已经尝试提供和下面的例子来澄清。 我能够使用Vlookup只使用一个下拉框,但我并没有很好的运用第二个Dropbox。 任何帮助将不胜感激! John Adam Rob Win Lost Win Lost Win Lost January 15 1 50 3 30 5 February 20 2 45 2 35 4 March 25 3 40 1 10 6 Name Adam Month February Win 45 Lost 2

从列A:数字和列B:项目创build的Excel下拉列表,然后减less选项

我想列出所有的水果在我的篮子里,然后给我的朋友水果,这样做下拉列表中的选项自动减less。 A列:水果数量B列:水果C列:名称D列:下拉列表 例如,我有1个菠萝,0个苹果和2个桔子。 当我给第一个朋友结果时,从下拉列表中select“ananas”; “橙子”; “橙子”。 如果我给我的朋友一个菠萝,那么下拉列表变成“橙色”,其他人变成“橙色”,等等。 是否有可能用Excel做到这一点? 如果是这样,是否有可能没有VBA,数据validation和正则expression式? 谢谢。

如何使用下拉列表单元格中的条件格式?

我有两个下降(让说G-1和G-2)和卡车将从下降装载。 这个G-1和G-2将在D1单元格的下拉列表中。 如果我从下拉列表中selectG-1,则必须使用条件格式进行validation:stock> =指定的数量和卡车的容量<= 30 mt> = 10 mt。 如果满足D1的条件应该用绿色突出显示,否则应该用红色突出显示。 在同一个单元格中,如果我selectG-2,我必须根据不同的值validation相同的条件。 单元格A1 =股票 单元格B1 =指定数量 单元格C1 =卡车容量 单元格D1 =带有选项“G-1”,“G-2”的下拉列表。

Excelmacros – 删除条件下拉列表中的值

好的,我有一个macros分配给一个button来隐藏一个标签,取决于下拉列表的值。 Sub Hide_Tabs() ' Hide unused Tabs If Sheet4.Range("G2") = Sheet13.Range("B154") Then Sheet5.Visible = False Else Sheet16.Visible = False End If End Sub 在我所有的testing中都能正常工作,而且如果单元格B8的值发生变化,我也有一个分配给工作表(而不是模块)的macros来删除单元格下方的值,我使用它作为条件下拉列表。 (例如,Cel B8具有砖的types列表,并且B9具有取决于砖的types的可用颜色的列表) Private Sub Worksheet_Change(ByVal Target As Range) On Error Resume Next 'Call dropdowns on column 2 (B) Row 8 If Target.Column = 2 And Target.Row = 8 Then If Target.Validation.Type […]

如何在Excel中创build一个下拉列表来筛选表格?

我在Sheet 1有一个表格,标题如下: 地区列表—–缺陷列表 Sheet 2的表格如下: 区—– —–缺陷原因—–诸如此类 我想在工作Sheet 2上创build一个关于工作Sheet 2中缺陷的下拉列表,并只显示相应区域的缺陷。 问题是有很多区域,每个区域都有很多缺陷,所以例如区域A在第一个桌子上可能会出现10次。 我已经尝试了什么? 为每个区域创build一个分区表,但是区域太多,不值得 创build一个命名范围,但是,新的缺陷将不断包含在第一个表格中 我也尝试了=OFFSET(INDEX(Table1;MATCH(F5;Table1[List of Areas];0));;1;COUNTIF(Table1[List of Areas];F5))与间接命令结合使用。 但是,鉴于表格是在不同的表中,我无法访问它们。 我怎样才能解决这个问题?

从下拉菜单中select选项以显示表格的一行

我有这个表的例子: 我想创build一个电子表格,提供两个下拉菜单,一个用于名称和一个参数。 我希望用户从A到F中select,然后显示所选选项的Name , ID , Occupation和Location 。 然后,我希望用户能够从Parameter列中进行select,但只能select特定的行(例如,如果他们selectA,那么参数下拉菜单的唯一选项将是A1-A5)。当他们select参数时要显示解释。 最后的结果将是他们所select的行显示。 这可能在Excel中吗? 我试图插入下拉列表,但他们给出了所有行的长列表,当我只想要下拉显示六个选项自动对焦。

VBA迭代下拉列表

我有一个电子表格,J1是一个下拉列表。 第8-14行中的内容将根据您在J1中select的内容进行更改。 我需要遍历下拉列表中的所有值,并将所有相应的行复制到新的工作簿。 复制粘贴部分正在工作,但我有问题迭代通过下拉列表。 特别是,我需要一些帮助来定义Formula1。 我正在使用excel 2010.这是我的代码。 提前致谢 Sub iterate_dropdown() Dim inputRange As Range Dim c As Range Dim Current As Range Set inputRange = Evaluate(Workbooks("sample.xlsm").Worksheets("Credit Research Journal").Range("J1").Validation.Formula1) For Each c In inputRange Workbooks("sample.xlsm").Worksheets("Credit Research Journal").Range("J1").Value = c.Value Workbooks("sample.xlsm").Sheets("Credit Research Journal").Activate Workbooks("sample.xlsm").RefreshAll FinalRow = Cells(Rows.Count, 1).End(xlUp).Row Cells(8, 1).Resize(FinalRow – 7, 10).Copy Workbooks("Book2.xlsm").Sheets("Sheet3").Activate NextRow = Cells(Rows.Count, […]

Excel:从第一行开始有10行下拉

如果在第一行有一个类别标题,我试图获得它,以便我可以单击Cell A1的箭头,它将“扩展/撤回”它下面的10行。 为愚蠢的问题道歉,我能find的所有关于谷歌是关于分组,但我不认为这就是我想要的。 当我尝试分组时,只是在左侧打开了一个额外的工具。 我正在寻找一个箭头,在它下面延伸和缩回几行。

Excel:如果列A和B中选定的date不匹配,则触发C列中的特定下拉列表

我有一个电子表格如下: 在P和Q列中,用户可以从下拉列表中selectdate。 如果select的date匹配,我希望列R中的相应单元格表示“N / A”。 如果所选单元格不匹配,我想要一个下拉列表出现在R列的相应单元格中。 列名是瑞典语。

Excel VBA – 级联下拉菜单清除/重置

这是我的第一篇文章,我很激动。 另外有点强调,因为我需要很快find一个解决我的问题的工作,但是我们会到达那里。 所以,我想出了一个两张excel文件。 一个(“数据库”)有一个大约一百行我们项目的表格,其中一列是“地区”和“办公室”。 该地区是项目所在地,办公室是该地区内哪个办事处pipe理该项目。 第二个工作表(“dashboard2”)有一套使用复杂公式的指标。 两个下拉菜单(我曾经把它们称为表单控件combobox,但它似乎像Excel命名为“下拉1”和“下拉2”)允许用户select一个区域和办公室。 第二个下拉菜单已经根据第一个下拉菜单的值从已命名的范围中进行select。 这是伟大的。 现在,你可能会看到我要去的地方:除了当我改变区域时,“办公室”不会重置,这一切都可以正常工作。 更具体地说,如果我select该地区的第一个区域和第四个办事处,然后切换到第二个区域,那么我将为该地区的第四个办事处提供数据,而不是消隐第二个下拉菜单。 我不熟悉VBA,我已经尽了最大的努力去做所有事情。 但是,在这种情况下,感觉就像是必须的,我被困住了。 使用各种网站和教程,我有以下代码: Private Sub DropDown1_Change() myVal = ThisWorkbook.Sheets("Dashboard2").DropDown1.Value 'loop thru col G of Database lr = ThisWorkbook.Sheets("Database").Cells(Rows.Count, 1).End(xlUp).Row 'clear combobox 2 ThisWorkbook.Sheets("Dashboard2").DropDown2.Clear 'loop thru For x = 10 To lr If myVal = ThisWorkbook.Sheets("Database").Cells(x, 8) Then 'add to combobox ThisWorkbook.Sheets("Dashboard2").DropDown2.AddItem ThisWorkbook.Sheets("Database").Cells(x, 7) End […]