Copiar info archivo txt y pegar en excel

Tengo el siguiente código vba que me abre un archivo xml en bloc de notas y me copia toda la info que contiene y la pega en excel pero en una sola celda. Como debo modificar el código para que me lo copie línea por línea hacia abajo teniendo en cuenta que brinque de fila cuando encuentre carácter >

Nota si yo lo hago manual si me lo copia sin establecer celdas

Anexo imagen del lado izquierda como funciona la macro y del lado derecho como quisiera que funcionara la macro