=========================================================================== 【ソフト名】 Excelマクロ CalcKing Ver.1.100 【登 録 名】　calk1100.LZH 【制作者名】　a-naga(長濱　敦　DZC04707) 【動作環境】　Excel97,2000の動作する環境 【動作ＯＳ】　Windows 9x 以降 確認したのは Windows95OSR2,Windows98SE,Windows2000SP3 【動作確認】　SONY VAIO PCG-C1VRX/K･PCG-XR7S, NEC Lavie PC9821 Nw150 【開発言語】　VisualBasic for Application (VBA) 【取扱種別】　フリーソフト 【転載条件】 転載配布条件による． =========================================================================== ■このプログラムはExcelで文字列として入力された計算式の入ったセルを参照して 計算結果を表示するマクロです． アドインとせずマクロとしたのは，関数ですので第三者とデータのやり取りをする 際に相手のパソコンにもアドインをインストールして貰わなければならなくなり煩 雑になるのを避けたかったからです． ■バージョンアップ 2002/10/05 ver.1.0.0.0 ・初出． 2004/03/16 ver.1.1.0.0 ・数値単独の時に"#VALUE!"のエラーが出ることがある 事に対処． ■同梱ファイル 　このファイルには以下のファイルが圧縮されています． 1.CalcKing.txt 今お読みのファイル 2.CalcKing.xls Excelマクロファイル（使用例サンプル） 3.functional.bas マクロソースファイル ■ "CalKing" の使用方法 １．上記のファイル全てを任意のフォルダに解凍する． ２．Excelを起動して，Visual Basic Editor（[ツール(T)]→[マクロ(M)]→[Visual 　 Basic Editor(V)]をクリックする．）を起動する． ３．プロジェクト エクスプローラの中からマクロを追加したいブックを右クリッ クし（通常は，"VBAProject (Book1)" がそうです．かっこ内はブック名が入 っています．）[ファイルのインポート(I)...]をクリックする． ４．ファイルのインポートのダイアログが表示されたら，先程のファイルを解凍し たフォルダを選択し，"functional.bas" を選択し[開く(O)]をクリックする． ５．もし，上記の手順がよく分からない，もしくは出来ない方は "CalKing.xls" を 開いて不要なシートを削除し作業後に名前を変えて保存して使って下さい． 　６．使用できる関数 　 =Calc() 　 上記の一つだけです． 　 使用例 =Calc(A1) セルA1の算式を計算 　 =Calc(A1,B1) セルA1とB1の文字列を連結して計算 　 =Calc(A1:B4) セルA1からB4の内容を連結して計算 　 =Calc(A1:A3,B1) セルA1からA3とB1の内容を連結して計算 ７．置き換えられる文字 関数内部で置き換えられる文字列です． これらの他に半角に変換可能な全角文字は半角に変換されます． 更に，後述する予約語以外の文字列は省かれて算式を評価します． "×"　→　"*" "÷"　→　"/" "｛"　→　"(" "｝"　→　")" "{"　 →　"(" "}"　 →　")" "√"　→　"SQRT" "π"　→　"3.14159265358979" "PI"　→　"3.14159265358979" "pi"　→　"3.14159265358979" "°"　→　"*3.14159265358979/180" "ﾟ"　 →　"*3.14159265358979/180" "％"　→　"/100" "%"　 →　"/100" "‰"　→　"/1000" "・"　→　"*" "･"　 →　"*" ")("　→　")*(" ".("　→　".*(" "0("　→　"0*(" "1("　→　"1*(" "2("　→　"2*(" "3("　→　"3*(" "4("　→　"4*(" "5("　→　"5*(" "6("　→　"6*(" "7("　→　"7*(" "8("　→　"8*(" "9("　→　"9*(" ")."　→　")*." ")0"　→　")*0" ")1"　→　")*1" ")2"　→　")*2" ")3"　→　")*3" ")4"　→　")*4" ")5"　→　")*5" ")6"　→　")*6" ")7"　→　")*7" ")8"　→　")*8" ")9"　→　")*9" ８．Calc()の中で使用できる関数（予約語） 関数名 使用例 結果 + 1+1 2 - 2-1 1 * 3*2 6 / 4/2 2 ABS ABS(-9) 9 ACOS ACOS(0.707107) 0.785397854 ASIN ASIN(0.707107) 0.785398473 ATAN ATAN(1) 0.785398163 ATAN2 ATAN2(-1,0) 3.141592654 COS COS(45°) 0.707106781 CURT CURT(8) 2 EXP EXP(3) 20.08553692 INT INT(-10.5) -11 LOG LOG(10) 2.302585093 LOG10 LOG10(3) 0.477121255 MAX MAX(3,MAX(2,MAX(4,100))) 100 MIN MIN(3,-1) -1 SIN SIN(90°) 1 SQRT SQRT(2) 1.414213562 SUM SUM(3,2) 5 TAN TAN(45°) 1 ９．エラー エラー処理はしていません．(^^ゞ はっきり言って手抜きです． 算式評価でエラーが起きると，算式そのものを返します． 計算結果でエラーが起きると，Excelがエラーを返します． ■転載配布 (１) 著作権 このプログラムはフリーソフトウェアーです． このプログラムの著作権は，a-naga（長濱 敦 ID:DZC04707）が所有してい ます． 著作権者の権利を侵害する行為は，固くお断り致します． 但し，このプログラムの複写・使用はどなたでも自由に行う事が出来ます． このプログラムの対価として，著作権者に金銭等を支払う必要はありません． (２) 免責事項 このプログラムを使用した事によって発生した損害は，一切保証しません． このプログラムに不備があっても，作者はそれを訂正する義務を負いません． (３) 転載及び配布 転載・配布の際は，下記の条件を守って下さい． 1)プログラムを改変しないこと． 2)このファイル内のアーカイブファイルの内容をまとめて配布すること． 3)転載・配布についての許諾は必要有りません． 4)このマクロが含まれているブックを第三者に渡すような場合は上記の条件は 適用外とします． (４) フリーソフトウェアの表示 このプログラム，または付属するドキュメントを配布する場合，このファイ ルをプリントアウトして配布するようにして下さい． (５) プログラムの修正 どなたでもご自由に改良して下さって構いません．例えば，扱える関数を増や すとかエラー処理を付け加えるとか等々． そして差し支えがなければ，公開先等を教えて頂けると幸いです． (６) その他 バグやご意見・ご要望等ありましたら 作者の WebSite "a-naga's site" http://homepage3.nifty.com/a-naga/ のＢ ＢＳまでお願いします． 原則としてメール等による直接のご質問にはお答えしかねます．情報はみんな で共有しましょう． ■ダウンロード calk1100.lzh でダウンロードして下さい． ■リリースノート 2002/10/05 ver.1.0.0.0 ・初出． 2004/03/16 ver.1.1.0.0 ・数値単独の時に"#VALUE!"のエラーが出ることがある 事に対処．