Excel 转换 求助!!!

[复制链接]
查看11 | 回复3 | 2012-4-11 09:08:06 | 显示全部楼层 |阅读模式
1.Sub tesrt()2. Dim i As Long3.
Dim MyRow As Long, MyCol As Long4.
With Worksheets(2)5.
MyRow = 26.
MyCol = 17.
For i = 1 To Cells(Rows.Count, 1).End(xlUp).Row8
If i > 1 Then9.
If Cells(i, 1)Cells(i - 1, 1) Then10.
MyCol = .Cells(2, ....
回复

使用道具 举报

千问 | 2012-4-11 09:08:06 | 显示全部楼层
公式不能实现 借助vba...
回复

使用道具 举报

千问 | 2012-4-11 09:08:06 | 显示全部楼层
能说具体一点吗?...
回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

主题

0

回帖

4882万

积分

论坛元老

Rank: 8Rank: 8

积分
48824836
热门排行