title: Separate into new rows within cell
body: <p>I want to modify/format text which is in the cell like:
  <a href="https://i.stack.imgur.com/cGtll.jpg" rel="nofollow noreferrer"><img src="https://i.stack.imgur.com/cGtll.jpg" alt="this is formatted text that I don&#39;t want "></a></p>
  
  <p>If the text contains ";" or bullets, to make a new row.</p>
  
  <p>Briefly, I copy that cell into noteped (.txt), and it copies multiple bullets in one row, or with ";". I want to make a new row. For now, I modify it manually.</p>
  
  <p>Thanks!</p>
  
  <p>Edit: </p>
  
  <pre><code>Sub foo1()
  
  Dim txt As String
  Dim i As Integer
  Dim FullName As Variant
  Dim oldText As String
  txt = Cells(2, 5)
  FullName = Split(txt, ";")
  
  For i = 0 To UBound(FullName)
     oldText = Cells(2, 1).Value
     Cells(2, 1).Value = oldText &amp; vbCrLf &amp; "•" &amp; FullName(i)
  
  Next
  End Sub
  </code></pre>
  
  <p>I've succeed. Only two questions: 1. How to put two delimiters? 2. Why when I copy cell value into notepad it wraps it with ""?</p>