求高手帮忙写一个删除excel表格第一行的批处理代码。。万分感谢!!!

 我来答
gaaracain
2013-01-23 · TA获得超过358个赞
知道小有建树答主
回答量:343
采纳率:0%
帮助的人:147万
展开全部
是多个sheet还是多个文件的某滚做局个特定表?
假设一个文件中的所有sheet删除第一行,公式如下:
Sub delete()
'
' delete 宏
'
'胡斗 快大让捷键: Ctrl+q
'
Dim sht As Worksheet
Application.ScreenUpdating = False
For Each sht In Worksheets
sht.Activate
sht.Rows("1:1").Select
Selection.delete Shift:=xlUp
Next
End Sub
追问
是多个文件的第一行,我每次需要处理一个文件,每天都得处理。文件名是 item_list.csv
csv的文件能处理么?谢谢
本回答被提问者采纳
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
快恋红
2013-01-23
知道答主
回答量:4
采纳率:0%
帮助的人:6019
展开全部
点那一行的随便一格,然后单击右键会有删除单元格.然后删除整行就可以了
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
浩哥奕弟
2013-01-23 · 杂七杂八想到什么就是什么
浩哥奕弟
采纳数:381 获赞数:956

向TA提问 私信TA
展开全部
Sub abc()
Dim sht As Worksheet
For Each sht In Sheets
sht.Rows(1).Delete
Next
End Sub
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 更多回答(1)
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式