CurrentRegion.SpecialCells(xlCellTypeVisible).Areas.Count k = 1 For i = 1 To n Workbooks(fname).Worksheets(1).Range("A1").CurrentRegion.
確定! 回上一頁