宏删除Excel中所有现有图纸的第一行
我有一个excel文件,大约有300张工作表,我需要删除第一行。 您能建议使用VBA代码来执行此操作吗宏删除Excel中所有现有图纸的第一行,excel,vba,Excel,Vba,我有一个excel文件,大约有300张工作表,我需要删除第一行。 您能建议使用VBA代码来执行此操作吗 提前谢谢 至少尝试发布您尝试过的内容 以下代码将删除活动工作簿中所有工作表中的第一个 Sub LoopThroughSheets() Dim ws As Worksheet For Each ws In ActiveWorkbook.Worksheets ws.Range("1:1").Delete Next ws End Sub 至少尝试发布您尝试过的
提前谢谢 至少尝试发布您尝试过的内容 以下代码将删除活动工作簿中所有工作表中的第一个
Sub LoopThroughSheets()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Range("1:1").Delete
Next ws
End Sub
至少尝试发布您尝试过的内容 以下代码将删除活动工作簿中所有工作表中的第一个
Sub LoopThroughSheets()
Dim ws As Worksheet
For Each ws In ActiveWorkbook.Worksheets
ws.Range("1:1").Delete
Next ws
End Sub
尝试对每张图纸使用
,
循环:)。祝您度过愉快的一天:)尝试对每张图纸使用,
循环:)。祝你有愉快的一天:)我尝试了这两个建议。第一个没有运行,但第二个(由Sathish K提供)完成了任务。谢谢你们!很高兴我能帮忙。别忘了接受适当的回答我尝试了这两个建议。第一个没有运行,但第二个(由Sathish K提供)完成了任务。谢谢你们!很高兴我能帮忙。请不要忘记接受相应的回答。请在删除后的第一行,用task do replace all“”替换为“”(带空符号)来更新宏。我的意思是,在删除第一行之后,要对每张图纸中新的第一行进行替换。如果用两个周期完成,也可以。您好,请在删除后的第一行中,用task do replace all“”更新宏。我的意思是,在删除第一行之后,要对每张图纸中新的第一行进行替换。如果用两个循环完成,也可以。