Excel将值复制到范围中的下一个可用单元格

Question

我正在制作一个电子表格，我找不到足够接近我正在寻找的答案，而且我的VBA知识非常基础。

我有一个电子表格来跟踪谁在哪个团队中，我希望有一个'主列表'并从列F的下拉列表中选择员工进入哪个团队。我会喜欢然后复制Cell C，D＆amp; E进入为该团队指定的范围中的下一个可用单元格，例如，Teamee A显示在Team1的团队列表中，但现在已移至Team2，因此我希望将它们从Team1的范围集中删除并移动到为Team2设置的范围中的下一个可用单元格（理想情况下采用该范围内的值）。这两张纸被命名为“名称”和“团队列表”。

这是否可能，尤其是对VBA的基本了解？

此致

Cr1kk0

Answer 1

如果（比方说）单元格A1包含值为Team1，Team2等的下拉列表，并且有相应的范围名为Team1，Team2等，则：

Dim myRange as Range
Set myRange = Range(Range("A1").Value)

将myRange定义为下拉列表当前值选择的范围。

要引用范围内的单个单元格，请使用Cells属性，例如：

myRange.Cells(3, 1).Value = "Fred Bloggs"

指的是myRange的第三行和第一列中的单元格。

要查找范围内的值，请使用（例如）：

pos = Application.WorksheetFunction.Match("Fred Bloggs", myRange, 0)

返回内容与“Fred Bloggs”完全匹配的单元格myRange中的位置（但如果没有这样的单元格则会出错）。