查看: 71|回复: 6
求高手帮忙解决一下根据数值判断在哪一个区间并返回相应的数字
阅读权限20
在线时间 小时
求高手帮忙解决一下根据数值判断在哪一个区间并返回相应的数字，详情请见附件，谢谢
13:03 上传
点击文件名下载附件
9.45 KB, 下载次数: 4
阅读权限30
在线时间 小时
没看懂意思，具体说明一下，最好是举个例子！！
阅读权限20
在线时间 小时
我重新上传附件你看一下
13:44 上传
点击文件名下载附件
9.56 KB, 下载次数: 2
阅读权限20
在线时间 小时
Sub mx()
Dim s%, arr1, arr(), i&, j&
s = Application.InputBox(prompt:=&请输入定义的区间大小：&, Default:=30, Type:=1)
arr1 = Sheets(&sheet1&).Range(&a1:g& & [a1048576].End(xlUp).Row)
ReDim arr(1 To UBound(arr1), 1 To UBound(arr1, 2))
For i = 1 To UBound(arr1)
& &For j = 1 To UBound(arr1, 2)
& && &arr(i, j) = Application.RoundUp(arr1(i, j) / s, 0)
& & Next
Next
Sheets(&sheet1&).[a1].Resize(UBound(arr), UBound(arr, 2)) = arr
End Sub复制代码
阅读权限20
在线时间 小时
大神能不能帮我直接弄成VBA的那种，光代码我不会弄，谢谢
阅读权限20
在线时间 小时
附件请参考。
14:03 上传
点击文件名下载附件
18.36 KB, 下载次数: 4
阅读权限20
在线时间 小时
附件请参考。
谢谢大神帮我做的这个VBA
最新热点 /1
只要3分钟，完成微软安卓版Office体验问卷，微软官方定制好礼就送到你面前：***、卫衣、电脑内胆包等,好礼多，中奖几率高，极具纪念意义!
嘘，一般人，我不告诉他。
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师后使用快捷导航没有帐号？
查看: 1517|回复: 9
新人欢迎积分1 阅读权限20积分41精华0UID帖子金钱146 威望0
Lv.2, 积分 41, 距离下一级还需 9 积分
UID帖子威望0 多玩草0 草
本帖最后由 风过无痕※ 于
23:54 编辑
大家帮忙看下 先发狗熊榜 我这号要是拆钻的话人品好跟人品不好多说个价格哈，大概多少左右。有看上这号的也可以联系我 低价出售&&有意思的加我吧
新人欢迎积分1 阅读权限0积分75精华0UID帖子金钱114 威望0
头像被屏蔽
UID帖子威望0 多玩草10 草
提示: 作者被禁止或删除 内容自动屏蔽
新人欢迎积分1 阅读权限20积分22精华0UID帖子金钱188 威望0
Lv.2, 积分 22, 距离下一级还需 28 积分
UID帖子威望0 多玩草0 草
新人欢迎积分
欢迎来到多玩， *^_^*希望你在这玩得愉快~.
总评分:&新人欢迎积分 + 1&
新人欢迎积分0 阅读权限40积分312精华0UID帖子金钱803 威望0
Lv.4, 积分 312, 距离下一级还需 688 积分
UID帖子威望0 多玩草0 草
这号杀人应该很犀利的，会心高，追电高
新人欢迎积分1 阅读权限60积分2642精华0UID帖子金钱6338 威望7
Lv.6, 积分 2642, 距离下一级还需 2358 积分
UID帖子威望7 多玩草0 草
话说这号真的挺给力~
新人欢迎积分1 阅读权限20积分41精华0UID帖子金钱146 威望0
Lv.2, 积分 41, 距离下一级还需 9 积分
UID帖子威望0 多玩草0 草
有没有人要预定的 我过一个月可以挂CBG
新人欢迎积分1 阅读权限40积分340精华0UID帖子金钱1046 威望0
Lv.4, 积分 340, 距离下一级还需 660 积分
UID帖子威望0 多玩草0 草
又是一个装逼仔&&有JJ的拆完钻&&发个图来看看
新人欢迎积分0 阅读权限40积分569精华0UID帖子金钱2033 威望0
Lv.4, 积分 569, 距离下一级还需 431 积分
UID帖子威望0 多玩草5 草
[ali58]口水之，LZ想多少钱卖啊，是卖拆钻后的号么？开个价撒
新人欢迎积分0 阅读权限60积分3120精华0UID2811514帖子金钱6231 威望2
Lv.6, 积分 3120, 距离下一级还需 1880 积分
UID2811514帖子威望2 多玩草42 草
搞不懂为什么要拆钻呢？ 求解释
新人欢迎积分1 阅读权限20积分35精华0UID帖子金钱104 威望0
Lv.2, 积分 35, 距离下一级还需 15 积分
UID帖子威望0 多玩草0 草
现在的老板买号 不就求个 大翅膀吗 拆了钻&&不好卖
需要金钱：1100
手机盒子客户端点击或扫描下载
Powered by