質問をすることでしか得られない、回答やアドバイスがある。

15分調べてもわからないことは、質問しよう!

新規登録して質問してみよう
ただいま回答率
87.20%
VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

マクロ

定義された処理手続きに応じて、どのような一連の処理を行うのかを特定させるルールをマクロと呼びます。

解決済

【VBA】Fnctionを使ったシート名の判定・条件分岐

kkkei
kkkei

総合スコア2

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

マクロ

定義された処理手続きに応じて、どのような一連の処理を行うのかを特定させるルールをマクロと呼びます。

2回答

0リアクション

0クリップ

371閲覧

投稿2022/07/14 14:06

編集2022/07/15 00:20

前提

以下のような機能を持つマクロをVBAで組んでいます。

  • 2回目以降のマクロ実行時、処理を中断してメッセージボックスに”すでにその名前のシート名がある”旨を表示する、なければアクティブシートをコピーして左端に配置されるようにする

実現したいこと

  • SubプロシージャからFunctionプロシージャを呼び出して、条件分岐できるようにする

発生している問題・エラーメッセージ

  • Functionプロシージャの引数やSubプロシージャでの呼び出しかたが正しいかわからない
  • 処理が中断されず、メッセージボックスも表示されない
  • マクロを2回目以降実行すると同一シート名()でコピーができてしまう

該当のソースコード

VBA

Sub Macro1() Dim flg As Boolean Dim SheetName As String flg = SheetsCheck(SheetName) If flg = True Then End MsgBox "中断します" Else ActiveSheet.Copy Before:=Sheets(1) Sheets(1).Name = Format(Date, "yyyymmdd") End If End Sub Function SheetsCheck(ByVal SheetName As String) As Boolean Dim ws As Worksheet For Each ws In Sheets If ws.Name = SheetName Then SheetsCheck = True Else SheetsCheck = False End If Next End Function

試したこと

  • Subだけでできるか試してみましたが、読みずらくなるのと処理の結果は変わりませんでした
  • Subプロシージャ内での呼び出し方が違うのかと思いましたが、調べた方法を試しても変わりません
  • フローチャート的なものを書いて整理しましたが、それを実現してみてもうまくいきません

以上、何卒よろしくお願いいたします。

以下のような質問にはリアクションをつけましょう

  • 質問内容が明確
  • 自分も答えを知りたい
  • 質問者以外のユーザにも役立つ

リアクションが多い質問は、TOPページの「注目」タブのフィードに表示されやすくなります。

気になる質問をクリップする

クリップした質問は、後からいつでもマイページで確認できます。

またクリップした質問に回答があった際、通知やメールを受け取ることができます。

下記のような質問は推奨されていません。

  • 間違っている
  • 質問になっていない投稿
  • スパムや攻撃的な表現を用いた投稿

適切な質問に修正を依頼しましょう。

2022/07/14 15:02依頼された後にこの質問は修正されています

こちらの質問が他のユーザーから「やってほしいことだけを記載した丸投げの質問」という指摘を受けました。

hatena19

2022/07/14 14:36

「ブック内のシートを繰り返しで全件検索する」「同じ名前のシートがあれば処理を中断して」とのことですが、そもそも、一つのブック内に同じ名前のシートは存在できないのですが、何をしたいのでしょうか。
kkkei

2022/07/14 15:48

質問内容が不明確ですみません。 マクロを2回目以降実行した際に、既に使われているシート名という旨のメッセージをメッセージボックスで表示させて処理を中断させたいということです。 同一シート名()でシートを作成させないようにしたいのです。 質問を修正しておきます。 ご指摘ありがとうございます。

まだ回答がついていません

会員登録して回答してみよう

15分調べてもわからないことは
teratailで質問しよう!

ただいまの回答率
87.20%

質問をまとめることで
思考を整理して素早く解決

テンプレート機能で
簡単に質問をまとめる

質問する

関連した質問

同じタグがついた質問を見る

VBA

VBAはオブジェクト指向プログラミング言語のひとつで、マクロを作成によりExcelなどのOffice業務を自動化することができます。

マクロ

定義された処理手続きに応じて、どのような一連の処理を行うのかを特定させるルールをマクロと呼びます。