Dim i As Long ' We turn off calculation and screenupdating to speed up the macro. Screen Updating = True End With End Sub Sub Delete Blank Rows2() ' Deletes the entire row within the selection if _ some of the cells WITHIN THE SELECTION contain no data. For more depth see Install a Macro or User Defined Function on my Formula page.Speed and efficiency considerations can be seen in Proper, and other Text changes and in Slow Response.Sub Delete Blank Rows1() ' Deletes the entire row within the selection if the ENTIRE row contains no data. ' We use Long in case they have over 32,767 rows selected. Screen Updating = False ' We work backwards because we are deleting rows. The screenupdating being set to false will also speed up our macro as Excel will not try to repaint the screen each time it changes.
Sub Macro1() ' ' Macro1 Macro ' Macro recorded 3/30/2009 by Ronald A Weller ' Range("B2: Y34"). So I changed the object references so that the worksheet 7 object was assigned the values from the worksheet 6 object.
If you are on a personal connection, like at home, you can run an anti-virus scan on your device to make sure it is not infected with malware.
If you are at an office or shared network, you can ask the network administrator to run a scan across the network looking for misconfigured or infected devices.
If you have some report or details which you want to send in a mail without log-in to your email account.
Item _ (" = True 'Make SMTP authentication Enabled=true (1) New Mail.