Excel家計簿77で使えるショートカット キーと使用例

 家計簿77では、入力を補助する目的で、下記のショートカット キーを用意しています。

 このショートカット キーを使うには、「マクロを有効にする」必要があります。具体的には、一度[メニュー]を表示し、マクロのバージョンを確認(奨励)後、メニューは[×]で閉じてください。
 
≪目次≫


家計簿77で使えるショートカット キー

Ctrl+Shift+B
  • 機能:「備考」に移動する。
  • 使用例
    • 例えば「支出」まで入力し、次は「備考」に飛ぶ場合に使える‥‥ かも。
  • 参考
    • バージョン 1.45で開発。[B]は「備考」から取った。
Ctrl+Shift+H
  • 機能:次の行の日付に移動する。
  • 使用例
    • 例えば「支出」まで入力し、次のレシート(品名)を入力する場合に使える‥‥ かも。
  • 参考
    • バージョン 1.52bで開発。[H]は「日付」から取った。
Ctrl+Shift+I(アイ)
  • 機能:医区(医療費区分)をコード一覧(リストボックス)から入力する。
  • 使用例f:id:ogohnohito:20190717114316p:plain:right:w240
    1. Ctrl+Shift+I で、カーソルが「医区」に移り、
    2. 右図の【医療費区分の入力】ダイアログボックスが表示される。
    3. 医療費区分コードを選択し、
    4. [OK]すると、該当コードが医区に入力される。
  • 参考
    • バージョン 1.44で開発。[I](アイ)は「医区」(医療費区分)から取った。
Ctrl+Shift+K
  • 機能:選択した列の「計算式で入力」してるセルを探す。
  • 使用例
    • エラーチェック用に作ったもので、通常、使うことはない。
  • 参考
    1. バージョン 1.44a1で開発。[K]は「計算式」から取った。
Ctrl+Shift+T
  • 機能:通し番号を入力する。
  • 使用例f:id:ogohnohito:20190717115609p:plain:right:w200
    1. Ctrl+Shift+T で、カーソルが「通し番号」移動し、
    2. 通し番号が表示される。(右図)
    3. Enter or[OK]で通し番号が入力される。
    4. その後、「医区(医療費区分)を入力しますか?」が出るので、f:id:ogohnohito:20190718110345p:plain:right:w320表示に従って応答する。
  • 参考
    • バージョン 1.42で開発。[T]は「通し番号」から取った。
    • 通し番号の変更は出来ない。事前に削除し、付け直す。
    • 空き番管理は行っていない。但し、最後の番号を削除し、再度通し番号を付けると、同じ番号が付く。f:id:ogohnohito:20190717120540p:plain:right:w320
    • 例えば[翌年分ブック作成]等で、新しい家計簿を作った場合、開始の番号が分からないので右図が出る。
      • 自分の家計簿であれば 1 からでよいが、
      • 家族の医療費専用家計簿を作った場合、1からにすると自分の通し番号と重なるので、例えば 301 とし、番号が重複しないように工夫する必要がある。
Ctrl+Shift+Z
  • 機能:入力した支出金額に消費税を加える。
    • 処理後、セルの (1)フォントは灰色になり、(2)数式「=入力金額+消費税額」になる。
  • 使用例
    1. 支出に「2000」を入力し、Ctrl+Enter で確定する。(カーソルが移動しない)
    2. Ctrl+Shift+Zf:id:ogohnohito:20190717090800p:plain:right:w320
    3. 【消費税加算】ダイアログボックスが出るので、
      • 消費税を(半角数字で)入力し、(例えば 8)
        • 表示と同じ場合は入力不要。
      • Enter または[OK]をクリックする。
    4. 数式バーには「=2000 + 160」が表示され、
    5. フォントが灰色になる。
  • 参考
    • バージョン 1.53で開発。[Z]は「税」から取った。
      • AEONのレシートが消費税別方式に変わったのを機に開発した。
      • 1枚のレシートに費目が異なる品名があると、入力(通常は消費税込みのはず)時の計算が面倒なので...
    • 消費税は「切り捨て」ているので、実際とは誤差が発生する。
    • 入力した消費税率は、カード・シートのセルH1:I1 に保存され、次回の初期値に使用される。
    • フォント色は、入力し直しても戻りません。

