求助一个单元格内数据排列的公式~

k000309152 · 发表于 2018-3-16 09:44

请问大侠该如何设置公式才能使单位内数据为偶数位时从A1变成B1的排列，奇数位时从A2变成B2的排列？

k000309152 · 发表于 2018-3-16 11:25

有没有哪个大神指点下啊，在线等~~

kkf5560 · 发表于 2018-3-16 11:45

我觉得吧，理论上可以实现，先把A1分列，然后用COUNTA统计，MOD计算奇偶数，然后用IF判断，然后&连接

mikezhan · 发表于 2018-3-16 13:54

提示: 作者被禁止或删除内容自动屏蔽

mikezhan · 发表于 2018-3-16 14:25

提示: 作者被禁止或删除内容自动屏蔽

k000309152 · 发表于 2018-3-16 15:44

mikezhan 发表于 2018-3-16 14:25
Sub test()
Dim arr1, arr2(), arr3(), arr4()
arr1 = Range("A1:A" & Range("A1000").End(xlUp).Row)

大神呀~，跪拜ing，请问用函数能解吗？

mikezhan · 发表于 2018-3-16 15:52

提示: 作者被禁止或删除内容自动屏蔽

k000309152 · 发表于 2018-3-16 16:32

mikezhan 发表于 2018-3-16 15:52
不要舍近求远！学习了VBA后，你会对函数索然无味！

请问大侠，想学习vba，但是0基础，该从何开始，有没什么推荐的书籍？

		自动登录	找回密码
密码			免费注册

mikezhan mikezhan 当前离线性别保密 UID 736941 阅读权限 0 注册时间 2009-3-7 在线时间小时最后登录 1970-1-1 积分 975 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-3-16 13:54 \| 显示全部楼层 [广告] ★Excel Home云课堂 - 专业的职场技能充电站★ ★Excel三大利器★ ★ 笨办法学VBA全系列★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

mikezhan mikezhan 当前离线性别保密 UID 736941 阅读权限 0 注册时间 2009-3-7 在线时间小时最后登录 1970-1-1 积分 975 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-3-16 14:25 \| 显示全部楼层 [广告] ★用Excel做企业管理系统，Excel服务器学习和下载★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

mikezhan mikezhan 当前离线性别保密 UID 736941 阅读权限 0 注册时间 2009-3-7 在线时间小时最后登录 1970-1-1 积分 975 财富分享技术精华头像被屏蔽 TA的精华主题 TA的得分主题	发表于 2018-3-16 15:52 \| 显示全部楼层 [广告] ★会Excel,就能做支持PC、手机、Web、App、Windows、安卓、IOS、Linux信息一体化的各种管理系统 ★ 提示: 作者被禁止或删除内容自动屏蔽

	回复举报

[求助] 求助一个单元格内数据排列的公式~