10/01/10 23:37:05
>>28
ありがとうございました。
おかげでうまくいきました。
Dim WST As Worksheet
Dim xlAPP As Application
xlAPP.DisplayAlerts = False
For Each WST In Worksheets
If WST.Name = "Sheet2" Or _
WST.Name = "Sheet3" Then
WST.Delete
End If
Next
xlAPP.DisplayAlerts = False