Ｅｘｃｅｌ関数（応用）・・・入力金額を一の位から千の位まで個々に取り出す

今日は今まで紹介したＥｘｃｅｌ関数の実際の使用例を紹介しようと思います・・・

下の簡易ソフトは私が実際に使用している郵便振込取扱票のソフトなんですが・・・

• 下図の「Ｄ」の個所に
  • セルＪ22からＮ25(セル5個分）に金額
    
  • Ｏ22からＡＥ25(セル17個）に文章を入れてます。
  
  
• 下図の「Ｃ」の個所は「Ｄ」の表の振り込んで頂く金額を記入する個所です。
  
• 「Ｃ」に金額を書き込めば下図の「Ａ」の個所にその金額が転記される訳です。
  
• と同時に下図の「Ｂ」の個所にも「Ｄ」の表の文章が転記されます。　　　　　　

先ず、「Ａ」の個所にどの様な関数を書き込んでいるのか紹介します。

• 一円の位・・・ＲＩＧＨＴ関数を使用して、金額入力欄セルＡ5を指定して一円の位を指定・・・=RIGHT(A5,1)
  
• 十円の位・・・ＭＩＤ関数を使用して
  • 1000円未満の場合、何百円と云えば３桁に成りますから開始位置を２番目に指定して１文字抜き取ります・・・=MID(A5,2,1)となり・・・
  • 1000円以上の場合、４桁に成りますから開始位置を３晩目に指定して１文字抜き取ります・・・=MID(A5,3,1)と成ります。
  • これをＩＦ関数と組み合わせ、セルＡ5が1000円未満の時、正しければ=MID(A5,2,1)
    間違いであれば=MID(A5,3,1)と成ります・・・=IF(A5＜1000,MID(A5,2,1),MID(A5,3,1))
  
  
• 百の位・・・ＭＩＤ関数を使用して
  • 1000円未満の場合、何百円と云えば3桁ですから開始位置を1番目に指定して1文字抜き取ります・・・=MID(A5,1,1)
  • 1000円以上の場合、４桁に成りますから開始位置を２番目に指定して１文字抜き取ります・・・=MID(A5,2,1)
  • これをＩＦ関数と組み合わせ、セルＡ5が1000円未満の時、正しければ=MID(A5,1,1)
    間違いであれば=MID(A5,2,1)と成ります・・・=IF(A5＜1000,MID(A5,1,1),MID(A5,2,1))
  
  
• 千円の位・・・ＬＥＦＴ関数でも良いのですがＭＩＤ関数を使用して
  • 千円の位のみですから、開始位置は1番目を指定して1文字抜き取り・・・=MID(A5,1,1)
  • それをＩＦ関数と組み合わせして、もし1000未満の場合は空白""にして、
    1000円以上の場合=MID(A5,1,1)と成ります・・・=IF(A5＜1000,"",MID(A5,1,1))
  
  

次に、「Ｂ」の個所にはどの様な関数なのか紹介します・・・基本的にはＶＬＯＯＫＵＰ関数です。

• セルＡ5にＤの表の金額を書き込む訳ですからＤの箇所の表を検索範囲に指定します。・・・I22:AE25
  
• 金額がセルＪ22からＮ25(セル5個分）文章がＯ22からＡＥ25(セル17個）ですから
  セルＡ5の金額で検索し文章表示をするには6列目を指定・・・=VLOOKUP(A5,J22:AE25,6,検索の型)
  
• 完全一致で表示・・・=VLOOKUP(A5,J22:AE25,6,FALSE)
  
• ＶＬＯＯＫＵＰ関数の場合、空白の場合エラー＃Ｎ／Aが表示されますから厭なので・・・
  
• ＩＳＮＡ関数でＶＬＯＯＫＵＰ関数を検査してエラーの場合空白にしてる訳です・・・
  =IF(ISNA(VLOOKUP(A5,J22:AE25,6,FALSE)),"",VLOOKUP(A5,J22:AE25,6,FALSE))
  

これでセルＡ5に表の金額を入れる事によって転記されてる訳です。

実践に使用するにはこの様に色々な組み合わせ、応用をする訳です。


今日の小技は如何でしたか？

私も少々、疲れました・・・

受注数より少なく発送してしまった・・・

先程、とんでもない事に気が付いた！


昨日、出荷した梅肉エキス・・・受注個数より少なく出荷してしまってるんです。

それも、伝票は受注の個数で切ってしまっているんです・・・



早速、お客様へ電話を入れさせて頂いたのだが・・・留守電に成っていた・・・

直接謝罪の言葉を伝えるのが筋なのだが・・・仕方が無いので・・・

留守電にお詫びの言葉と足りない分を本日出荷する旨を入れさせて頂いた・・・

メールでも謝罪文を書いて発信させて頂いた・・・本当に申し開きが出来ない事をしてしまった・・・


長年、弊社の梅肉エキスをご愛用頂いているお客様・・・ご気分を害されるだろう・・・

如何してこの様な思い込みで発送してしまったのか・・・

常々・・・思い込みで仕事をしない様に自分自身に言い聞かせてきたつもりであった・・・が・・・

ふとした油断・・・慣れが・・・この様な事をしでかさせてしまったのだ・・・


今回の件は、謝っても許してもらえる事ではない・・・でも・・・謝る事しか出来ない・・・

プロとしての自覚を再度見つめ直さねば・・・本当に御免なさい・・・

今朝は寝坊をしてしまったぁ～・・・

ご好評頂いてます・・・ 　　和紙のシャリ感・・・ 弊社オリジナルタオルを 　アウトレット価格でご提供！ 品番[T_03] 健康タオル【和紙】 1枚　 820円 2枚　1,555円 3枚　2,160円

　携帯電話の目覚しの音が遠くに聞こえる・・・


　「7時前やでぇ～！」・・・妻に声を掛けられ・・・

　ハッと気が付いた・・・


　昨夜、帰宅後・・・風呂にゆったりと浸かり・・・身体の疲れを取り・・・

　一杯だけ・・・と・・・焼酎のお湯割りを飲んで寝たから？

　めったに、寝坊する事は無いのだが・・・

　今朝も相変わらず・・・目の奥が重たい・・・

　
　あっ！そうだっ！・・・今朝は目の薬を飲んでないっ！

この薬は、先日郷里の母からの荷物の中に入っていた・・・

有難い心遣いに感謝はしているのだが・・・

以前、買った事のあるキューピーコーワｉの方が良く効くみたいだな・・・



さぁ！今日も一日頑張るかぁ～！