摘要: 1: Sub Macro1() 2: Dim i As Integer 3: Dim x As String 4: For i = 1 To Sheet1.UsedRange.Rows.Count 5: With Sheet1.Rows(i).Interior 6: ... 阅读全文
posted @ 2013-03-08 12:02 pnljs 阅读(454) 评论(0) 推荐(0)