delete rows for values
Hi,
Highlight column C and apply text to columns
"Jake" wrote:
Hello,
I have code that I hoped would iterate through a column and delete rows if
values did not begin with a 7.
For Each rngDBSingleCostElemCell In wksSheet.Range("C2:C" &
lCostElemItemLastRow)
If Left(rngDBSingleCostElemCell, 1) < 7 Then
rngDBSingleCostElemCell.Rows.Delete
End If
Next rngDBSingleCostElemCell
The values in column C are numbers stored as text.
For some reason rows with values like 16101, 16151 remain.
thanks for any help.
Jake
|