![]() |
|
#5
|
|||
|
|||
|
Inputs sheet - > Delete the Empty rows & replace heading names " but unfortunately code is not working .
Code:
Sheets("Inputs").Select
Dim i As Long, Lastrow As Long
Lastrow = Range("D" & Rows.Count).End(xlUp).Row
For i = Lastrow To 1 Step -1
If Cells(i, "D").Value = "" Then
Cells(i, "D").EntireRow.Delete
End If
Next
Sheets("Inputs").Select
Cells.Find(What:="Business Agreement ID", After:=ActiveCell, LookIn:=xlFormulas, _
LookAt:=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, _
MatchCase:=False, SearchFormat:=False).Activate
Cells.Replace What:="Business Agreement ID", Replacement:="Invoice Number", LookAt:= _
xlPart, SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
HTML Code:
Kindly look into this on priority |
| Tags |
| macro find and replace, vba macro |
| Thread Tools | |
| Display Modes | |
|
|
Similar Threads
|
||||
| Thread | Thread Starter | Forum | Replies | Last Post |
| VBA Code to create a Macro | Shazz | Outlook | 0 | 03-10-2015 09:52 AM |
Looking Again for Another Code/Macro
|
rsrasc | Word VBA | 5 | 11-16-2014 05:47 AM |
| Style in Use Macro-Need Help Optimizing Code | freda0255 | Word VBA | 4 | 08-04-2014 07:35 PM |
VBA Code for adding Macro to QAT
|
OTPM | Project | 4 | 08-22-2013 01:33 PM |
| Need Macro code for Outlook | gbaker | Outlook | 0 | 04-11-2013 10:29 AM |