[解決済み] シートが存在するかどうかのテストまたはチェック
2022-07-04 21:28:06
質問
Dim wkbkdestination As Workbook
Dim destsheet As Worksheet
For Each ThisWorkSheet In wkbkorigin.Worksheets
'this throws subscript out of range if there is not a sheet in the destination
'workbook that has the same name as the current sheet in the origin workbook.
Set destsheet = wkbkdestination.Worksheets(ThisWorkSheet.Name)
Next
基本的に、私は元のワークブックのすべてのシートをループし、次に
destsheet
を、現在反復している元のワークブックのシートと同じ名前を持つシートに設定します。
どのように私はそのシートが存在するかどうかをテストすることができますか?何かのように。
If wkbkdestination.Worksheets(ThisWorkSheet.Name) Then
どのように解決するのですか?
エラー処理の使用が不適切であるとして、この方法を嫌う人もいますが、VBA では許容範囲と考えられているようです...。 別の方法としては、一致するものを見つけるまですべてのシートをループすることです。
Function WorksheetExists(shtName As String, Optional wb As Workbook) As Boolean
Dim sht As Worksheet
If wb Is Nothing Then Set wb = ThisWorkbook
On Error Resume Next
Set sht = wb.Sheets(shtName)
On Error GoTo 0
WorksheetExists = Not sht Is Nothing
End Function
関連
-
[解決済み】「ワークシートクラスの貼り付けメソッドに失敗しました」が時々発生するのはなぜですか?
-
[解決済み] Excel/VB関数でエラーになる。"定数式が必要です"
-
[解決済み] .docx、.pptxなどの正しいMIMEタイプは何ですか?
-
[解決済み] VBAやマクロを使わずにExcelでループさせる方法とは?
-
[解決済み] VLOOKUP 最初の結果の下の行に値があるにもかかわらず、0を返す
-
[解決済み] エクセルVBAで行を削除する
-
[解決済み] VBA+エクセル+トライキャッチ
-
[解決済み] VBAを使わずにExcelで文字列の逆引き検索を行うには?
-
[解決済み] VBAで現在のワークシートのパスを取得する方法は?
-
[解決済み] MS Excelでバージョン管理をする最適な方法【非公開
最新
-
nginxです。[emerg] 0.0.0.0:80 への bind() に失敗しました (98: アドレスは既に使用中です)
-
htmlページでギリシャ文字を使うには
-
ピュアhtml+cssでの要素読み込み効果
-
純粋なhtml + cssで五輪を実現するサンプルコード
-
ナビゲーションバー・ドロップダウンメニューのHTML+CSSサンプルコード
-
タイピング効果を実現するピュアhtml+css
-
htmlの選択ボックスのプレースホルダー作成に関する質問
-
html css3 伸縮しない 画像表示効果
-
トップナビゲーションバーメニュー作成用HTML+CSS
-
html+css 実装 サイバーパンク風ボタン
おすすめ
-
[解決済み] .docx、.pptxなどの正しいMIMEタイプは何ですか?
-
[解決済み] SSISのエラーコードです。0x80040E37
-
[解決済み] VBAでRangeクラスのSelectメソッドに失敗する
-
[解決済み] どのようにvbaコードで "名前を付けて保存 "を行うには、datestampと私の現在のExcelワークブックを保存するには?
-
[解決済み] モジュール内でUserForm_Initialize()を呼び出す
-
[解決済み] Excelの数式 LIKE、AND、IF、WILDCARDS
-
[解決済み] Excelの数式で二重引用符を含む文字列を作成する方法は?
-
[解決済み】Excelで特定のテキスト値を自動的に日付に変換しないようにする。
-
[解決済み】セルに部分文字列が含まれているかどうかを確認する
-
[解決済み] MS Excelでバージョン管理をする最適な方法【非公開