Quote:
Originally Posted by Stewcrew
I am getting #NAME? error. I am not sure I am reading your formula
correctley. I have tried entering this several differant ways, with no luck.
"Gary''s Student" wrote:
Try:
Sub stew()
For Each r In ActiveSheet.UsedRange
If IsEmpty(r) Then
r.Value = "xx"
End If
Next
End Sub
--
Gary''s Student - gsnu200722
|
Reference above code to fill scattered text fields, which works really well but with my database i need to fill the data from the adjuscent cells and so on for example i have my cells as given below:
Material properties
ABC abc track other millimeter
XYZ print drum mech
DDD data all data mixed
I need the input as below
Material Properties
ABC abc track other millimeter
XYZ print drum mech
DDD data all data mixed
Appreciate if any one can help