Excel怎样快速把单元格内多行内容转成多列
修法布施得聪明智慧,多分享让生活更美好。上次分享了《Excel怎样快速单元格区域内容连接或换行》中多个单元格生成一个单元格多行内容,现在分享逆过程处理,一个单元多行内容怎样快速转成多个单元格(多列)?
步骤1:新建Excel文档
首先打开Microsoft Office Excel 2007,新建文档并保存文件名为《Excel怎样快速把单元格多行内容转成多列.xlsm》。
步骤2:打开VBA编辑界面
按下快捷键ALT F11打开VBA(宏)编辑界面,然后点菜单栏【插入】下拉中列表中点【模块(M)】。
步骤3:插入VBA代码
在VBA编辑界面中插入一个新的模块,在代码框中复制以下代码:
```
Option Base 1
Sub 选单元格多行内容生成多列()
Dim mb, m As String, i, j As Long
Dim cmt As Range, mm()
For Each cmt In Selection
m cmt.Text
If m <> "" Then
If InStr(1, m, Chr(10), 1) > 0 Then
mb Split(m, Chr(10))
j 0
ReDim mm(UBound(mb) 1)
For i 0 To UBound(mb)
j j 1
mm(j) mb(i)
Next i
(0, 1).Resize(1, j) mm
End If
End If
Next cmt
End Sub
```
步骤4:运行宏
回到工作表窗口,首先选中包含多行内容的单元格,然后运行【选单元格多行内容生成多列】宏。可以通过菜单栏中的【视图】>【宏】>【查看宏(V)】打开宏对话框,选择该宏名并执行。
步骤5:查看结果
宏执行完成后,将会在原数据表的右侧生成多列数据,每一行对应原来单元格内的一行内容。
结语
如果觉得这篇经验对您有帮助,请点击下方的“投票点赞”或者“收藏”支持我!如果有任何疑问,可以点击下方的“我有疑问”,谢谢!
版权声明:本文内容由互联网用户自发贡献,本站不承担相关法律责任.如有侵权/违法内容,本站将立刻删除。