RasGhul
Well-known Member
- Joined
- Jul 15, 2016
- Messages
- 797
- Office Version
- 365
- Platform
- Windows
Hi all,
Can someone help me convert or code the following to work with an excel table memTBL[NAME] is the first column
Can someone help me convert or code the following to work with an excel table memTBL[NAME] is the first column
VBA Code:
Dim LR As Long
With Sheets("MEMBERS")
LR = .Cells(.Rows.Count, 1).End(xlUp).Row
On Error Resume Next
.Cells(3, 1).Resize(LR - 2).Find(what:=.Cells(2, 8).Value, LookIn:=xlValues, lookat:=xlWhole).Resize(, 6).Delete shift:=xlUp
On Error GoTo 0
.Cells(2, 8).ClearContents
End With