いつもお世話になります。
また自己解決できずです・・・・
日付(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
【VBA】シート名に特定文字が入っていたらマクロを実行したいです。
Visual Basic(VBA)
-
5
エクセルでエラーが出て困っています。
Excel(エクセル)
-
6
EXCEL VBA 特定シート以外のシート削除
Excel(エクセル)
-
7
メッセージボックスのOKボタンをVBAでクリックさせたい
Visual Basic(VBA)
-
8
エクセルVBAでセルに入力したパスでブックを開く
Excel(エクセル)
-
9
マクロを特定の複数シートで実行する方法
Excel(エクセル)
-
10
エクセルVBA Ifでシート名が合致したら別ファイルから転記する場合のElse IfとForの書き方
Visual Basic(VBA)
-
11
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
12
VBAで先月、先々月を求める方法
Visual Basic(VBA)
-
13
EXCELのVBAでシートコピーをしたとき元のマクロを削除するには?
Excel(エクセル)
-
14
同じ作業を複数のシートに実行させるにはどうしたらいいのでしょうか
Visual Basic(VBA)
-
15
エクセル マクロ オートフィルの終点の指定について
Excel(エクセル)
-
16
フォルダ内の複数ファイルから特定のシートを一括削除
その他(Microsoft Office)
-
17
名前をつけて保存した後、元のファイルに戻るには
その他(コンピューター・テクノロジー)
-
18
【ExcelVBA】全シートのセルの数式を値に変換する事は可能でしょうか?
Visual Basic(VBA)
-
19
VBAで保存しないで閉じると空のBookが残る
Excel(エクセル)
-
20
エクセルで英数大文字のみの入力制限は可能ですか
Excel(エクセル)
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
別のシートから値を取得するとき
-
【ExcelVBA】全シートのセルの...
-
ユーザーフォームに入力したデ...
-
Excelマクロのエラーを解決した...
-
excelのマクロで該当処理できな...
-
【VBA】指定した検索条件に一致...
-
特定の文字を含むシートだけマ...
-
XL:BeforeDoubleClickが動かない
-
同じ作業を複数のシートに実行...
-
実行時エラー'1004': WorkSheet...
-
ExcelのVBAのマクロで他のシー...
-
ExcelVBA シート名を複数セルか...
-
ブック名、シート名を他のモジ...
-
VBA 存在しないシートを選...
-
vbaエクセルマクロ RemoveDupli...
-
VBAで指定シート以外の選択
-
実行時エラー1004「Select メソ...
-
Excel VBA で自然対数の関数Ln...
-
VBA ユーザーフォーム上のチェ...
-
EXCEL VBA 別シートの同じ文字...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
別のシートから値を取得するとき
-
ユーザーフォームに入力したデ...
-
Excelマクロのエラーを解決した...
-
excelのマクロで該当処理できな...
-
同じ作業を複数のシートに実行...
-
ExcelVBA シート名を複数セルか...
-
【ExcelVBA】全シートのセルの...
-
Excel マクロについての相談
-
VBA 存在しないシートを選...
-
実行時エラー'1004': WorkSheet...
-
特定の文字を含むシートだけマ...
-
ExcelのVBAのマクロで他のシー...
-
ブック名、シート名を他のモジ...
-
XL:BeforeDoubleClickが動かない
-
VBA 複数の各シートに行を追加...
-
エクセルのシート名変更で重複...
-
【Excel VBA】Worksheets().Act...
-
シートが保護されている状態で...
-
Excel VBA 複数行を数の分だけ...
-
for 文の 繰り返し処理に使える...
おすすめ情報