Dim myA As Range Dim lastYRow As Long, sumRng As Range, Tot As Double ... Font.Bold = True lastRow = Cells(Rows.Count, "F").End(xlUp).Row
確定! 回上一頁