2013-11-22 102 views
1

我不知道爲什麼我的選擇範圍不適用於此行。 這是範圍的正確語法。Excel 2007 ActiveWorkbook.Sheets(「Feuil1」)。範圍(「A1」)。選擇

ActiveWorkbook.Sheets("Report M-1").Select 
ActiveSheet.Rows("1:1").Find("Operational Categorization Tier 1").Activate 
ActiveSheet.Rows("1:1").AutoFilter field:=5, Criteria1:="SECURITY TROUBLE" 
ActiveSheet.Range("A1").CurrentRegion.Copy 

If FeuilleExiste("Feuil1") = False Then 
    ActiveWorkbook.Sheets.Add 
End If 

****ActiveWorkbook.Sheets("Feuil1").Range("A1:").Select**** 
Selection.PasteSpecial xlPasteAll 
ActiveWorkbook.Save 

'suppression filtre 
Workbooks("Monthly security report May.xls").Activate 
ActiveSheet.Rows("1:1").AutoFilter 

回答

2

*** ActiveWorkbook.Sheets( 「Feuil1」)範圍( 「A1」)。選擇****

你必須在範圍內的額外:

應該

ActiveWorkbook.Sheets("Feuil1").Range("A1").Select 

BTW,你應該避免使用.Select。您可能想看到THIS LINK

+1

您可以爲該更改創建註釋。 – Makah

+0

@Makah:我可以和我在過去做過,但評論是暫時的:)因此,最好留下一個答案。如果您不同意,請隨時對其進行降級... –

+0

thx小費 – user1918315