Excel標準の関数の使い方はこちら → (e2b) 関数一覧
Excelの関数の作り方はこちら ↓

---

(e1iw) エクセルの関数を作る

繰り返し使う複雑な計算を自分専用の関数として作る方法を説明します

エクセルに標準で組み込まれていない式などを自分で作成して、 ワークシート上で使うことができる機能です

---

(1) 税込み金額を求める関数を作る

• 金額を指定すると1.05倍の税込み金額を求める 関数 fzeikomiを作ってみましょう
• 通常のエクセルの画面から[Alt]キーを押したまま[F11]キーを押します
  • 上の方法がとれない Excel2007 の場合
    1. [Office]ボタン→[Excelのオプション(I)]
    2. [基本設定]→[Excelの使用に関する基本オプション]→[開発タブをリボンに表示する]にチェック
    3. [開発]タブが表示されます
    4. [開発]タブ→[コード]グループ→[VisualBasic]を選択します
  • 上の方法がとれない Excel2003 の場合
    1. [ツール]メニュー→[マクロ(M)]→[VisualBasicEditor(V)]を選択します
• これで通常のエクセルの画面からＶＢＥの画面に移動します
• ここで[挿入]メニュー→[標準モジュール]を選択します
• 下図右下のようなModule(コード)の画面が表示されます
• 
• Module(コード)の画面へ下図のように 『基本的に半角英数字で』関数を書きこみます
• 
• ここで[Enter]キーを押すと下図のように End Functionが自動的に作られます。 文法的に決められたキーワードは青い文字色に変わり 単語の先頭が大文字になります
• 
• 引き続き関数の中身を書きます
• 
• ここで[Enter]キーを押すと下図のように式が整形され 変数名や記号の隙間があきます、これはこういうものだと思ってください
• 
• これでできあがりです。ここまでに入力した式の内容は下記の通りです

• 
  Function fzeikomi(king)
  
       fzeikomi = king * 1.05
  
  End Function
  
  

• コードの説明

  
  Function fzeikomi(king)      '関数fzeikomi が始まります
  
       fzeikomi = king * 1.05  'kingを1.05倍してfzeikomiにいれなさい
  
  End Function                 '関数の終わりです
  
  

• Excel関数作り方
• エクセル関数の作り方

---

(2) 作成した関数をワークシートから使用する

• VBEの画面を終了します
• ワークシートの画面に戻ります
• セルA1に金額 3450000 と入力します
• セルB1に =fzeikomi(A1) と入力し[Enter]キーを押します
• 下図のようにセルA1の税込み金額 3622500 がセルB1に表示されます
• 

---

(3) エクセルの関数 を作る場合のルールなど

• 基本的に function function名(引数) ではじまります
• 答えを求めるための式を function と end function の間に書きます
• function名 と同じ変数名に最終結果を渡します
• 最後が end function でおわりです
• 関数の名前は英字で始まればなんでもＯＫです。 ただし SUM などの標準関数名は一般的には使わないほうが安全でしょう。 今回は『関数ゼイコミ』の意味で fzeikomi にしました
• 別のブックでこの関数を使いたい場合は下のいずれかの方法を使います
  • ユーザー定義関数を組み込んだブックを開いておいて、開いた別のブックからそのユーザー定義関数を呼び出す
  • Module1 に作成した関数をコピーして、別のブックに作成した関数をもって行く
  • マクロブックと呼ばれるマクロを保存するためのブックに保存する→マクロブックを登録したコンピュータから呼び出せます
• 関数は関数の中身を変更しても勝手に再計算してくれません、 関数の書かれたセル内で、一部分をクリックして、 [Enter]キーを押す必要があります
• 一度関数を作成して、ブックを保存した後、再びその書類を開くと、 『開こうとしているブックにマクロが含まれています...ウィールスがどうとか』 文句をいわれます。びっくりしますが、少なくともこれはあなたが作った関数なので、 今回は『マクロを有効に』で開きます

---

(4) エクセルの関数 の作成例

• (a) 何％増しの値を求める関数

  • 
    Function fper(data,per)
    
         fper = data * ( 1 + per )
    
    End Function
    
    

  • ワークシート側から =fper(340,0.1) で 340 の 10% 増しで 374 が求まります
  • 10% の場合10ではなく 0.1 を渡します
• (b) 何％引きかなどを求める関数

  • 
    Function fvper(data1,data2)
    
         fvper = ( data1 - data2 ) / data2 
    
    End Function
    
    

  • ワークシート側から =fper(374,340) で 374 に対して 340 が 10%引き が求まります
  • この場合結果表示形式で％を指定します
• (c) 点数から評価を求める関数

  • 
    Function fhyoka(tensu)
    
         If tensu > 65 Then
    
             fhyoka = "よくできました"
    
         Else
    
             fhyoka = "がんばりましょう"
    
         End If
    
    End Function
    
    

  • ワークシート側から =fhyoka(70) で "よくできました" が求まります

---

ユーザー定義関数

• ここまで説明して来た「エクセルの関数を作る」で作成したのが ユーザー定義関数 です

---

関連ページ

• ユーザー定義関数： (mm0629) ユーザー定義関数入門
• ユーザー定義関数： (e1k) 赤い色のセルだけ合計
• (mm0831) マクロとは
• (tp0201) Excel2007の使い方
• (e1nw) VBA体験 win
• (e4a) VBA入門
• (e4b) マクロの自動記録
• (e2b) 関数一覧

---

関連サイト

• Microsoft Office OnLine： ユーザー設定のワークシート関数を作成する Excel2003

---

キーワード

• エクセルの関数を作る
• Excelの関数を作る
• ユーザー関数
• ユーザー定義関数
• UDF

---

2003/04/28：登録　2012/02/11：更新　訪問者数： エクセル学校

---