2008-09-23から1日間の記事一覧
次の2つのFunctionを組み合わせれば良い。 ' 指定の名前のワークシートが存在するかどうか Function isExistingSheetName(sheetname As String) As Boolean Dim ws As Worksheet Dim flag As Boolean '現在のシートを記憶 Set recentSheet = ActiveSheet For…
次の2つのFunctionを組み合わせれば良い。 ' 指定の名前のワークシートが存在するかどうか Function isExistingSheetName(sheetname As String) As Boolean Dim ws As Worksheet Dim flag As Boolean '現在のシートを記憶 Set recentSheet = ActiveSheet For…