【Jw_cad】 Excelで外部変形

[97] 作成中データ　Name：Ｏ．Ｍ 　Date：2009/11/27(金) 00:18　[ 返信 ]

機能追加したくていじりちゅー 3/11　データ変更 VBdeJW HiroCom777さんのデータ利用 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ *処理速度ＵＰ *サブフォルダデータ取得機能追加 が目標、よくわかってないので教えてもらえたら嬉しいです。 （理解能力がないので理解できるかは怪しいです) LZHファイル（401KB） [133] RE:作成中データ　Name：Ｏ．Ｍ 　Date：2010/03/05(金) 22:27 Ex外部変形セット LZHファイル（401KB）

[122] H22.1.28 Excel複数図面置換Ver.0.01　Name：Ｏ．Ｍ 　Date：2010/01/28(木) 02:29　[ 返信 ]

HiroCom777さん作　JwwDataViewerEx JwwDataGlobalEx000 JwwDataModifyEx000 JwwDataReadVer0.95 JwwDataWriteVer0.85 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（270KB） [123] H22.1.28 Excel複数図面置換Ver.0.02　Name：Ｏ．Ｍ 　Date：2010/01/28(木) 17:13 HiroCom777さん作　JwwDataViewerEx JwwDataGlobalEx000 JwwDataModifyEx000 JwwDataReadVer0.95 JwwDataWriteVer0.85 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（315KB） [126] H22.2.24 Excel複数図面置換Ver.0.03　Name：Ｏ．Ｍ 　Date：2010/02/24(水) 23:55 自動文字抑制処理せずに図面内に１文字だけしかないのデータを変換すると文字が消えるエラーがあったため削除。 HiroCom777さん作　JwwDataViewerEx JwwDataGlobalEx000 JwwDataModifyEx000 JwwDataReadVer0.95 JwwDataWriteVer0.85 を利用させていただいています。 【更新内容】 　1)Ver0.02のファイル選択機能追加に伴い発生したリストボックス処理エラーを訂正 　2)置換実行ユーザーフォーム置換設定タブのリストボックス処理変更 　3)置換時の文字起点で中基点と右基点を追加 　4)ドライブ直下にフォルダを作って保存する場合にエラーになっていたのを訂正 　5)ブロック図形内の文字に対応 ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html [127] H22.1.28 Excel複数図面置換Ver.0.04　Name：Ｏ．Ｍ　Date：2010/02/25(木) 22:15 HiroCom777さん作　JwwDataViewerEx JwwDataGlobalEx000 JwwDataModifyEx000 JwwDataReadVer0.95 JwwDataWriteVer0.85 を利用させていただいています。 【更新内容】 　1)自動文字変換抑制を選択せず文字データが１つだけの図面を変換すると文字が消えてしまうエラーを訂正 　※Ver0.03の処理変更に伴うコードミス ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html ZIPファイル（295KB） [131] H22.3.5 Excel複数図面置換Ver.0.05　Name：Ｏ．Ｍ 　Date：2010/03/04(木) 18:17 HiroCom777さん作　JwwDataViewerEx JwwDataGlobalEx000 JwwDataModifyEx000 JwwDataReadVer0.95 JwwDataWriteVer0.85 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ 【更新内容】 　1)置換ユーザーフォームを起動させずにリンク削除を押すとずれが生じ手いたのを訂正 　2)置換した文字のみデータ書き換えするように設定変更 　3)中基点で置換した際に終点座標を書き変えず２度目の置換の際に異常が起きていたのを訂正 　4)文字処理の一部をセル上で処理から配列内で処理に変更 ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（295KB） [132] H22.3.5 Excel複数図面置換Ver.0.06　Name：Ｏ．Ｍ 　Date：2010/03/04(木) 19:19 HiroCom777さん作　JwwDataViewerEx JwwDataGlobalEx000 JwwDataModifyEx000 JwwDataReadVer0.95 JwwDataWriteVer0.85 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ 【更新内容】 　1)左基点で置換した際に終点座標を書き換えないため、２度目の置換の際に異常が起きていたのを訂正 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（295KB）

[128] H22.2.27 Excel置換いじりデータ　Mround　Name：Ｏ．Ｍ 　Date：2010/02/27(土) 21:48　[ 返信 ]

