Tag: dynamic

Excel：如何基于数据表创builddynamic数据validation列表: 想象一下，我正在为我的孩子在Excel中编写菜单计划（比我的实际问题更容易描述）… 我有一个可用的食物列表：苹果，香蕉，胡萝卜，date，鸡蛋，鱼等我有一个孩子的名单：约翰，凯伦，Lional，麦克等然后，我有一个简单的表格，列出每个孩子喜欢的食物：在约翰的专栏里，会有一个对苹果，香蕉和鱼类的“X”，但是对其他人是空的。 JKLM ————— axxx bxx cxxx dx exx fx 现在，在我的菜单计划的主要部分，我想要有一些数据validation的单元格，允许我使用上面的“喜欢”表为每个孩子select食物： Name Food A2 B2 单元格A2将包含数据validation，使单元格下拉列表中包含所有孩子的名字（J，K，L，M）（这很容易 – 我可以做那个！）单元格B2需要包含一个dynamic生成的所选小孩喜欢的食物列表。所以，如果我在A2中selectJohn，那么B2列表就是{a，b，f}。如果我select莱昂内尔，B2列表将是{a，b，c，e}。显然，随着孩子口味的变化，我可以通过添加/删除“x”来更新我的'喜欢'表，并且B2中的下拉菜单将自动更新。如何创build单元格B2的下拉validation列表？（我宁愿这样做，而不诉诸VBA请）

Excel VBA脚本dynamic添加系列到图表: 我试图dynamic添加多个系列到折线图。事前我不知道有多less系列，所以需要dynamic的。我想到的但是不起作用的是：工作表ActiveSheet（或Sheets（“Data”））从C14开始具有行，直到包含从E14：Eend到R14：Rend的XValues和Columns的Cend，其中“end”标记由列C确定的最后一行数据。存储在第9行。XValues对于所有系列都是一样的。我的大问题是，我无法find一种方法来dynamic地将所有的数据列连同相应的名称一起添加到我的图表中。我不是VBA的专家，所以请善待。我已经阅读了各种资料，并尝试了很多脚本，似乎没有任何工作。对象目录有点帮助，但是我的问题依然存在。 Sub MakeChart() Dim LastColumn As Long Dim LastRow As Long Dim i As Integer Dim u As Integer Dim NameRng As String Dim CountsRng As Range Dim xRng As Range LastColumn = ActiveSheet.Cells(8, Columns.Count).End(xlToLeft).Column ColumnCount = LastColumn – 4 LastRow = ActiveSheet.Range("C" & ActiveSheet.Rows.Count).End(xlUp).Row ' Debug.Print ("Last […]

Excel VBA中的dynamic函数调用: 我只是好奇，如果有可能dynamic调用函数的方式。例如。 Sub foo1() Debug.Print "in foo1" End Sub Sub foo2() Debug.Print "in foo2" End Sub 有没有办法可以做到这样的事情： Sub callSomeFoo(i as Integer) Call foo&i End Sub 或者是这样的必要的东西： Sub callSomeFoo(i as Integer) Select Case i Case 1 Call foo1 Case Else Call foo2 End Select End Sub 没有紧迫的事情…只是好奇。任何其他有创意的事情都可以做function调用。谢谢！编辑1：这是我有的代码和下面列出的错误： Sub foo1() Debug.Print "in foo1" End […]

使用INDIRECT的dynamic图表范围：该函数无效（尽pipe范围突出显示）: 我正在尝试创build一个使用INDIRECT函数dynamic构build的图表。 Excel确实使用INDIRECT识别我创build的范围，因为它突出显示了工作表上的相应范围：但是，当保存图表时，我收到一条错误消息，提示该函数无效：有人知道问题是什么/如何创build一个从特定的开始到特定的终点的dynamic图表范围？ PS：你可以在这里下载上面的电子表格。我使用的公式是： =INDIRECT("sheet!"&E2&":"&E3)