管理人の素人なエクセルVBA集historyBACK
HOMEフリーソフトの紹介【ビジネス】管理人の素人なエクセルVBA集

管理人の素人なエクセルVBA集
 管理人(MORIO)がエクセルVBAで作成した、簡単で便利なエクセルシートです。
 中にはVBAを使用せず、関数や条件付き書式設定だけで作った便利なシートもあります。
 素人ながら、便利で実用的なものを紹介します。
注)管理人の会社では全く問題なく動作していますが、素人が作ったVBAプログラムですので、
  極稀にバグがあるかも知れません。(ご愛嬌!)見付けた時は管理人までご連絡ください。

  VBAコードにはパスワード保護を掛けています。ただし、ご希望の方には解除しますので、
  管理人までメールでご依頼下さい。(解除したファイルを送ります。)

注)一旦デスクトップなどにダウンロード(保存)してから再度エクセルを起動して動作確認してください。
  ブラウザから直接開いて動作させた場合は、正常に動作しません。(ブラウザの仕様)

同一フォルダ(同一階層)内へのショートカット削除ツール.xls(64KB) New
   同一フォルダ(同一階層)内のファイル(フォルダ)へのショートカットがフォルダ内に散在
  していると、非常にわずらわしいものです。(同一フォルダ内のファイルへのショートカットは
  は邪魔になるだけです。)このマクロは、同一フォルダ(同一階層)内のファイル(フォルダ)
  へのショートカッ(.lnk)のみ
を探し出して自動で削除してくれます。
  (不要かも知れませんが、念のため削除したショートカットのログを残します。)
  ・動作は、Microsoft Excel 2002、2010で確認しています。

  自己評価:85点
   共有フォルダなどにショートカットを残す癖のある人が多いので、大変便利なマクロだと思います。
  仕事のイライラが少しでも減れば幸いです。

シート名の一覧表(リンク付)作成.xls(74KB) Ver-up.2017/7/23
   エクセルは無制限にシート増やせますが、シートが多いとシート見出しを横にスクロールする
  必要があり非常にわずらわしくなります。このマクロは、一覧表のシートに全シート名へのリンク
  のリストを作成する簡単なマクロです。マクロボタンを押すと、今選択されているアクティブセル
  の下か右方向に全シートへのリンクリストを作成しますので、選択セルの下か右方向には
  使用セルが無いようにしてください。今回の改良で空きセルを確認するようにしていますので
  ご安心ください。
  ・動作は、Microsoft Excel 2002、2003、2010で確認しています。
  ・変更履歴 2017/7/23
   リンクリストの作成方向を選択できるようにした(選択セルの下か右方向)
   リンクリストを作成する自分のシートへのリンクを作成するかどうか選択できるようにした。
   リンクリストを作成する方向の空きセルを確認するようにした。(上書き防止のため。)

  自己評価:85点
   大変便利なマクロだと思います。仕事のイライラが少しでも減れば幸いです。

シートの整列表示.xls(83KB) Ver-up.2017/8/16

   エクセルで作業する時、画面にブック内の複数のシートを整列表示し、比較検討しながら
  作業することがよくあります。作業性を考慮して、このように同一ブック内の複数のシートを
  整列表示することは、エクセルの基本機能で可能ですが、共有ファイルなどは整列状態を
  崩して保存されてしまうことが良くあります。その度に最初から整列し直すのは面倒ですね!
  このマクロは、ファイルを開く時の整列の形やウィンドウ枠の固定位置などを、予め「SETUP」
  シートで設定しておけるものです。
  ・動作は、Microsoft Excel 2000、2002、2010で確認しています。
  ・変更履歴 2017/8/16
   細かいバグの修正と改善:起動と同時に、不要なウィンドウを削除したり、ウィンドウ枠の固定を
               一旦解除するようにした。(機能の変更はない。)
  自己評価:75点
   大変気の利いたマクロだと思います。仕事のイライラが少しでも減れば幸いです。

Webカラー配色計画.xls(278KB)
   Webページの配色を検討する時、実際の色を画面に出して同時対比させて検討する
  必要があります。補色関係や文字と背景の明度差、セパレーションの効果、Webサイトの
  イメージ色(CI)を検討する場合などに、実際に色を出しながら検討できます。
   動作は、Microsoft Excel 2000、2002で確認しています。

  自己評価:70点
   Microsoft Excel 2000、2002用ですので、70点にしておきます。
  Excel 2003以降での動作確認はしていませんが、何方か確認してもらえないでしょうか。
  このプログラムは、Webページを作成する時に役に立ちます。(必要は発明の母)

最も簡単な家計簿.xls(176KB)(家計簿シート2017年分に変更済)rev.2017/4/2
   家計簿を付けるって、めんどうくさいですよね。管理人が作ったエクセル家計簿は
  本当にシンプルです。管理人宅もこのエクセルシートで付けていて、長続きしています。
   →購入した日付は当月内であれば何時でもいいじゃないですか!
   →給料日も毎月25日にもらったことにすればいいじゃないですか。
   →費目も9種類で十分です。これ以上細かく分類する必要はないでしょう。

  自己評価:90点
   めんどうくさがり屋の人も、このエクセルシートで10年以上長続きしています。