Excel置換の説明ページは http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html Mround 動作確認　Excel2007 Excel置換.batを起動し出てきたエクセル画面でMroundというボタンを押した後 画面右上赤い×ボタンでエクセルを閉じたら処理実行できます。 ※処理できない場合はエクセルの分析ツールを有効にしてみてください。 コードは好きに変更してしまってＯＫです。 エクセルＶＢＡを使っての処理ですので、 エクセル左最下部の「置換」タブを右クリックし「コードの表示」左クリックで表示された画面の Format(Application.MRound(.Cells(i, 2).Value, 0.05), "0.00") の部分を変更すれば処理が変更できます。 関数 http://www.eurus.dti.ne.jp/~yoneyama/Excel/kansu/round.htm 表示形式 http://www.eurus.dti.ne.jp/~yoneyama/Excel/user_set.htm 上記サイトが参考になるかと思います（私がお世話になっているサイト様です） 例１） "0.00"で小数点以下2桁ですが、部分を"0.0"にしたら小数点以下１桁までの数値になります。 "#,##0.00"にすると桁区切りありの小数点以下２位までの数値になります。 ※セルの表示形式の時に設定するのと同じように設定すればその表示形式になります。 Format(文字列, セルの表示形式) 例２） MRound(.Cells(i, 2).Value, 0.05) だと小数点第二位の5を境に切り上げ切り下げですが MRound(.Cells(i, 2).Value, 0.5) に変更すると小数点第一位の5の文字を境に切り上げ切り下げします。 例３） MRound(.Cells(i, 2).Value, 0.05) を RoundUp((.Cells(i, 2).Value, 2) にしたら小数点第二位で切り上げします。 また、コード画面で 同じ画面の下の一番下に張り付けし張り付けたデータの １．Mround_Syoriを好きな名前に変更（ひらがなや漢字も使えます） ２．「Private 」を削除 例） Sub 指定数値で切り上げ桁区切りあり() ３．「Format(Application.MRound(.Cells(i, 2).Value, 0.05), "0.00")」を好きな設定に書き換える ３．「ファイル」→「終了してMicrosoft Excelに戻る」でエクセル画面に戻る ４．エクセル上のボタンを右クリック→「コピー」左クリック→どこでもいいのでセルを右クリック→「張り付け」でボタンを増やす ※エクセル2007なら画面上部の「挿入」→「図形」を押し好きな図形をエクセル上に張り付けてもＯＫです ５．張り付けた図形を右クリック→「マクロの登録」左クリック→Excel置換.xls!Sheet1.（１で付けた名前）を選択→「ＯＫ］ で作成した新しいコードを追加したボタンに登録できます。 ６．コピーして作ったボタンの場合、ボタンを右クリック→ボタンを左クリックでボタンの名前を変更できる状態になります ※「Private 」を削除したのは５のでデータが選択できるようにするため。 Excel置換.xls!Sheet1.（１で付けた名前）の文字を手打ちしても登録できるのですが手打ちは間違いの元なので。 登録し終わったらコードに「Private 」をつけ直してもＯＫです。 ※「Private 」がついていないとAltとF8ボタン同時押しで出てくるので面倒かなと。 画面に表示されるのですが、その画面から実行するためのコードも エクセルにくっつけてるので。 （文字の入ったセルを範囲選択してAltとF8ボタン押して出てくるコードをを選択して実行したら 文字変更されます） ＶＢＡに関して詳しく知りたくなった方は http://www.asahi-net.or.jp/~ef2o-inue/menu/menu04.html ※「作成したマクロの動作の確認方法」と「ＶＢＥの使い方」の全項目に目を通すとコードがどのような動作をするか確認する方法が分かるので目を通すといいと思います。 http://excelvba.pc-users.net/ あたりがお勧めです。 LZHファイル（76KB） [129] H22.2.28 Excel置換いじりデータ　0.05基準に丸め３種追加　Name：Ｏ．Ｍ 　Date：2010/02/28(日) 12:04 CEILINGとFLoor追加Ver LZHファイル（98KB） [130] H22.2.28 丸め処理一式追加＆ユーザーフォム処理　Name：Ｏ．Ｍ 　Date：2010/02/28(日) 17:44 丸め処理6種をユーザーフォームで設定Ver 丁寧なエラー処理はしていないのでユーザーフォームの説明にある指定数値以外は記入しないようにしてください。 置換実行ボタンでユーザーフォームを起動して丸め処理方法選択して実行してください。 LZHファイル（100KB）

