随分前から自作のマクロ・関数をひっそりと公開してましたがそこそこ汎用性があるものもありますのでこちらでもご紹介しようかと思い書き込んでみます。
「汎用性があるモノもある」って事は「汎用性が無いモノもある」って事でご了承願います（笑）。
他の方も「こんなの作ったよ」って紹介してくれたりすると有用だと思います。
こちらからダウンロード可能です。
http://
ウイルス・スパイウェアの類は入ってませんが信用しても良いよって方だけどうぞ。
以下、機能のサマリです。
---
(1) f2t, f2ttマクロ (Format To Text)
Excelの表を出来る限りプレーンテキストで利用可能な形に整形します。
但し等角フォント（プロポーショナルではない）が対象になってしまいます。
(2) C_PART, N_PARTワークシート関数
書式 C_PART(文字列), N_PART(文字列)
セルの中身を文字列と数値に分解します。今のところ文字-数値となってい
る文字列を抜き出すことが出来ます。
(3) yy_mm_ddマクロ
指定範囲の書式を"YY/MM/DD"に変えます。
もう一度実行すると"YYYY/MM/DD"に変えます。
(4) Drow Dbl Line 5th row(DorwDbl5)マクロ
5行毎に罫線を二重にします。通常の格子罫線などは標準のセル書式設定
やツールボタンでやって下さい。
選択範囲内に処置を行います。
(5) tenkaiマクロ
横に並んだセルを縦に並び替えます。セルをコピーした数分だけ行を挿
入するのでデータを消すことがありません。また、予め範囲を選択する
必要がない為作業が楽です。
例： リンゴ バナナ みかん
↓
リンゴ
バナナ
みかん
実行後、カーソルは縦に並べた処の一番下に来るので連続実行すれば矩形
型のセルの内容を一列に並べることが出来ます。
例： リンゴ バナナ みかん
大根 人参 ゴボウ
↓
リンゴ
バナナ
みかん
大根
人参
(6) ToggleColorマクロ
セルに対する塗りつぶしのon/offを行います。既に塗りつぶされているセ
ルに対して実行すると塗られている色を取得します。もう一度実行すると
塗りつぶしを解除します。複数のセルが選択されている場合は左上のセル
の色で判断し塗りつぶし/解除を行います。
(7) cellcolorワークシート関数
セルの色を取得します。再計算してもセルの色が反映されません。計算式
を入力した直後はセルの色が反映されますがセルの色を変更しても計算結
果が反映されません。これはExcelの仕様のようです。
(8) uniqマクロ
選択範囲の左端の列を見て同じ内容のセルがあったらその行を削除します。
unixコマンドのuniqと似た動作だと思えば間違いないです。キーになる左
端の列はソートされている必要があります。
(9) evlookupワークシート関数
vlookup関数を拡張したものです。
使い方は殆ど一緒ですがエラーが起こったとき（主に#N/Aエラーを想定して
ます）の返値を指定出来ます。
usage: evlookup(索値, 範囲, 列番号, [エラー時の返値])
(10) メイクボタンマクロ(MakeBtns or mb)
これらのマクロを実行しやすくするツールバーを自動作成します。
「汎用性があるモノもある」って事は「汎用性が無いモノもある」って事でご了承願います（笑）。
他の方も「こんなの作ったよ」って紹介してくれたりすると有用だと思います。
こちらからダウンロード可能です。
http://
ウイルス・スパイウェアの類は入ってませんが信用しても良いよって方だけどうぞ。
以下、機能のサマリです。
---
(1) f2t, f2ttマクロ (Format To Text)
Excelの表を出来る限りプレーンテキストで利用可能な形に整形します。
但し等角フォント（プロポーショナルではない）が対象になってしまいます。
(2) C_PART, N_PARTワークシート関数
書式 C_PART(文字列), N_PART(文字列)
セルの中身を文字列と数値に分解します。今のところ文字-数値となってい
る文字列を抜き出すことが出来ます。
(3) yy_mm_ddマクロ
指定範囲の書式を"YY/MM/DD"に変えます。
もう一度実行すると"YYYY/MM/DD"に変えます。
(4) Drow Dbl Line 5th row(DorwDbl5)マクロ
5行毎に罫線を二重にします。通常の格子罫線などは標準のセル書式設定
やツールボタンでやって下さい。
選択範囲内に処置を行います。
(5) tenkaiマクロ
横に並んだセルを縦に並び替えます。セルをコピーした数分だけ行を挿
入するのでデータを消すことがありません。また、予め範囲を選択する
必要がない為作業が楽です。
例： リンゴ バナナ みかん
↓
リンゴ
バナナ
みかん
実行後、カーソルは縦に並べた処の一番下に来るので連続実行すれば矩形
型のセルの内容を一列に並べることが出来ます。
例： リンゴ バナナ みかん
大根 人参 ゴボウ
↓
リンゴ
バナナ
みかん
大根
人参
(6) ToggleColorマクロ
セルに対する塗りつぶしのon/offを行います。既に塗りつぶされているセ
ルに対して実行すると塗られている色を取得します。もう一度実行すると
塗りつぶしを解除します。複数のセルが選択されている場合は左上のセル
の色で判断し塗りつぶし/解除を行います。
(7) cellcolorワークシート関数
セルの色を取得します。再計算してもセルの色が反映されません。計算式
を入力した直後はセルの色が反映されますがセルの色を変更しても計算結
果が反映されません。これはExcelの仕様のようです。
(8) uniqマクロ
選択範囲の左端の列を見て同じ内容のセルがあったらその行を削除します。
unixコマンドのuniqと似た動作だと思えば間違いないです。キーになる左
端の列はソートされている必要があります。
(9) evlookupワークシート関数
vlookup関数を拡張したものです。
使い方は殆ど一緒ですがエラーが起こったとき（主に#N/Aエラーを想定して
ます）の返値を指定出来ます。
usage: evlookup(索値, 範囲, 列番号, [エラー時の返値])
(10) メイクボタンマクロ(MakeBtns or mb)
これらのマクロを実行しやすくするツールバーを自動作成します。
|
|
|
|
コメント(2)
はじめまして。こちらのトピ全然使われていないのですがこちらにあげさせてもらいます。
EXCELは仕事で毎日使ってますが、あれもやりたいこれもやりたいと、日々格闘してます。
最近はあまりVBAには手を出していないのですが、過去にこんなアドインを作って見ました。
EXCEL差込印刷
http://www.vector.co.jp/soft/win95/business/se383971.html
EXCELだけで、差込印刷を完結したいと思って作ってみました。２００７でも動作してます。
ワークシート操作ツール
http://www.vector.co.jp/soft/win95/business/se411485.html
シートの並び替えとか、シート名の一括変更とかできたらいいなって思うものを作ってみました。
もし使っていただける方おられたら、感想とか聞かせてほしいです。
EXCELは仕事で毎日使ってますが、あれもやりたいこれもやりたいと、日々格闘してます。
最近はあまりVBAには手を出していないのですが、過去にこんなアドインを作って見ました。
EXCEL差込印刷
http://www.vector.co.jp/soft/win95/business/se383971.html
EXCELだけで、差込印刷を完結したいと思って作ってみました。２００７でも動作してます。
ワークシート操作ツール
http://www.vector.co.jp/soft/win95/business/se411485.html
シートの並び替えとか、シート名の一括変更とかできたらいいなって思うものを作ってみました。
もし使っていただける方おられたら、感想とか聞かせてほしいです。
- mixiユーザー
- ログインしてコメントしよう！
|
|
|
|
