Find data in Column D, add L in Column A
Hello Frank,
this is great seems to be working as a charm. One last
thing. At end of last record entered, I put a summary(
Represents an S) and total of how many records it contains.
Example,
L TEST
L TEST2
S2
Is there w way I can put S in Column A after last record?
and in Column B the total count of records? I can do it
manually but since doing a macro trying to have less
manual input.
Would appreciate if this can be done. But THANK YOU So
Much for getting back to me this fast YOu have helped me
in the past and Really Appreciate it ALOT. THANKS,
JUAN
-----Original Message-----
Hi
try the following macro:
Sub process_rows()
Dim lastrow As Long
Dim row_index As Long
Application.ScreenUpdating = False
lastrow = ActiveSheet.Cells(Rows.Count, 4).End(xlUp).Row
For row_index = 1 to lastrow
If Cells(row_index, 4).Value <"" and _
cells(row_index,1).value="" then
cells(row_index,1).value="L"
End If
Next
Application.ScreenUpdating = True
End Sub
--
Regards
Frank Kabel
Frankfurt, Germany
"juan" schrieb im Newsbeitrag
...
Hello All,
I have a sheet that in Column A the default value will
be
L for those rows that contain information. I'm creating
a
macro so would like to put a code in there that will put
an L in Column A if there is data in Column D.
Example
Column A ColumnD
L MICROTEST
L LECTRATEST
L SAMPLE
Since total rows will change on a monthly basis I can't
have a specific range.
Would appreciate the help.
Thanks,
Juan
.
|