シート保護と解除ボタン.xls(134KB)
   会社ではシートに保護を掛けて編集されないようにすることがよくあります。
  管理者がシート保護を解除して編集し、編集後に再度保護を掛ける場合に手間が省けるよう、
  [保護解除]ボタンを設けたり、閉じる時に自動で保護が掛かるようにしてあります。
  ・動作は、Microsoft Excel 2000、2002、2003、2010で確認しています。

  自己評価:75点
   公開するエクセルファイルで、管理者以外は編集できないようにする場合に便利なシートです。

選択セルの値(文字)を連結.xls(105KB) Ver-up.2011/5/28
   選択したセルの値(文字)を連結してクリップボードにコピーするプログラムです。
  エクセルでメーリングリストを作成し、メーラーの宛先欄にまとめてペーストする場合に便利です。
  連結する際の「区切り記号」は、「SETUP」シートで指定できます。
  ・動作は、Microsoft Excel 2000、2002、2003、2010で確認しています。
  ・変更履歴 2011/5/28
   オートフィルタに対応した。(可視セルのみ連結されるよう改良)
   会社などのメーリングリストにキーワード欄を追加し、例えばプロジェクトメンバーに
   キーワードを登録して、フィルタリングするなどの利用ができる。(自己評価点75→85UP)

  自己評価:85点
   特に、エクセルで作ったメーリングリストに、まとめてメールする際に重宝します。

セルの文字方向変更ボタン.xls(189KB)
   セルを選択して【角度UP】ボタン、又は【角度DOWN】ボタンを押すと、セル内文字の
  方向(角度)を変更できます。角度の変更ステップと、方向により自動変更される文字色は、
  「SETUP」シートで初期設定できます。
  ・動作は、Microsoft Excel 2000、2002、2003で確認しています。

  自己評価:70点
   パフォーマンスの報告資料など、意外と応用範囲は広いと思います。

最も簡単なスケジュール表.xls(42KB)
   ブックを開いた時、その日の行が一番上に来ます。
  日付の欄には、条件付書式を設定してあり、土曜日はピンク、日曜日は赤字になり、
  セルの背景が薄い黄色になります。(祭日には対応しておりません。)
  書式をコピーしたり、オートフィル機能で日付を延長して行ってください。
  ・動作は、Microsoft Excel 2000、2002、2003、2010で確認しています。

  自己評価:75点
   これほどシンプルで実用的なスケジュール表はありません。

無記名問合せシート.xls(34KB) rev.2017/7/28
   エクセルを利用した、無記名の問合せシートです。
  上書き保存時にプロパティから個人情報は削除されます。
  保存時に作成者や更新者などのプロパティデータが削除されるようにしてありますので、
  お気軽にご意見が伺えます。
  ・動作は、Microsoft Excel 2000、2002、2003、2010で確認しています。
  ・変更履歴 2017/7/28
   保存したことがメッセージとして表示されるようにした。その他、細かい動きの修正など。

  自己評価:75点
   イントラネットやショートカットでこのシートを公開し、無記名での「ご意見集め」や
  「アンケート調査」が気軽に行えます。

検索行スクロールUP.xls(224KB)
   このプログラムは、コンボボックスで選択または入力した文字と完全一致する文字を
  シートの上から探しに行き、最初にマッチした行をスクロールUPして一番上の行に
  表示するものです。
  ・動作は、Microsoft Excel 2000、2002、2003、2010で確認しています。

  自己評価:75点
   大きな一覧表を作成した時、行数が多くなると必要な行をスクロールして探すのは
  かなり面倒です。

ユーザー設定ビューの切替えボタン.xls(54KB)
   マクロボタンで同一シートの見せ方の違う3つの画面(ビュー)を劇的に切替えて使用できます。
  非常に簡単なVBAコードなので、ビュー数を増やせるようにVBAコードには保護を掛けていません。
  取説のシートが重たいので、pdfファイルとして分離した。→取扱説明書.pdf(136KB)
  ・動作は、Microsoft Excel 2000、2002、2003、2010で確認しています。

  自己評価:70点
   元々備わったエクセルの機能を最大限に活用した例です。うまい使い方と言えるでしょう。

QC工程図記号(CLIP).zip(279KB) ←クリップアート集(.gif)と取扱説明書(.pdf)が入っています。
   エクセル(Microsoft Excel 2000)で使用する、QC工程図記号です。(クリップアート集)
  Excel 2000以外でも、クリップアートとして取り込めれば使用できます。
  ・動作は、Microsoft Excel 2000、2002、2003で確認しています。

  自己評価:75点
   会社ではQC工程図を作成することが多くあり、非常に重宝しております。

注)全てのエクセルファイルは、一旦デスクトップなどにダウンロード(保存)してから
  再度エクセルを起動して動作確認してください。(マクロを有効にしてください。)
  ブラウザから直接開いて動作させた場合は、正常に動作しません。(ブラウザの仕様)


当サイト内の内容、画像の無断転載、転用については固くお断りします。
Copyright (C) 2009 Mottai-Navi All Rights Reserved.