麻里府海岸のアカメガシワをハツッて海水を飲ませた

 麻里府地区では年に1回だが「海岸清掃」がある。f:id:ogohnohito:20190716104457j:plain:right:w320

見田団地の清掃範囲内に、昔の堤防沿いにアカメガシワ(赤芽槲、赤芽柏)が数本生えている。

f:id:ogohnohito:20190716105719j:plain:w400
名前がわからず、グーグル先生に聞いた。たぶん、間違いないだろう。

この2~3年、清掃後も「美観を損ねている」と、個人的に思っていた...

  • 7/12:軽トラに、頑丈な鍬(唐鍬?)と幅40mmのタガネを積み、清掃場所へ。
    • f:id:ogohnohito:20190716133439j:plain:right:w160タガネは、去年ナフコで購入したもので、商品名は「レッキングチゼル」(覚えられないのでタガネで...)
    • 私より年配のおじさんが近づいてきたので事情を説明し、何かいい方法がないか尋ねたが、「偉そうなことは言えない」と逃げられたぁ~
    • 3ヶ所、鍬で力でもぎ取って、残った根っこは たがね ではつった。
  • 7/13:雨で外出せず...
  • 7/14:麻里府海岸清掃日:小雨決行! 一昨日のアカメガシワを片付けた。
  • 7/15(今日)
    • f:id:ogohnohito:20190716135457j:plain:right:w240昨年ノコギリで枝を切ったままになっていたアカメガシワ(下図)を鍬で叩き、タガネで斫った。
    • その後、「塩水を掛けたら早く枯れる‥‥ かもしれない」と、海水で洗い、証拠の写真とした。(右図)
      f:id:ogohnohito:20190716134817j:plain:w320

    • 13日に斫ったアカメガシワ
      f:id:ogohnohito:20190716142011j:plain:w512

      f:id:ogohnohito:20190716142049j:plain:w512

      f:id:ogohnohito:20190716142122j:plain:w512

      f:id:ogohnohito:20190716142207j:plain:w512
    • 何れも海水をたっぷり掛けた。特に最後の場所は、付近の砂を集めて被し、海水だまりを作って飲ませた。
      f:id:ogohnohito:20190716142524j:plain:w512

≪終わって≫

  • 目印があった方がいい‥‥ と、道具箱にあったチョークを使ったが、来週には消えているだろうなぁ~
  • 当面、週一で海水を掛けようかと思っているが...
  • 海水で効果なければ、塩を塗してみようかぁ~
     釘で傷を付けた方が効果あるかも...
  • この件、このページだけの秘密にしておこう‥‥ ついては、その後‥‥ は、このページに追記する。(たぶん)

WindowsXPで強制終了したら音が出なくなった‥‥ と、ヘルプコールで出かけた

 昨日、退職後は音信が途絶えていた入社同期の方から電話があった。

 DVDの音楽を聴いていて‥‥ 訳あって強制終了した。その後、スピーカーから音が出なくなった。雑音みたいのが聞こえる...
友達に診てもらったが、もう寿命かも‥‥ と言われた。

エッ!? WindowsXP? グーグル先生に聞いたら、WindowsXPも、Windows7も Windows10も、やることは同じ(変わっていない‥ということ)で一安心?

  1. コンパネからバイス マネージャー と進みを開き、サウンドのドライバーを削除!
  2. 再起動すると、ドライバーがインストールされる。

というもの。


 9時半、軽トラで現れたので、現役の頃との違いに先方がビックリ!?!?!?!?

  1. 起動に時間が掛かったのでチョッと気になったが、
  2. サウンドから試聴したが、問題無いよう‥‥
    • 起動時にサウンドドライバーが再インストールされたのかな?
  3. メディアプレーヤーを起動した‥‥ ら、「直ったじゃんッ!」とオーナーの声。
    • 自分は正常に動作しているか調べただけなので、沈黙を守る...

