VBA宏之自动抓取关键文字并填充到指定单元格

最新推荐文章于 2023-12-09 16:31:12 发布

原创

最新推荐文章于 2023-12-09 16:31:12 发布 · 1.4k 阅读

0 ·

CC 4.0 BY-SA版权

文章标签：

#excel

文章描述了一个使用VBA编写的Excel宏，用于检查特定列中的IPTV或TV字样，并在符合条件的单元格旁标记，最后将处理后的数据保存为前一天日期命名的文件。

需求如下：

最后一列字段名称为“IPTV”；

判断最后的数据是在哪一行？

某两列中筛选含有“IPTV”或“TV”，最后一列对应就为“IPTV”，否则为空；

最后生成的结果另存为指定日期名称的Excel文件；

Sub 判断平台是否为IPTV()

'定义变量
Dim Lastrow, i As Long
Dim Startrow, Startcolumn As Long

'确认当前单元格所在行列
Startrow = 3
Startcolumn = 14

'确认当前单元格最后一行有数据的是在哪一行
Lastrow = Cells(1000000, Startcolumn).End(<