I have the below code and with the help of Sid, it works as I wish. However, now I need for it to actually go through the i = 6 to 100, but if it encounters a blank cell, simply go to the next cell. Between 6 and 100 are several blank fields separating data groupings, but I need to be sure the all non-blank fields are used.
For i = 6 To 15
.Range(strColumnRange & i).Name = .Range(strColumnRangeText & i).Value