EXCEL单元格多行取值问题

enisaac

问题困扰人很久，请哪位大哥帮助解答一下，不胜感激。
说明：
EXCEL里面一个单元格有多行内容，是ctrl+enter强制换行的，如何逐一取出这个单元格里面每一行的值，
如A1单元格内容的值有可能是三行，有可能是四行
要求：
有没有方法用一个类似的循环语句自动取值给B2单元格调用，换句话说，如A1里面有5个值，那B1就应该得到这个5值并调用，效果如下：
A1单元格             B1单元格
71                  set cell  71        (71是A1单元格的第一行的值)  
72                  set cell  72     (72是A1单元格的第二行的值)
73                  set cell  73     (73是A1单元格的第三行的值)
74                  set cell  74     (74是A1单元格的第四行的值)  

71     72     73     74

set cell  71     set cell 72     set cell 73     set cell 74