2012-10-21 55 views
3

我相信這很簡單,但我找不到任何信息。Excel VB這個活動工作表

我有一個Excel宏擁有了諸如:

ActiveWorkbook.Worksheets("Data 21 Oct 12 11-05").Sort.SortFields.Clear 
ActiveWorkbook.Worksheets("Data21 Oct 12 11-05").Sort.SortFields.Add Key _ 
    :=Range("W1:W23"), SortOn:=xlSortOnValues, Order:=xlDescending, _ 
    DataOption:=xlSortNormal 
With ActiveWorkbook.Worksheets("Data 21 Oct 12 11-05").Sort 
    .SetRange Range("A1:BZ23") 
    .Header = xlGuess 
    .MatchCase = False 
    .Orientation = xlTopToBottom 
    .SortMethod = xlPinYin 
    .Apply 
End With 

我想要做的是使這個全球宏觀,但文件名在宏觀經濟硬編碼。如何更改代碼以便引用「this」當前打開的文件?

回答

3

ActiveWorkbook確實引用當前打開和活動的文件。

如果文件名你指的是事實表名稱是硬編碼的,您可以通過更換ActiveSheetActiveWorkbook.Worksheets("Data 21 Oct 12 11-05")與有源的宏觀調控工作。