Excel(エクセル)の操作が楽になる方法と便利な使い方を紹介しています。


menu

Excel(エクセル)が楽で便利になる方法 [あまおとろぐ]

ExcelでVBA(マクロ)のプログラムを入力する画面を出す方法!実行もできますよ

  • このエントリーをはてなブックマークに追加
[ この記事の内容は Excel2013 でも使えます ]

 
Excelはセル関数を使うことで、簡単に合計値の計算やカウントができます。
SUM関数やCOUNTA関数などを一度は使ったことがあるのではないでしょうか?
 
この「セル関数」は簡単で便利ですが、
少し複雑なことをしたくなると、逆に難しくなってしまうことがあります。
1つのセルに書ける関数は1行なので、見づらくなりますし。
 
 

スポンサーリンク

VBAはとても便利!

そんな時、VBA(マクロ)でプログラムを書くと、とてもシンプルで簡単になります。
 
プログラムと言うと「なんか難しそう。。。」と思われるかも知れませんが、
プログラムにも難しいプログラムと簡単なプログラムがあります。
 
 
ちょっとしたことをしたいのであれば、簡単なプログラムでできるのです。
 
この記事では、そのVBAでプログラムを入力する画面を表示して、
簡単なプログラムを実行する方法を紹介します。
 
 

スポンサーリンク

方法です

  1. 何かのシートが表示されている状態で「alt+F11キー」を押す。
     
    「Microsoft Visual Basic for Applications」ウィンドウが表示されます。
    いわゆるVBAですね。
     
    350-2.png
     
  2. 左側のツリーでシート名のところをダブルクリックする。
     
    右側のエリアが白くなり、文字が入力できるようになります。
    今回はシート名が「Sheet1」でしたので、その部分をダブルクリックしました。
     
    350-3.png
     
  3. 右の白いエリアにVBAのプログラム内容を入力していく。
     
    とりあえず、「メッセージを表示するプログラム」を作ってみましょう。
    以下の通りに入力します。
    Function test1()
        MsgBox "VBAで表示したメッセージです!"
    End Function
    
     
    空白を入力する時は、全角空白ではなく、半角空白を入力してくださいね。
    全角空白ではエラーが出てしまいますので。
     
    350-4.png
     
    簡単に説明すると、
    Function から End Function で囲まれた部分が一つのプログラム、
    test1はこのプログラムの名前、
    MsgBoxは、”(ダブルクォーテーション)で囲まれた文字を表示する関数
    になります。
     
  4. F5キーを押すとVBAが実行される。
     
    ここで1つ気を付けることがあります!
     
    文字を入力するカーソルが「入力したプログラムのどこか」にある必要があります。
    今回の場合、「MsgBox~」の文字がある2行目にカーソルを置いた状態でF5キーを押します。
     
    メッセージが表示されました!
     
    350-5.png
     
    OKボタンをクリックすると、VBAが終了します。
 

保存しておきましょう

ついでに、作成したVBAプログラムを保存しておきましょう。
 
  1. 「ctrl+sキー」かメニューバーの「ファイル – ○○の上書き保存」を選択する。
     
    350-6.png
     
  2. ファイル名を適当に入力して保存する。
     
    Excel2013などの場合、 
    「次の機能はマクロなしのブックに保存できません」というメッセージが表示されます。
    そんな時は、ファイルの種類で「Excel マクロ有効ブック(*.xlsm)」を選択しましょう。
     
    350-7.png
 これで保存も完了です!
 
 

まとめ

いかがでしたでしょうか?
 
今回の記事で作ったプログラムは3行だけですが、これも立派なプログラムです。
要は、自分がやりたいことができれば良いのです。
 
このカテゴリでは、
「Excelでこれだけは覚えておきたい!」というVBA(マクロ)を紹介して行きたいと思います。
 
スポンサーリンク

  • このエントリーをはてなブックマークに追加

関連記事

コメント

  • トラックバックは利用できません。

  • コメント (0)

  1. この記事へのコメントはありません。

だーしゅ
IT関係のお仕事してます。
Excel大好き。

[当ブログについて]

最近のコメント

  • だーしゅ { abcさん、コメントありがとうございます。 この記事で書いている「コピー」は、 ------------------------------------ 既に設定されている「セルやフォントの色」を Excelの「塗りつぶしの色」や「フォントの色」機能に設定する ------------------------------------ という意味で使っています。 なので、コピーした色をはりつけるときは、 リボン上にある「塗りつぶしの色」や「フォントの色」アイコンをクリックすれば良いですよ。 一度お試しくださいね。 } – 3月 26, 7:47 AM
  • abc { コピーした色を張り付ける方法がわからない。 } – 3月 26, 7:17 AM
  • だーしゅ { YUUKO26さん、コメントありがとうございます。 求めていた計算式があって良かったです。 >こちらの式でいう【田】の部分の項目が2つ存在する場合 ですが、COUNTIFS関数を使うと良いです。 COUNTIF関数に「S」が付いただけですが、 複数の項目を扱うことができます。 例えば、 =COUNTIFS(A4,"*田*", A4,"*子*")>0 とすると、「田」と「子」がある場合、TRUEになります。 これを使って、該当がなければ空欄、であれば、 = IF( COUNTIFS(A4,"*田*", A4,"*子*")>0, "○","" ) という感じですね。 式が分かりにくくなった時は、 一度、分解してみると良いですね。 } – 11月 14, 2:00 PM
  • YUUKO26 { 初めまして。まさに求めていた計算式でしたので、感動のあまりコメントさせていただきました! 本当にありがとうございます^^ ちなみに、こちらの式ですが、 こちらの式でいう【田】の部分の項目が2つ存在する場合、どのような式にすればよろしいでしょうか? 詳しく例を申し上げますと、ある列に田と子がある場合は○と示し、該当がなければ空欄としたい。。というかんじです。もしお教えいただけるようであればよろしくお願いします>< } – 11月 14, 8:57 AM
  • だーしゅ { 匿名さん、コメントありがとうございます。 解消されたようで良かったです。 } – 9月 12, 3:45 PM
  • { 長年の疑問が解消しました。ありがとうございます。 } – 9月 05, 5:00 AM