excel如何把一行分成多行 大约是10行分成2个五行 不是在一个单元格里面的数据
1条回答 默认 最新
- threenewbee 2019-03-21 02:42关注
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
本回答被题主选为最佳回答 , 对您是否有帮助呢?解决 3无用
悬赏问题
- ¥100 有人会搭建GPT-J-6B框架吗?有偿
- ¥15 求差集那个函数有问题,有无佬可以解决
- ¥15 【提问】基于Invest的水源涵养
- ¥20 微信网友居然可以通过vx号找到我绑的手机号
- ¥15 寻一个支付宝扫码远程授权登录的软件助手app
- ¥15 解riccati方程组
- ¥15 display:none;样式在嵌套结构中的已设置了display样式的元素上不起作用?
- ¥15 使用rabbitMQ 消息队列作为url源进行多线程爬取时,总有几个url没有处理的问题。
- ¥15 Ubuntu在安装序列比对软件STAR时出现报错如何解决
- ¥50 树莓派安卓APK系统签名