[120] H22.1.27　Ｅｘｃｅｌ文字外変 置換/集計/寸法反転/角度訂正　Name：Ｏ．Ｍ　Date：2010/01/27(水) 11:23　[ 返信 ]

VBSなどその他ソフトをかませずbatファイルとエクセルのみでVBS経由の寸法反転のような処理ができる方法がありましたら教えていただきたいです。 H22.1.27変更内容 Excel置換 　1)batファイル表示文字訂正 Excel寸法反転 　1)batファイル線幅情報取得・曲線情報除外・ソリッド情報除外に変更 Excel文字角度訂正 　1)batファイル線幅情報取得・曲線情報除外・ソリッド情報除外に変更 詳しくは下記サイトか同封のTEXTファイルで確認して下さい。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（393KB） [124] H22.1.29　Ｅｘｃｅｌ文字外変 置換/集計/寸法反転/角度訂正　Name：Ｏ．Ｍ 　Date：2010/01/29(金) 21:24 VBSなどその他ソフトをかませずbatファイルとエクセルのみでVBS経由の寸法反転のような処理ができる方法がありましたら教えていただきたいです。 H22.1.29変更内容 Excel置換 Ver0.01 　1)置換設定ユーザーフォムで結果確認保存設定を起動時に読み込まなくなっていたので読み込むように訂正 　2)結果確認が置換前と「置換後で文字が同じなら赤色」と逆設定になっていたので訂正 　3)標準モジュール名変更 　4)Run実行時のファイル名表記方法変更 　5)空白のみの文字の削除機能追加 　6)セル内容変更用コード追加 　　半角→全角、全角→半角、半角数字→全角数字、全角数字→半角数字 　　※セル上で範囲選択→Alt＋F8同時押→実行ボタン選択で実行 Excel集計 Ver0.01 　1)標準モジュール名変更 　2)Run実行時のファイル名表記方法変更 　3)セル内容変更用コード追加 　　半角→全角、全角→半角、半角数字→全角数字、全角数字→半角数字 　　※セル上で範囲選択→Alt＋F8同時押→実行ボタン選択で実行 詳しくは下記サイトか同封のTEXTファイルで確認して下さい。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html ZIPファイル（399KB）

[119] H22.1.2 Excel複数図面置換　Name：Ｏ．Ｍ 　Date：2010/01/02(土) 23:08　[ 返信 ]

HiroCom777さん作　JwwDataViewerEx JwwDataGloballVer0.89 JwwDataReadVer0.95 JwwDataWriteVer0.85 JwwDataModifyVer0.25 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（322KB）

[118] H21.12.31 Excel複数図面置換　Name：Ｏ．Ｍ 　Date：2009/12/31(木) 21:25　[ 返信 ]

※エラーありデータ（起動して１回目の置換実行時にエラーにあんる、２回目以降はＯＫ） HiroCom777さん作　JwwDataViewerEx JwwDataGloballVer0.89 JwwDataReadVer0.95 JwwDataWriteVer0.85 JwwDataModifyVer0.25 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（322KB）

[117] H21.12.30 Excel複数図面置換　Name：Ｏ．Ｍ 　Date：2009/12/30(水) 02:42　[ 返信 ]

HiroCom777さん作　JwwDataViewerEx JwwDataGloballVer0.89 JwwDataReadVer0.95 JwwDataWriteVer0.85 JwwDataModifyVer0.25 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（317KB）

[116] H21.12.29 Excel複数図面置換　Name：Ｏ．Ｍ 　Date：2009/12/29(火) 16:57　[ 返信 ]

※重大なエラーのあるデータです 訂正版はH21.12.30 Excel複数図面置換 HiroCom777さん作　JwwDataViewerEx JwwDataGloballVer0.89 JwwDataReadVer0.95 JwwDataWriteVer0.85 JwwDataModifyVer0.25 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（261KB）

[115] H21.12.28(2) Excel複数図面置換　Name：Ｏ．Ｍ 　Date：2009/12/28(月) 12:13　[ 返信 ]

HiroCom777さん作　JwwDataViewerEx JwwDataGloballVer0.89 JwwDataReadVer0.95 JwwDataWriteVer0.85 JwwDataModifyVer0.25 を利用させていただいています。 HiroCom777さんＨＰのVBdeJWのは下記です。 http://www.h7.dion.ne.jp/~hirocom/VBdeJW/ ソフト説明は下記ＨＰで確認してください。 http://blogs.yahoo.co.jp/nekobasu83/folder/553597.html LZHファイル（247KB）