Programmers,
I REALLY need your your Help speeding up some code.
In one worksheet a table has 70,000 rows.
In column "Q" (17), 40,000 cells have numbers; 30,000 are empty rows.
I need to convert these numbers into text
by adding a single quote (') before each number.
My code sorts the table in Column Q A-Z,
So the numbers are at the top
Then loop through each column:
Can you provide any other method to yield the same result??
Respectfully,
John Annapolis, MD
I REALLY need your your Help speeding up some code.
In one worksheet a table has 70,000 rows.
In column "Q" (17), 40,000 cells have numbers; 30,000 are empty rows.
I need to convert these numbers into text
by adding a single quote (') before each number.
My code sorts the table in Column Q A-Z,
So the numbers are at the top
Then loop through each column:
Code:
lRow = 2
Do While .cells(lRow, 17).value <> ""
.cells(lRow, 17).value = "'" & .cells(lRow, 17).value
lRow = lRow + 1
Loop
Can you provide any other method to yield the same result??
Respectfully,
John Annapolis, MD