The code that I'm using works but only fills in one empty cell at a time and my data range is kinda big and i would have to run the code about a 1K inorder to fill in all the blanks. :confused:
Sub fillArowsIfBlank()
Dim mytest As Range
Set mytest = Range(Range("A69999")...