多语言展示
当前在线:653今日阅读:23今日分享:25

在VBA中,如何编写隔行删除代码?

本篇经验将和大家分享【在VBA中,如何编写隔行删除代码?】
工具/原料
1

电脑一台

2

OFFICE办公软件

方法/步骤
1

实例【只保留表中第一行的标题?】

2

在工作表中,点击菜单栏【开发工具】,在其工具栏内,点击【visual basic】!

3

会进入VBA编辑界面!点击菜单栏【插入】,在其下拉菜单中,选择【模块】!

4

会弹出模块编辑窗口!

5

在代码编辑窗口输入以下代码:Sub 隔行删除但保要留第一行表头()Dim j%, i As Integeri = Application.CountA(Columns(1))For j = 3 To iRows(j).deleteNextEnd Sub

6

在VBA窗口,点击【运行】按钮!

7

我们会看到,除第一行表题外其他红色标题被删除了!

推荐信息