excel - 根据另一列中相应行中的值从一个列中的一行复制单元格

Question

我有一个关于 excel 2003 的邮件列表，我需要根据注册月份发送该邮件列表。

这个列表很大，而且数据经常被编辑、删除和添加。

所以在 QI 列中有月份作为数字 1 月 1 日 5 月 5 日等。然后我在 T 列中有电子邮件地址。

所以每次数字 1 出现在 Q 列中时，我都需要复制 T 列中的相应行

我每个月都需要这样做。

理想情况下，我每个月都有 12 个带有宏的按钮。

我不知道从哪里开始使用宏任何帮助将不胜感激。

Answer 1

这可能适用于 1 月份（尽管基于 Excel 2007 中的宏记录器）：

Sub MacroJan()
    ActiveSheet.Range("A:T").AutoFilter Field:=1, Criteria1:="1"
    Columns("T:T").Select
    Selection.Copy
    Sheets.Add After:=Sheets(Sheets.Count)
    Range("A1").Select
    ActiveSheet.Paste
End Sub  

但由于实际上只使用过滤器、复制和粘贴，因此似乎不需要十几个宏。