设为首页收藏本站

开启辅助访问切换到窄版

第一问答网»论坛 › 中问网 › 问答 › 紧急得不能再紧急的EXCEL求助！！

紧急得不能再紧急的EXCEL求助！！

11 |

3 | 2009-6-12 12:12:16 | 显示全部楼层 |阅读模式

用函数太复杂，VBA极容易解决。 ALT+F11，粘贴以下代码，F5运行，试试效果Sub xx()for x=1 to 56cells(x,14)=xnext xFor i = 9 To 27 Step 3For j = 1 To 11If Cells(i, j)"" ThenCells(Cells(i, j), 15) = Cells(i - 1, j)End IfNext j, iEnd Sub...

回复

使用道具举报

千问 | 2009-6-12 12:12:16 | 显示全部楼层

这个很容易.复制-右键选择性粘贴.转置.确定OK.得把你的空列删除掉.先复制一个表到别处弄...

回复

使用道具举报

千问 | 2009-6-12 12:12:16 | 显示全部楼层

没看到图片啊。？...

回复

使用道具举报

返回列表发新帖

主题	0 回帖	4882万积分

Rank: 8 Rank: 8

积分: 48824836

回复楼主返回列表

问答

热门排行