今日の世界では、ファイルを開くときにスプラッシュ画面が数秒間画面に表示されるのが大好きです。ほとんどの人はスプラッシュ画面に気づいていません。きっと感動することでしょう。

以下の手順に従う必要があります:

[開発者]タブをクリックし、[コード]グループから[VisualBasic]を選択します

image 1

  • [挿入]をクリックしてから[ユーザーフォーム]をクリックします

image 2

ユーザーフォームはツールボックスから開きます。ユーザーフォームで[ラベルと描画]を選択します

image 3

image 4

  • ラベルボックスの名前を「MySplashScreen」に変更します

image 5

フォントのサイズを大きくするには[ラベル]ボックスをクリックし、右クリックして[プロパティ]を選択します

image 6

  • プロパティウィンドウから。フォントを選択し、3つのドットをクリックします

image 7

  • [フォント]ダイアログボックスが開きます

image 8

  • フォントを好きなように選択し、サイズを20程度に増やして大きくします

image 9

次のステップは、ツールボックスから画像を挿入し、画像を選択して少し大きく描画することです

image 10

image 11

[画像]を右クリックして[プロパティ]を選択します[プロパティ]の[画像]メニューで3つのドットをクリックします

image 12

  • 画像を保存するパスを選択してください

image 13

  • これがユーザーフォームの外観です

image 14

プロジェクトペインでこのワークブック*をダブルクリックします

image 15

VBEに次のコードを入力します:-

プライベートサブWorkbook_Open()

UserForm1.Show

サブの終了

image 16

ユーザーフォームを初期化するには;ラベルまたは画像以外のユーザーフォームをダブルクリックすると、次のコーディングが表示されます

image 17

上記のコードを次のコードに置き換えます。-

プライベートサブUserForm_Activate()

Application.OnTime Now + TimeValue( “00:00:05″)、 “Quitform”

サブの終了

image 18

次に、ユーザーフォームに割り当てたQuitフォーム*にコードを追加して、5秒後にアクティブ化する必要があります。

  • [挿入]をクリックしてから[モジュール]をクリックします

image 19

  • これにより新しいモジュールが作成されます。

  • モジュールに次のコードを入力してください

image 20

  • ファイルを保存してから開きます。

image 21

この方法に従うことで、VBAを介してMicrosoftExcelでスプラッシュ画面を作成できます。