いつもお世話になります。
また自己解決できずです・・・・
日付(yyyy年m月d日)が入っているシート名のブックがあるのですが、インプットボックスで日付の
yyyy年m月の部分を入力して、そのyyyy年m月の部分の文字が含まれるシートを削除したいコードが以下です。
Sub test1()
Dim saaa As String
Dim daaa As Worksheet
saaa = InputBox("日付を入力")
For Each daaa In Worksheets
If daaa.Name = "*" & saaa & "*" Then
Worksheets("*" & saaa & "*").Delete
Exit Sub
End If
Next
MsgBox "探しているシートはありません"
End Sub
おそらく If daaa.Name = "*" & saaa & "*" Then
Worksheets("*" & saaa & "*").Delete
この2行がおかしいのだ思います。何とかご教示願いたいです。
宜しくお願い致します。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Excel(エクセル) VBAについて 3 2022/06/19 18:19
- Visual Basic(VBA) シート削除のマクロで「deleteメソッドは失敗しました」となります。助けてください! Sub 不要 6 2022/09/08 16:41
- Visual Basic(VBA) いつもお世話になっております、VBAで教えて頂きたいのですが 2 2022/05/05 22:20
- Visual Basic(VBA) 【Excel VBA】自動メール送信の機能追加 5 2022/09/29 12:53
- Visual Basic(VBA) 集めたシートのシート名を変更したい。 下記のコードでサブフォルダにあるファイルのSheet3を集めて 6 2022/08/23 10:38
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 1 2023/01/23 11:02
- Visual Basic(VBA) VBAコードが作動せず、どこに問題があるのか教えて下さい。 3 2023/06/13 13:20
- Visual Basic(VBA) ExcelのVBAコードについて教えてください。 2 2023/05/23 16:28
- Visual Basic(VBA) セルの値からファイルを複数作りたい2 3 2022/10/07 15:54
このQ&Aを見た人はこんなQ&Aも見ています
-
「どうして捨てられないの?」前妻の物を捨てられない男性の心理って?
前妻の物を捨てられない理由に加え、捨てるための手段はあるのかを専門家に聞いてみた!
-
特定の文字を含むシートだけマクロ処理をしたい
Visual Basic(VBA)
-
Excel VBAである特定文字列を含むシート名例えば「りんご(1)」
Excel(エクセル)
-
【ExcelVBA】指定のシート以外を削除する方法
Visual Basic(VBA)
-
-
4
エクセルでエラーが出て困っています。
Excel(エクセル)
-
5
【ExcelVBA】全シートのセルの数式を値に変換する事は可能でしょうか?
Visual Basic(VBA)
-
6
EXCELのVBAでシートコピーをしたとき元のマクロを削除するには?
Excel(エクセル)
-
7
エクセルのシート名変更で重複した時のvbaの処理
Visual Basic(VBA)
-
8
フォルダ内の複数ファイルから特定のシートを一括削除
その他(Microsoft Office)
-
9
フォルダ内の全ブックのシート名を変更したいです。
Excel(エクセル)
-
10
VBAでファイルを開くときにファイル名でワイルドカードを使用したいです
その他(プログラミング・Web制作)
-
11
エクセルVBA Ifでシート名が合致したら別ファイルから転記する場合のElse IfとForの書き方
Visual Basic(VBA)
-
12
worksheetFunctionクラスのVlookupプロパティを取得できません エラーへの対応
Visual Basic(VBA)
-
13
Access VBAで行ラベルが定義されていないというエラーが出ます
Access(アクセス)
-
14
VBAで先月、先々月を求める方法
Visual Basic(VBA)
-
15
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
16
エクセルVBAで、条件に一致するセルへ移動
Excel(エクセル)
-
17
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
18
VBA 数式を残して値をクリアについて
Excel(エクセル)
-
19
VBAでシートコピー後、シート名が重複している時の処理
Access(アクセス)
-
20
エクセル マクロ オートフィルの終点の指定について
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
ブック名、シート名を他のモジ...
-
エクセルのシート名変更で重複...
-
エクセルで通し番号を入れてチ...
-
VBAで同じシート名のコピー時は...
-
【Excel VBA】Worksheets().Act...
-
同じ作業を複数のシートに実行...
-
XL:BeforeDoubleClickが動かない
-
【Excel VBA】ブックを開いた時...
-
VBA 入力月で該当シートを選択...
-
【ExcelVBA】全シートのセルの...
-
【VBA】特定の文字で改行(次の...
-
Excelマクロのエラーを解決した...
-
EXCEL VBAで複数シート内のセル...
-
userFormに貼り付けたLabelを変...
-
特定の文字を含むシートだけマ...
-
エクセルのマクロについて教え...
-
実行時エラー'1004': WorkSheet...
-
エクセルVBA 別シートからのコ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
excelのマクロで該当処理できな...
-
【ExcelVBA】全シートのセルの...
-
ユーザーフォームに入力したデ...
-
同じ作業を複数のシートに実行...
-
ブック名、シート名を他のモジ...
-
特定の文字を含むシートだけマ...
-
実行時エラー'1004': WorkSheet...
-
VBA 存在しないシートを選...
-
エクセルのシート名変更で重複...
-
XL:BeforeDoubleClickが動かない
-
シートが保護されている状態で...
-
Excel VBA 複数行を数の分だけ...
-
実行時エラー1004「Select メソ...
-
【Excel VBA】Worksheets().Act...
-
Excelマクロのエラーを解決した...
-
エクセル・マクロ シートの非...
-
VBAで同じシート名のコピー時は...
-
ExcelのVBAのマクロで他のシー...
-
【VBA】色のついたシート名を取得
おすすめ情報