查看: 1236|回复: 11
高手来啊~~求助
阅读权限10
在线时间 小时
案例如下：
1、有个数字123，我想在旁边一格得出 1=579，2=168，3=279
也就是得出结果是，怎么得出这个结果？
2、接下还有就是如何把相同的数提取出来，接着刚才的案例，如何把相同的数79提取出来？
以下基础，需要把这些数值转变：
1=579，2=168，3=279，4=138，5=249，6=135，7=246，8=357，9=9
知道的大侠请指教，感激不尽！！！
[ 本帖最后由 xieshiping 于
09:54 编辑 ]
09:54 上传
点击文件名下载附件
2.58 KB, 下载次数: 5
阅读权限90
在线时间 小时
供参考。。。
=IF(LEFT(A1)=&0&,0,&&)&SUMPRODUCT(LOOKUP(--MID(A1,ROW(INDIRECT(&1:&&LEN(A1))),1),{0,1,2,3,4,5,6,7,8,9},{369,579,168,279,138,249,135,246,357,4682})*1000^(LEN(A1)-ROW(INDIRECT(&1:&&LEN(A1)))))
阅读权限30
在线时间 小时
::L::L ::L ::L 学习
阅读权限10
在线时间 小时
问题没解决有点不对~~高手~~
请继续指教
阅读权限10
在线时间 小时
回复 3楼 zengyidin 的帖子
问题没解决有点不对~~高手~~
请继续指教
1、算出来数字不对
2、另外怎么提取相同的数字
阅读权限95
在线时间 小时
=CONCATENATE(LOOKUP(--MID(A1,1,1),{0,1,2,3,4,5,6,7,8,9},{&8,279,138,249,135,246,357,3682}),LOOKUP(--MID(A1,2,1),{0,1,2,3,4,5,6,7,8,9},{&8,279,138,249,135,246,357,3682}),LOOKUP(--MID(A1,3,1),{0,1,2,3,4,5,6,7,8,9},{&8,279,138,249,135,246,357,3682}))
三楼的公式是个数组公式,要按CTRL+SHIFT+回车结束。在原数字中有0和9时出错，用这个公式吧，另一个问题楼主可以搜一下“提取”或“重复”等，记得有过这方面的例子
阅读权限20
在线时间 小时
& & & & & & & &
高手啊，佩服
阅读权限10
在线时间 小时
回复 7楼 水平一般 的帖子
谢谢大侠，第一个问题已经解决！
第二问题本人搜索了下好像没找到合适的！
现上传附件，麻烦大侠了！
09:53 上传
点击文件名下载附件
2.58 KB, 下载次数: 7
阅读权限20
在线时间 小时
& & & & & & & &
c3=SUM((--MID($B$3,ROW(INDIRECT(&1:&&LEN($B$3))),1)=D2)*1)
阅读权限10
在线时间 小时
回复 10楼 小静电 的帖子
不对哦~~~请继续指教
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师查看: 431|回复: 2
求高手能否帮忙编写宏程序来进行排班
阅读权限20
在线时间 小时
& & & & & & & &
现有7*24小时的呼叫中心，需要进行排班，排班分为三个班次，早班（8：30--15：30），中班（15：30-22：00），晚班（21：30--次日8：40），班次的时间要求可以自已设定；排班的人数也可以自已设定，每个班次的人员都可以自已设定，现暂时设定早班4人，中班3人，晚班2人，其它的人员设为休息；要求为上晚班的人，不能上早班和中班，班次的时间分为按月或按周来排班，显示的时候要求显示一个月（周）的排班结果，或每个人一月（周）的排班结果；
阅读权限100
在线时间 小时
& & & & & & & &
建议到技术服务中心求助。
阅读权限20
在线时间 小时
谢谢 哟，还以为会有高手能帮个忙的咧
玩命加载中，请稍候
玩命加载中，请稍候
Powered by
本论坛言论纯属发表者个人意见，任何违反国家相关法律的言论，本站将协助国家相关部门追究发言者责任！ & & 本站特聘法律顾问：徐怀玉律师 李志群律师高手来帮忙啊_excel吧_百度贴吧
&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&签到排名：今日本吧第个签到，本吧因你更精彩，明天继续来努力！
本吧签到人数：0成为超级会员，使用一键签到本月漏签0次！成为超级会员，赠送8张补签卡连续签到：天&&累计签到：天超级会员单次开通12个月以上，赠送连续签到卡3张
关注：119,331贴子：
高手来帮忙啊收藏
我想把SHEET1的表格做成SHEET2的格式，请高手给个链接，
A1=IF(MOD(ROW(),6)=1,OFFSET(Sheet1!$A$1,,INT((ROW(A1)-1)/6)*3,,),"")B1=IF(MOD(ROW(),6)=1,"",OFFSET(Sheet1!$A$1,MOD(ROW()-1,6),INT((ROW(A1)-2)/6)*3,,))下拉或A1=IF(MOD(COLUMN(),2),IF(MOD(ROW(),6)=1,OFFSET(Sheet1!$A$1,,INT((ROW(A1)-1)/6)*3,,),""),IF(MOD(ROW(),6)=1,"",OFFSET(Sheet1!$A$1,MOD(ROW()-1,6),INT((ROW(A1)-2)/6)*3,,)))右拉 下拉砖头啊 当心头 呵呵
谢谢哟，好厉害啊 ！
登录百度帐号推荐应用
为兴趣而生，贴吧更懂你。或其他帐号一键登录:
& 高手来解答●●EXCEL如何建宏啊？
查看: 3784|回复: 10
手机看此贴：
用得意APP扫一扫
微信扫一扫 转发至朋友圈
UID27172&好友&帖子&主题&精华0&小红花69 &积分7223&在线时间2042 小时&注册时间&阅读权限95&最后登录&
UID27172&帖子&精华0&金币3129 &威望2 &注册时间&
& && &&&我一好友的工作内容简单，可是很繁琐，麻烦。大致是这样的：就是一个表格里有100个公司的信息资料，每行为一个公司的资料，现在要把每个公司拆分为单独的一个表格文件，第一行内容全部相同，第二行为公司资料。
& && &&&由于不会建宏，在网上也没找到答案，到目前为止还是用的最原始的复制粘贴方法，又费时又慢。
& && &&&各位大虾们，把你们的独特方法晒出来吧，我相信有不少同道中人也遇到这个问题了。小女子在此先谢谢各位大虾了。
UID27172&好友&帖子&主题&精华0&小红花69 &积分7223&在线时间2042 小时&注册时间&阅读权限95&最后登录&
UID27172&帖子&精华0&金币3129 &威望2 &注册时间&
我知道这里面高手很多，静候高手的解答哦。
UID27172&好友&帖子&主题&精华0&小红花69 &积分7223&在线时间2042 小时&注册时间&阅读权限95&最后登录&
UID27172&帖子&精华0&金币3129 &威望2 &注册时间&
高手高手，快快来。
UID91749&好友&帖子&主题&精华0&小红花35 &积分4736&在线时间2005 小时&注册时间&阅读权限85&最后登录&
UID91749&帖子&精华0&金币721 &威望1 &注册时间&
帮顶，我不是高手
UID27172&好友&帖子&主题&精华0&小红花69 &积分7223&在线时间2042 小时&注册时间&阅读权限95&最后登录&
UID27172&帖子&精华0&金币3129 &威望2 &注册时间&
[b]回复 [url=forum.php?mod=redirect&goto=findpost&pid=&ptid=3354495][color=Olive]小试衣娘[/color] 的帖子[/url][/b]
呵呵，不是高手也可以回帖撒。谢谢你的帮顶哦。
UID190625&好友&帖子&主题&精华0&小红花7 &积分596&在线时间268 小时&注册时间&阅读权限45&最后登录&
UID190625&帖子&精华0&金币60 &威望0 &注册时间&
拆解成单独的PAGE啊。。。。感觉有点多余。。。。全部整合在一起做一份公司资料明细不好么。。非要拆开。。这老板怎么想的。
庙堂之上,朽木为官,殿陛之间,禽兽食禄;狼心狗行之辈,滚滚当朝,奴颜婢膝之徒,纷纷秉政
UID27172&好友&帖子&主题&精华0&小红花69 &积分7223&在线时间2042 小时&注册时间&阅读权限95&最后登录&
UID27172&帖子&精华0&金币3129 &威望2 &注册时间&
武汉愤青 发表于
拆解成单独的PAGE啊。。。。感觉有点多余。。。。全部整合在一起做一份公司资料明细不好么。。非要拆开。。 ...
可能是每个公司的资料都要做进一步的登记跟整理吧，所以每个公司单独一个表格文件。
就没高手过来说一下建宏步骤吗？
UID190625&好友&帖子&主题&精华0&小红花7 &积分596&在线时间268 小时&注册时间&阅读权限45&最后登录&
UID190625&帖子&精华0&金币60 &威望0 &注册时间&
★小月 发表于
可能是每个公司的资料都要做进一步的登记跟整理吧，所以每个公司单独一个表格文件。
就没高手过来说一下 ...
拆分单行到新建列表，是这个意思吧？从来没碰到过这种形式的拆分宏。。。。
Sub 拆分宏()
Set Thw = Workbooks(&分公司统计表.xls&).Sheets(&sheet1&).Range(&a1:b2&)
& &For i = 3 To 63
& && &Set Thw2 = Workbooks(&分公司统计表.xls&).Sheets(&sheet1&).Range(&A& & i & &:j& & i)
& && &Name = Cells(i, 1).Text
& && &Workbooks.Add
& && &Thw.Copy
& && &ActiveSheet.Paste
& && &Thw2.Copy
& && &Range(&a3&).Select
& && &ActiveSheet.Paste
& && &ActiveWorkbook.SaveAs Filename:=&f:\& & Name & &.xls&, FileFormat:=xlNormal _
& && && &, Password:=&&, WriteResPassword:=&&, ReadOnlyRecommended:=False, _
& && && &CreateBackup:=False
& && &ActiveWorkbook.Close
& &Application.CutCopyMode = False
试试吧 不敢保证能派的上用场 工作表单行拆分成多个XLS文件
庙堂之上,朽木为官,殿陛之间,禽兽食禄;狼心狗行之辈,滚滚当朝,奴颜婢膝之徒,纷纷秉政
UID190625&好友&帖子&主题&精华0&小红花7 &积分596&在线时间268 小时&注册时间&阅读权限45&最后登录&
UID190625&帖子&精华0&金币60 &威望0 &注册时间&
For i = 3 To 63
可以按照你源表中的实际行数来修改
输出路径也可以自己改
庙堂之上,朽木为官,殿陛之间,禽兽食禄;狼心狗行之辈,滚滚当朝,奴颜婢膝之徒,纷纷秉政
UID27172&好友&帖子&主题&精华0&小红花69 &积分7223&在线时间2042 小时&注册时间&阅读权限95&最后登录&
UID27172&帖子&精华0&金币3129 &威望2 &注册时间&
武汉愤青 发表于
拆分单行到新建列表，是这个意思吧？从来没碰到过这种形式的拆分宏。。。。
Sub 拆分宏()
Set Thw = Wo ...
是这个意思，就是拆分单行到新建的列表里去。
看到你建的这个宏，看得我是一头雾水，不懂呀！感觉跟以前的编程差不多呀。谢谢你呀，我再研究一下你编的这个DD。
UID190625&好友&帖子&主题&精华0&小红花7 &积分596&在线时间268 小时&注册时间&阅读权限45&最后登录&
UID190625&帖子&精华0&金币60 &威望0 &注册时间&
★小月 发表于
是这个意思，就是拆分单行到新建的列表里去。
看到你建的这个宏，看得我是一头雾水，不懂呀！感觉跟以前 ...
对 就是把单行的内容再单独生成一个独立的XLS文件出来
至于行数 提取的列数在代码里面都可以修改的
庙堂之上,朽木为官,殿陛之间,禽兽食禄;狼心狗行之辈,滚滚当朝,奴颜婢膝之徒,纷纷秉政
版权所有& Powered by您的举报已经提交成功，我们将尽快处理，谢谢！
做了一下午，终于搞定了，你只要按“执行宏操作”按钮，EXCEL就会自动生成第二个表的内容。
要移动按钮请操作：工具－＞宏－＞VISUAL　BASIC编辑器...
大家还关注
(window.slotbydup=window.slotbydup || []).push({
id: '2081942',
container: s,
size: '1000,60',
display: 'inlay-fix'}