毕业论文开发语言企业开发JAVA技术.NET技术WEB开发Linux/Unix数据库技术Windows平台移动平台嵌入式论文范文英语论文
您现在的位置: 毕业论文 >> windows平台 >> 正文

Excel里面如何分割单元格

更新时间:2012-9-8:  来源:毕业论文

A B C
1 data1 name1,name2 data2
2 data3 name3,name4,name5 data4

变成

  A B C
1 data1 name1 data2
2 data1 name2 data2
3 data3 name3 data4
4 data3 name4 data4
5 data3 name5 data4

name之间的分隔就是逗号
用 VBA 可以做,而且很简单。

原始数据中那一列是A列?
sheet1放原始数据,sheet2代码:

VB code
Private Sub Worksheet_Activate()
    Dim i As Integer, l As Integer, s
    l = 1
    With Sheet1
        For i = 1 To .[A65530].End(xlUp).Row
            For Each s In Split(.Range("B" & i), ",")
                Range("A" & l & ":C" & l) = Array(.Range("A" & i), s, .Range("C" & i))
                l = l + 1
            Next s
        Next i
    End With
End Sub

设为首页 | 联系站长 | 友情链接 | 网站地图 |

copyright©youerw.com 优尔论文网 严禁转载
如果本毕业论文网损害了您的利益或者侵犯了您的权利,请及时联系,我们一定会及时改正。