「自分は何もしていない」とは言えず、(1)トラブルが発生したら、シャットダウンし、(2)コンセントを抜いて、2~3分置き、(3)電源を入れるように‥‥ と...
お礼をいただき、恐縮して帰宅した。

電話番号から住所を知ってGoogleマップで家の場所を知る

 今回の友人宅に訪れることになったが、住所録(Excel),アドレス帳(Thunderbird)に記載が無く、前日に聞いた電話番号を頼りに自宅の場所を調べた。
なおその友人は、同じ団地に知り合いがあり、電話番号を聞いた‥‥ とのこと。

  1. 「”電話番号”+0833-**-**** 姓」でググると‥‥
  2. 山口県光市光井- ネットの電話帳 - 住所でポン! 2012年版」がヒットした。
  3. このページを Ctrl+F ⇒ 姓 で検索すると‥‥ 電話番号と姓名が一致したレコードが見つかったので、「地番」をコピー。
  4. Google Chrome から Googleマップを開き、
  5. "山口県光市光井" +地番 で検索。
  6. [ルート・乗換]すると、3っのルートが表示されたが、
    距離的には1km遠いものの所要時間は同じ 国道188号線経由にすることにした。
    (帰路は県道22号線を通った)
  7. 印刷は、Ctrl+P ⇒[印刷]から、レイアウト:横 で 1ページをプレビューで確認、印刷した。

