IT関連

ExcelVBA 汎用プログラム サンプル集

投稿日:2019年8月18日 更新日:

エクセルVBAの素晴らしさを伝えたいと思って動画を作っています。

正直私は人に教えられるほどスキルは高くありませんが、素晴らしさを伝えるくらいは出来ると思っております。

下記がその動画の1回目です。現在7回まであります。

 

主旨は入門編の前の導入編です。やる気になれなければ書店で本を手に取ることもありません。

皆さんをやる気にさせることが動画の目的です。

 

なるべく、ご視聴いただいた皆さんが職場や自分の業務を想像できる内容を心がけて作っています。

そこで、私が実際に職場で汎用的に使っているサンプルプログラムを紹介することにしました。

無駄があると思いますが、一応は使えているのでご参考になさってください。

不備がございましたらご指摘いただけると幸いです。

 

よろしければブログも見て頂けると嬉しいです。

 

千で割る

売上とか利益とか合計金額とか単位の円を千円に直したいときに使用します。

使い方

  1. 適用させたいセルを選ぶ(複数セル可能)
  2. 下記マクロを実行する
  3. 選んだセルにあるすべての値が1000で割られ、実質単位千円になります。

 

ゼロで桁埋め

数字の001が単なる1になってしまうときに、0を先頭に補完して001で表示するプログラムです。

通常数字の先頭には0は入りません。0を入れたとたん文字として認識します。特段問題はありませんがご注意ください。

使い方

  1. 適用させたいセルを選ぶ(複数セル可能)
  2. マクロを実行する
  3. ポップアップで桁数を聞かれますので入力してください。001の3桁なら3、0001の4桁なら4。
  4. 選んだセルにあるすべての値の先頭に0が入ります。

 

 

アクティブセルの文字でブックを保存する

名前をつけて保存するのって面倒ですよね。「名前を付けて保存」から「ファイル名」を打ち込んで「保存ボタン」を押す作業。

ファイル名をそのまま「Book1」にすると後でなんだかわからなくなります。

そもそも保存するということは、タイトルなりテーマなり何らかの文字をエクセル上に打っているはずです。

それなら、その文字を使って保存しようというのが趣旨です。

使い方

  1. 保存したい名前のセルをクリックする(複数セル選択不可)
  2. マクロを実行する
  3. 以上。選択したセルの文字でExcelブックがデスクトップに保存されます。

 

アクティブセルの文字でPDFを生成する

エクセルのシートからPDFをボタン一つで生成する方法です。

エクセルをPDFにすること自体は簡単です。名前をつけて保存からPDFを選ぶだけです。

しかしこれも上記のエクセルの保存と同じく、普通にやると面倒なのでマクロ化しようという話です。

使い方

  1. 保存したい名前のセルをクリックする(複数セル選択不可)
  2. マクロを実行する
  3. 以上。選択したセルの文字でPDFがデスクトップに保存されます。

 

 

先頭行を固定し印刷タイトルにする

エクセルは表計算ソフトなので当然のことながら表を作ることが多いです。

行数が多くなると、スクロールしたときや複数枚印刷するときに、表のタイトルが固定されている方が良いことあると思います。

それを1ボタンで実現するマクロです。

使い方

  1. マクロを実行する
  2. 以上。表示も印刷も1行目が固定されます。

 

続きは動画で紹介するたびに追加いたします。

よろしくお願いいたします。

スポンサーリンク




スポンサーリンク




-IT関連
-,

執筆者:


comment

Your email address will not be published. Required fields are marked *

関連記事

Laravel Viewの第二引数 連想配列の渡し

私は知らなかったので忘備録。   これと

  これは [crayon-60027d4e2f2f7468026134 …

AS400/IBMi ファイルの簡単編集 UPDDTA

STRDFUなど使って事細かく設定DFUファイルを作らなくても、深く考えずに編集するだけなら UPDDTA ライブラリ名/ファイル名 を使えば、すぐ編集画面に飛ぶ。編集方法はDFUと同じ。

AS400/IBMi 8桁の日付を6桁で比較する

すみません、これは自分の備忘録です。 ゴミなので無視してください。   DDS 入出力 STR(6桁)   C仕様書 初期値にZ-ADD 20000000 STRWRK 80 これ …

AS400/IBMi *DATEがおかしいと思ったらH仕様書のYが抜けている

Z-ADD *DATE YMDとし、20190107という日付を取得しようと思ったら、 1072019と表示されるのでおかしいと思った。 先頭の1は1月。2~3桁は日、後は2019年。になっている。 …

AS400/IBMi RDi 入力や削除ができないおかしい

LPEXエディタを使っていてRPGIVやフリーフォームを使っている中で、いつからか入力がおかしくなったことについて直し方。   その症状は入力ができなかったり削除ができなかったり。 しかも1 …

Adsense広告




文字で検索

人気記事

なぜだか人気記事

読んでほしい順に