由于用户在编辑Excel表格的过程中，需要隔行删除另一行的内容，但是一个个删除比较麻烦有没有办法可以快速的删除隔行不要的内容，按照下面的方法可快速将隔行内容删掉。宁波新锦程学校教你用宏如何在Excel2003表格中隔行删除另一行。
操作步骤
打开Excel表格，点击菜单栏上的“工具”→“宏（M）”→“宏（M）”。
在“宏名”栏框中填写“宏名称”在点击“创建”。如下图所示！
复制下面代码粘贴到“Microsoft Visual Basic”模块窗口内，关闭“Microsoft Visual Basic”窗口即可保存。
Sub 隔行删除另一行()
Dim iCounter As Integer
Dim iDeleNo As Integer
For iCounter = 1 To 30000
iDeleNo = 2 * iCounter
Rows("" & iDeleNo & ":" & iDeleNo & "").Select
Selection.ClearContents
Next
For iCounter = 1 To 60000
If Rows("" & iCounter & ":" & iCounter & "").Range("A1").Value = "" Then
Rows("" & iCounter & ":" & iCounter & "").Select
Selection.Delete Shift:=xlUp
End If
Next
End Sub
回到Excel主界面再次点击菜单栏上的“工具”→“宏（M）”→“宏（M）”。
或按“Alt+F”快捷键打开“宏命令窗口”选择刚才输入的名称点击“执行”即可。
执行宏命令完后，如下图所示！
来源：办公族
新锦程教学特色：
专业资深认证教员授课，治学严谨、富有耐心和很强的逻辑推理能力。本中心通过理论+操作演示+实践，多种授课方式生动活泼为学员讲解。讲课的内容也不单单局限于书本上的，而是充分结合实际应用，让学员学得好用得上。
1、小班授课（一个班控制在6~8人左右，一人一机）
2、专职教师授课（IT部专职教师，有着多年的教学、工作经验、保证每一位学员的质量，免费为基础差的学员做单独辅导）
3、免费重修（学不会可以免费再重新学习，学员的出勤率在90%以上）
4、免费推荐实习和就业
学校长期以来面向社会招收：
办公软件培训、电子商务淘宝培训、平面设计师、CAD设计师、UG模具设计培训、Pro/E模具造型师培训、商务英语培训、专业英语培训、网络工程师、硬件维修工程师培训等人才。
新锦程中心的优势所在：
★课程务实：开设的课程是根据IT企业市场调查、IT发展趋势所精致设计的。课程包含精挑细选的实用技巧、生动的操作案例、丰富的项目实训，由浅入深、循序渐进、内容丰富，侧重实际操作与应用。
★价格实惠：甬城最实惠的电脑技术课程为您量身定做，让您花最少的钱，学更多的知识。
★教学特色：小班授课，以保证教学质量；“理论+实验”的教学模式，整合真实项目案例，使学员在动手实践中将知识融汇贯通；各种学习内部实验手册和复习资料免费提供给学员；并为基础薄弱的学员提供免费重听的机会。
★就业服务：新锦程与宁波本地很多IT企业建立了良好的合作关系，及时为学员提供工作机会，并提供简历优化、面试辅导等职业技巧服务；为学员的就业提供了良好的交流平台和保障。
新锦程教育郑重承诺：
我们的综旨重在教学质量与教学水平，让每位学员学到技术和真本领，课程均采用小班形式，理论专业、实践全真案例教学。宁波新锦程教育教师教学经验丰富,我们的承诺百分百包学会，学不会免费重学。
【报名方式】
- 课程咨询热线：13567894462 咨询QQ：86518852（节假日正常）
- 现场报名地址：宁波海曙区薛家南路盛世华城（集城广场对面）
- 网络报名：
- QQ交谈：
李老师
在线咨询
