Excel 2016VBAでInputBox関数を使用する方法

Excel 2016VBAでInputBox関数を使用する方法

VBA InputBox関数は、Excle 2016でユーザーが入力した単一の情報を取得するのに役立ちます。その情報は、値、テキスト文字列、さらには範囲アドレスである可能性があります。これは、1つの値のみを取得する必要がある場合に、ユーザーフォームを開発するための優れた代替手段です。

InputBox構文

InputBox関数の構文の簡略版を次に示します。

InputBox(プロンプト[、タイトル] [、デフォルト])

InputBox関数は、ここにリストされている引数を受け入れます。

口論 影響するもの
促す 入力ボックスに表示されるテキスト
題名 入力ボックスのタイトルバーに表示されるテキスト
(オプション)
ディフォルト ユーザー入力のデフォルト値(オプション)

InputBoxの例

InputBox関数の使用方法を示すステートメントは次のとおりです。

TheName = InputBox( "あなたの名前は何ですか?"、 "ご挨拶")

このVBAステートメントを実行すると、Excelにこのダイアログボックスが表示されます。この例では最初の2つの引数のみを使用し、デフォルト値を提供していないことに注意してください。ユーザーが値を入力して[OK]をクリックすると、コードはその値を変数TheNameに割り当てます。

Excel 2016VBAでInputBox関数を使用する方法

InputBox関数は、このダイアログボックスを表示します。

次の例では、3番目の引数を使用し、デフォルト値を提供します。デフォルト値は、Excelによって保存されたユーザー名(ApplicationオブジェクトのUserNameプロパティ)です。

サブGetName()
  文字列としての薄暗いTheName
  TheName = InputBox( "あなたの名前は何ですか?"、_
    「ご挨拶」、Application.UserName)
エンドサブ

InputBoxには常に[キャンセル]ボタンが表示されます。ユーザーが[キャンセル]をクリックすると、InputBox関数は空の文字列を返します。

VBAのInputBox関数は常に文字列を返すため、値を取得する必要がある場合は、コードで追加のチェックを行う必要があります。次の例では、InputBox関数を使用して数値を取得します。IsNumeric関数を使用して、文字列が数値であるかどうかを確認します。文字列に数字が含まれている場合は、すべて問題ありません。ユーザーのエントリを数字として解釈できない場合、コードはメッセージボックスを表示します。

サブAddSheets()
  文字列としての薄暗いプロンプト
  文字列としての薄暗いキャプション
  Dim DefValue As Long
  文字列としての薄暗いNumSheets
  プロンプト=「何枚追加しますか?」
  キャプション=「教えて…」
  DefValue = 1
  NumSheets = InputBox(Prompt、Caption、DefValue)
  NumSheets =““ Then Exit Sub 'がキャンセルされた場合
  IsNumeric(NumSheets)の場合
    NumSheets> 0の場合、Sheets.Add Count:= NumSheets
  そうしないと
    MsgBox「無効な番号」
  終了する場合
エンドサブ

このルーチンが生成するダイアログボックスを確認してください。

Excel 2016VBAでInputBox関数を使用する方法

InputBox関数を使用する別の例。

別のタイプのInputBox

ここに示されている情報は、VBAのInputBox関数に適用されます。Microsoftは混乱を好むようです。そのため、ApplicationオブジェクトのメソッドであるInputBoxメソッドにもアクセスできます。

Application InputBoxメソッドを使用する大きな利点の1つは、コードで範囲の選択を求めることができることです。ユーザーは、セルを強調表示することにより、ワークシートの範囲を選択できます。これは、ユーザーに範囲の選択を求める簡単な例です。

サブGetRange()
  範囲としてのDimRng
  エラー時に次を再開
  Rng = Application.InputBox_を設定します
    (プロンプト:=「範囲を指定:」、タイプ:= 8)
  Rngが何もない場合は、Subを終了します
  MsgBox「選択した範囲」とRng.Address
エンドサブ

これはそれがどのように見えるかです。

Excel 2016VBAでInputBox関数を使用する方法

ApplicationInputBoxメソッドを使用して範囲を取得します。

この簡単な例では、コードは選択された範囲のアドレスをユーザーに通知します。実際には、コードは選択した範囲で実際に何か便利なことをします。この例の良いところは、Excelがエラー処理を処理することです。範囲以外のものを入力すると、Excelがそのことを通知し、再試行できるようにします。

Application.InputBoxメソッドはVBAのInputBox関数に似ていますが、いくつかの違いもあります。詳細については、ヘルプシステムを確認してください。


スマートシート 9.1.1

スマートシート 9.1.1

Smartsheet は、プロジェクトの管理、ワークフローの構築、チームとの共同作業を可能にする動的な作業プラットフォームです。

共有ポイント

共有ポイント

SharePoint は、さまざまなワークフロー アプリケーション、「リスト」データベース、その他の Web コンポーネント、およびビジネス グループの共同作業を制御するためのセキュリティ機能を使用する Web ベースのコラボレーション システムです。

パーペチュアルカレンダー 1.0.38/1.0.36

パーペチュアルカレンダー 1.0.38/1.0.36

Van Nien Calendar は、携帯電話でカレンダーを表示するアプリケーションです。携帯電話で太陰太陽の日付をすぐに確認できるため、重要な仕事を計画することができます。

Microsoft Outlook 2021

Microsoft Outlook 2021

Microsoft Outlook は、Microsoft Corporation によって開発されたビジネスおよび生産性アプリケーションです。

クリックアップ

クリックアップ

ClickUp は、あらゆるビジネスにとって最も評価の高い生産性プラットフォームの 1 つです。Google、Booking.com、サンディエゴ・パドレス、Uber などの大企業はすべて、職場の生産性を向上させるために ClickUp を使用しています。

PDF-XChange ビューア 2.5.322.10

PDF-XChange ビューア 2.5.322.10

PDF は、テキスト ドキュメントの読み取り、作成、送信に一般的に使用される形式になっています。その結果、この種のドキュメントに使用されるプログラムの数も増加しました。PDF-XChange Viewer は、ますます多くの PDF ビューアの 1 つです。

Apache OpenOffice

Apache OpenOffice

Apache OpenOffice は、特に Excel、PowerPoint、Word など、Microsoft 365 に匹敵する Office アプリケーションの完全なスイートを提供します。プロジェクトをより効率的に管理できるようになり、いくつかのファイル形式がサポートされます。

iTaxviewer 1.8.7をダウンロード

iTaxviewer 1.8.7をダウンロード

iTaxViewer ソフトウェアは、現在最も人気のある XML ファイル読み取りソフトウェアです。このソフトウェアは、国税総局のXML形式の電子申告書を閲覧するためのアプリケーションです。

Nitro PDF リーダー

Nitro PDF リーダー

Nitro PDF Reader は、ほとんどの人が PDF ドキュメントを使用して毎日実行する基本的なタスクをすべてカバーする便利な PDF エディターです。

Foxit リーダー 12

Foxit リーダー 12

Foxit Reader は主に PDF リーダーですが、PDF ファイルの作成、署名、編集、注釈の追加も可能です。オペレーティング システム上で動作し、Microsoft Office パッケージのさまざまなプログラム用のプラグインがあります。