SUB 樞紐分析() Dim rng As Range Set rng = ActiveSheet.UsedRange now_sht_name = ActiveSheet.Name all_rng = rng.Address ' A1:F405. Sheets.Add
確定! 回上一頁