VBA 的问题，现有excel两个sheet，需要将sheet1中用颜色标记好的数据提取到sheet2中，并按照格式排好！

显示全部楼层 · 2011-11-22 14:57:18

我看了你发的文件，是将Sheet3的数据按条件写到sheet1里：Sub ouyangff()t = 5With Sheet3For i = 2 To .[d65536].End(3).Row
For j = i + 1 To .[d65536].End(3).Row
If .Cells(i, 4) = .Cells(j, 4) Then
If .Cells(i, 1).Cells(j, 1) Then
.Rows(i).Interior.ColorIndex = 8
.Rows(j).Interior.ColorIndex = 8
Sheet1...

千问 · 2011-11-22 14:57:18

[email protected]如果还没有解决可以发邮件给我。...

千问 · 2011-11-22 14:57:18

[email protected] 带03附件发来邦你看看吧说清要求~~...

千问 · 2011-11-22 14:57:18

有没有附件？？...