IF THEN ELSE关于excel vbamacros的说明

嗨，我需要一点帮助，我可以如何调整我的macros，search和select工作表“sheet9”，并继续与macros…

有时工作簿中不会创build该工作表

所以在这里我需要关于它应该是什么语法的帮助？

''''''''''''''''''' example not valid macro!! '''''''''''''''''''''' Search worksheet "sheet9" in active workbook if "sheet9" not found then create.worksheet"sheet9" ELSE sheets("sheet9").select 

希望是有道理的

1. 开始
2. search工作表“sheet9”
3. 如果工作表“sheet9”未find
4. 那么CREATE工作表“sheet9”
5. 否则select工作表“sheet9”如果find
6. 结束

Answer 1

以下是如何查找，然后创build或select工作表的示例

 Dim ws As Worksheet Dim bFound As Boolean bFound = False For Each ws In ActiveWorkbook.Sheets If ws.Name = "sheet9" Then bFound = True Exit For End If Next ws If bFound Then Sheets("sheet9").Select Else Set ws = ActiveWorkbook.Worksheets.Add ws.Name = "sheet9" ws.Select End If 

Answer 2

你可以search表格，然后决定做什么，或者你可以尝试select它，如果有错误，然后创build它：

 Sub Sheet9() On Error GoTo Create Worksheets("Sheet9").Select Exit Sub Create: Worksheets.Add.Name = "Sheet9" End Sub