excel如何把一行分成多行 大约是10行分成2个五行 不是在一个单元格里面的数据

excel如何把一行分成多行 大约是10行分成2个五行 不是在一个单元格里面的数据

caozhy
贵阳老马马善福专业维修游泳池堵漏防水工程 如果问题解决,请点下采纳,谢谢
一年多之前 回复

1个回答

Sub Macro1()
'
' Macro1 Macro
' 宏由 user1 录制,时间: 3/21/2019
'
'


    Dim tocell As String
    tocell = InputBox$("复制到哪一列里", , "C")
    colcount% = Val(InputBox$("分为几列", , "2"))
    currr = 0
    currc = 0
    For Each r In Selection
        If currc = 0 Then currr = currr + 1
        currcidx = Chr(Asc(tocell) + currc)
        currc = currc + 1
        currc = currc Mod colcount
        Range(currcidx & currr) = r
    Next
End Sub

图片说明

qq_21322775
qq_21322775 回复caozhy: https://ask.csdn.net/questions/753168
一年多之前 回复
caozhy
贵阳老马马善福专业维修游泳池堵漏防水工程 回复qq_21322775: 你重新开一个问题,我好回答你
一年多之前 回复
qq_21322775
qq_21322775 大神 采纳了 求解决下
一年多之前 回复
caozhy
贵阳老马马善福专业维修游泳池堵漏防水工程 回复qq_21322775: 按照空格分隔么?用split函数。你采纳本问题,重新开一个问题,我详细写给你
一年多之前 回复
qq_21322775
qq_21322775 谢谢大神
一年多之前 回复
qq_21322775
qq_21322775 变成 第一行123 第二行 456
一年多之前 回复
qq_21322775
qq_21322775 大神 我想要的是横的很长一行 变成2行 比如这样 1 2 3 4 5 6
一年多之前 回复
Csdn user default icon
上传中...
上传图片
插入图片
抄袭、复制答案,以达到刷声望分或其他目的的行为,在CSDN问答是严格禁止的,一经发现立刻封号。是时候展现真正的技术了!
立即提问
相关内容推荐