Want to protect your cyber security and still get fast solutions? Ask a secure question today.Go Premium

x
?
Solved

Delete the first row of every worksheet

Posted on 2011-03-15
2
Medium Priority
?
213 Views
Last Modified: 2012-05-11
I simply need to delete the first row of every worksheet in an Excel workbook.
0
Comment
Question by:thomasd04
2 Comments
 
LVL 85

Accepted Solution

by:
Rory Archibald earned 2000 total points
ID: 35139407
Manually, you can select the first sheet, hold Shift and click the last sheet tab, then delete the first row.
In code:
Sub DelRow1()
   Dim wks as Worksheet
   For each wks in activeworkbook.worksheets
      wks.rows(1).delete
   next wks
End sub

Open in new window

0
 
LVL 3

Author Comment

by:thomasd04
ID: 35139514
Thanks! The VB code worked perfectly.
0

Featured Post

Microsoft Certification Exam 74-409

Veeam® is happy to provide the Microsoft community with a study guide prepared by MVP and MCT, Orin Thomas. This guide will take you through each of the exam objectives, helping you to prepare for and pass the examination.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

Having trouble getting your hands on Dynamics 365 Field Service or Project Service trial? Worry No More!!!
Access developers frequently have requirements to interact with Excel (import from or output to) in their applications.  You might be able to accomplish this with the TransferSpreadsheet and OutputTo methods, but in this series of articles I will di…
This Micro Tutorial will demonstrate how to use longer labels with horizontal bar charts instead of the vertical column chart.
Finds all prime numbers in a range requested and places them in a public primes() array. I've demostrated a template size of 30 (2 * 3 * 5) but larger templates can be built such 210  (2 * 3 * 5 * 7) or 2310  (2 * 3 * 5 * 7 * 11). The larger templa…

580 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question