Excel/テキストボックスにセルの値を表示する

 昨日の草取りにで筋肉痛‥‥ と思ったら、今朝、腰にも来ている様子。まさか熱中症ではあるまいが頭もなんとなく重い... 日曜日でもあるし、家で静かにしていよう‥‥ と、「世界一やさしいExcel2016」で作った「店舗別売上集計表」を開いた。f:id:ogohnohito:20190707133643j:plain:w200:right
 気になっているのが、ドーナツグラフの中心に表示している「売上総合計/50,992円」。テキストボックスを貼り付けてあるので、『グラフデータが変更になっても、この金額は自動的に変わらない』点。

 ググっていて‥‥

  • テキストボックスにセルの内容を表示する(moug モーグ
    www.moug.net

    ●概要●

     テキストボックスなどの図形にセルの参照式を入力すると、指定したセルのデータがテキストボックスのテキストとして表示されます。
    変更される可能性のあるセルのデータをテキストボックスにも表示したい…といったときに便利です。
    ●詳細●
    1. [挿入]タブの[図形]から[テキストボックス]をクリック
    2. シートの任意の位置をドラッグしてテキストボックスを追加
    3. テキストボックスを選択した状態で、数式バーをクリック
    4. 「=」を入力
    5. データが入力されているセルをクリック
    6. [Enter]キーを押す

 「50,992」に単位を表示する‥‥ ところでつまづいたが、表示したい一心で行った。

  1. 1行を挿入する。
  2. 挿入した行(ここでは行番号「2」)の E列(売上合計の列.ここではセルE2)に、総売上合計を参照する計算式("=E9")を入力し、
  3. セルの書式設定で「単位」を入れる。(例えば、#,##0百円)
    f:id:ogohnohito:20190707143005j:plain:w512
  4. f:id:ogohnohito:20190707144505j:plain:right:w240テキストボックスは 2っ用意する。
  5. 上テキストボックスには "売上総合計" と入力する。(文字列,書式は任意)
  6. 下テキストボックスは、
    1. 下テキストボックスを選択する。
    2. 数式バーをクリックし、
    3. 「=」を入力し、セルE2をクリックする。
    4. [Enter]。
  7. 表示が確認できたら、行2 は非表示にしておく。

 頭もスッキリしたので、明日の草刈りの準備をしよう...

≪参考≫
 グラフタイトルも同様の方法で、セルの値を表示することができる。

元 田んぼのテント倉庫周辺の草取りで筋肉痛

 なる置場(元々は田んぼ)前に建てたパイプ車庫(倉庫)、周辺は草刈り機で刈っているが、ハウスバンドがあるので、際までは刈れない...
昨日2時間、今日2時間掛けて

f:id:ogohnohito:20190707063914j:plain:h150 f:id:ogohnohito:20190707062757j:plain:h150 f:id:ogohnohito:20190707062741j:plain

フィールドカートにお世話になり、カット鎌&のこぎり鎌で際の草取り‥‥ は、結構きつく、最後は掛け声3度目にやっと立ち上がれた。すでに筋肉痛にも...
 最後は草刈り機(ナイロンコード)で仕上げた。

f:id:ogohnohito:20190707071139j:plain:w320 f:id:ogohnohito:20190707071254j:plain:h240

この美観!  いつまで持つかなぁ~

前立腺がん/定期治療で周東総合病院へ‥PSA は1.0で飲み薬を処方された

  • PSAは 1.0 と治療開始以来、最高の値になり、ドクターより「飲み薬の再開」を告げられた。
    f:id:ogohnohito:20190704152957j:plain
  • 次回の予約は、飲み薬は6週間分なので、次回は8月14日(水)11:00〜11:30、
    予約注射は 9月26日(木)09:55 の予定

Excel/新発見!郵便番号から住所を入力するとPhonetic関数で郵便番号を得ることができる

≪目次≫


いきさつ

 「世界一やさしいExcel2016」(インプレス)の 第1章第2章に続き、第3章の「住所入り会員名簿」を Excel2013 で、経験と勘と独断(KKD)で作成した。

テキストは全部読んでいないので、右図のとおり出来ているか否かは不明だが...


住所から郵便番号を作る

 「郵便番号から住所を入力する」で新発見した。

  • テキストでは『住所1(D列)に郵便番号を入力して変換する』とあるが、これはごく普通の方法。
  • 自分流は、左側(C列)が郵便番号(半角で入力)なので、
    1. D列にカーソルが移った時、
    2. Ctrl+R ‥‥ これで郵便番号はコピーされる
    3. F2 ‥‥ これで編集モードになる
    4. [変換]キー押下
    だが、Ctrl+R で書式までコピーされるので、[データの入力規制]が「オフ(英語モード)」に変わってしまうので‥‥ 使えないかぁ~
  • Excel 郵便番号から住所
    plaza.rakuten.co.jp
    郵便番号を入力し、住所を表示させる場合
     事前にIMEのプロパティ-辞書/学習タブにて、郵便番号辞書にチェックを入れておいて下さい。
    A1に =PHONETIC(B1) と関数を入力しておき、B1に郵便番号を入れて「変換」 させてみて下さい。A1、B1それぞれに表示されたと思います。

 エッ? 早速、試してみた‥‥ ら、いいねェ~
郵便番号は全角で表示されるの asc関数で半角にすればいい‥‥
 具体的には、

  1. セルC2に計算式 "=ASC(PHONETIC(D2))" を入力しておく。
  2. セルD2は、例えば "742-1513" で住所に変換し、Ctrl+Enter*1 でセルの入力確定する。
  3. セルC2に "742-1513" が表示される。
  4. F2 ‥‥  編集モードにする
  5. 住所1の続きを入力する。

 新しい行を入力する時は、C列で Ctrl+D で上のセルの計算式をコピーし、住所1を入力すればよい。


ふりがなを作るには(マクロ)

 Excel 以外から「氏名」を取ってくると、ふりがな が付かないので‥‥

  • Excel ふりがなを作成する by 超簡単なマクロ使用(未経験者OK!)
    plaza.rakuten.co.jp
     早速、マクロを作成してみます。
    1. [ツール]-[マクロ]-[マクロ] で [マクロ]ダイアログ が表示されます。
    2. マクロ名:ふりがな作成
      マクロの保存先:作業中のブック
      として、[作成]ボタン をクリックすると、Microsoft Visual Basic の編集画面が表示されます。
    3. 下図のように、プログラム(命令書:マクロ.xls-Module1(コード)の見出しの画面)を一行だけ入力します。
      Selection.SetPhonetic
      Sub と End Sub の間に入力します。
    4. 入力したら、右上の [×]ボタン で、編集画面を閉じます。
    これで準備が出来ました


サンプルデータ


*1:確定後、セルを移動させない