我试图做一个循环,如果条件为真,单元格n索引(E列)与单元格的n+1索引相同,则将列C值复制到列G中。Sheets("Report KIT").Range("G" & n) = Sheets("Report KIT").Range("C" & n).Value Sub Macroarea1()Dim LastRow As Long
Dim LastRow1
我目前在循环遍历过滤列表,从行中选择并复制某些单元格,然后将其粘贴到另一个工作表上。Dim LastCol As LongDim iRow2 As Integer
For iRow = 2 To wb1.Sheets("1").Cells(Rows.Count, "A").End(xlUp).Row
For iRow2 = 6 To wb1.Sheets("n").
当我从目录中打开文件时,它们处于受保护的视图中,这是非常理想的,这样我就不会更改任何旧数据。问题是,除非在工作簿上启用编辑,否则我无法搜索或访问该工作簿(用我的脚本)。Each bk In Workbooks If bkN = WrkBk Then For Each wkSht In bk.Worksheets