过滤数据集中的特定月份,并将该过滤月份的每一天替换为第一天(excel vba)

时间:2015-10-20 22:46:38

标签: excel-vba replace find range vba

这是一个关于如何在VBA中创建将执行以下操作的宏的问题:

我想基本上只在每月的第一天(2015年1月10日)更换一天中的一个月(即2015年1月10日,2015年2月10日等等)一个特定的专栏。

因此宏将根据列标题(合同日期)“找到”列,然后它将替换该月第一天的2015年10月(必须是特定年份)的所有日期。

所以我可以让宏取代某个预先确定的值:

Sub ReplaceTitleMs()
Columns("V").Replace    What:="10/02/2015", _
                        Replacement:="10/01/2015", _
                        LookAt:=xlPart, _
                        SearchOrder:=xlByRows, _
                        MatchCase:=False, _
                        SearchFormat:=False, _
                        ReplaceFormat:=False

但我无法弄清楚如何过滤到特定月份并替换多个值(不列出宏中的每一种可能性)。

请帮忙! :)

1 个答案:

答案 0 :(得分:0)

Columns("V").Replace What:="10/*/2015", Replacement:="10/1/2015", _
                    LookAt:= xlPart, SearchOrder:=xlByRows, _
                    MatchCase:=False