Redistributing OR Split Column Info Into Separate Rows

[snb]

or

Sub M_snb()
  c00="G:\OF\example.txt"

  with creatobject("scripting.filesystemobject")
     .createtextfile(c00).write replace(.opentextfile(c00).readall,"%",vbcrlf)
  end with
  
  workbooks.open c00
End Sub