Thanks so much. Of course I was trying to use \n as newline and that doesn't work. Need to use ASCII 10 to do that.
Also, trying to use FORMAT at beginning of string, that gave error, so just used empty " " & to use Format. Here is corrected version:
wrd = " " & Format(i, "000000") & " FILL, DECLARE, GLOBAL, DECIMAL, LIST, " & Chr(10) & _
" 'BLIN-NUM', 'CHAN-NUM'," & Chr(10) & _
" 'PCOF1', 'PCOF2', 'PCOF3', " & Chr(10) & _
" 'PCOF4', 'DESC1', 'DESC2', 'DESC3'," & Chr(10) & _
" 'DESC4', " & Chr(10)
oRng.InsertBefore wrd
|