|
2009/08/10(Mon) 11:29:48 [ No.51 ] |
|
2009/05/07(Thu) 18:11:53 [ No.47 ]
space-EのFDILの迷路を作成出来るマクロファイルを
出力するバージョンを作成してみました。 マクロの出力先は固定で "D:\HZS\Modeler\data\mac\mac_user\MyMeiro.mac" になっています、 変更したいときは。標準モジュールの共通変数の所を 書き換えて下さい。 添付:48.zip (24kB) 2009/05/15(Fri) 12:35:47 [ No.48 ] 2009/05/15(Fri) 12:37:17 [ No.49 ] 2009/06/18(Thu) 15:09:38 [ No.50 ] |
|
V5CAMのCAMWEBで吐き出した、ファイルのソース内の「designmodelimg」の名称の
画像サイズを300X300に強制的に書き換えます。 テスト不十分なのでバックアップを取る等、注意してください。 2009/02/12(Thu) 17:36:07 [ No.45 ] 2009/02/17(Tue) 13:09:10 [ No.46 ] |
|
EXCEL VBA カラーINDEX
http://www.relief.jp/itnote/xls_colorindex.php http://www.relief.jp/itnote/archives/000482.php 2008/08/31(Sun) 18:02:30 [ No.44 ] |
|
様子が判らないのでキャノンの安い(10000円程)の
ものを購入しましたが文字の認識が旨くいきません。 販売店ではどの機種でも大丈夫とのことでしたが、奥深い ところはわからないようでした。 Maniacさんはどのようなものを使用していますか? 同じ内容の質問を同じコーナーに書き込みたいのですがおしえてください。 宜しくおねがいします。 2006/10/09(Mon) 18:09:14 [ No.23 ] 2006/10/12(Thu) 09:41 [ No.26 ]
>Maniacさんはどのようなものを使用していますか?
私の使っているのは、2〜3年前のキャノン製です、 USB接続の安価なものです、北條さんのとあまり 変らないと思います。 >文字の認識が旨くいきません。 濃淡の問題で、写りが悪いとゆうだけの話ではなく? ひょっとして、OCRソフト(文字認識ソフト)とかで 文字(文章)の読み取りをしようとしていますか? 2006/10/12(Thu) 09:40 [ No.27 ]
スキャナーについていた文字読み取りソフトを使用しました
無理でしょうか? 2006/10/13(Fri) 18:54 [ No.28 ]
OCRソフト(文字認識ソフト)ですか。
わたしも とんと経験不足でわかりませんが 名詞の読み取りとかで、一般的に広まっているものもありますよね プリンタで印字した文字とかならば、そこそこの識別率もあるかも その前に整理して考えると @スキャナーのスキャンの状態はいいのか A元の原稿に擦れや不鮮明な部分がないか BOCRのソフト自体の性能は? Bについては、工夫のしようもないでしょうが、 @、Aについては、解像度や、コントラストとかまだまだ 工夫の余地があるのではないでしょうか。 ところで、スキャンしたものをその画像のまま使うと ゆうのは考えられないのですか? 2006/10/16(Mon) 13:57 [ No.29 ]
エクセルにスキャンした文字の画像を取り込んで色々と
処理をすることは可能でしょうか? 宜しくお願いします。(^^;) 2006/10/18(Wed) 15:16 [ No.30 ]
>色々と
ですか(^^;) 張り付けて、サイズを変えたり、配置を換えたり とかは出来そうにおもいますけど、 2006/10/18(Wed) 20:30 [ No.31 ]
エクセル上でスキャンした図面の図番から記録した
価格等拾い出して納品書に記入するにはやはり文字 に変換しないと無理じゃないでしょうか? (^^;) 2006/10/21(Sat) 11:05 [ No.32 ]
うわー(+_+)価格の読み取りですか?、図番の読み取り?
それはハードルが高いと思いますよ。 0と6とか、2と7とか、まあ桁数の読み間違いの 可能性は少ないかもしれませんが、 それでも、手描き文字となるとどうでしょう、 それより、伝票内の、単価の枠や個数の枠とか 位置指定して、読みとるとなると スキャナーの付属ソフトの能力を超えるのでは ないでしょうか? 業務用の専用ソフトで考えると、マークシートの読み取り 装置とかが思いつきますが、 一般向け使用可能な高機能なOCRソフトって どうなのかな? ビッグサイトでやるようなOA機器関係の展示会でも あれば、探せるかもですね。 2006/10/21(Sat) 15:56 [ No.33 ]
色々考えて見ましたが、どうも図番の下4桁ぐらいを記入して
図面番号の全てと名称、価格、を拾い出して納品書に記入 する方法で作るのがいいような気がしてきました、 これでちょっとやってみます。 有難うございました。 2006/10/24(Tue) 12:09 [ No.34 ] |
|
余りにも初歩的質問で失礼しました、少しずつ確実に覚えたいので宜しくおねがいします。
又ひとつ教えたください、納品を書記入するのに製作図面からスキャナーで図番、名称等書き込みたいのですがどのような機種が良いのでしょうか? 価格は自動記入するようにかんがえています。 今度はこれを作ろうと思っています、宜しくおねがいします。 2006/10/05(Thu) 17:48 [ No.21 ]
スキャナーですか
CANONあたりは、プリンタに付属の機能として スキャナがついていたりしますが、 あれは、A4の1枚紙じゃないとどうですかね、 A4に限っての話なら 最近は、インクジェットプリンタの 発展型としての、複合機(カラーCOPY+プリンタ) が各社から発売されていますね 図面で仕事をしていると、最低でもA3のCOPY&FAX機が必要ではありますが、 価格的には、図面表題欄のスキャン専用として購入することも 無理な値段ではないかも 2006/10/05(Thu) 20:41 [ No.22 ] |
|
vba の記述の中で ( ) " " , ' . & 等有りますが使用方法
内容等教えてください。 ファイル>17-0.1zh 見せていただきました。 また勉強することが増えました。 有難うございます。(^^;) 2006/09/24(Sun) 09:06 [ No.18 ]
北條さんへ、
●() Keisann(A,B) とかだったら、サブプログラムや関数に引数 (パラメータ/計算材料)を渡すのに使用しているのだと思います。 ●"" "テキスト"、"文章" 文字列をくくる時に使うものですね。 ちなみに、""とした場合には、前後の""の中のテキストが 空(長さ0、空っぽ)のケースとなります ●' 『'』の文字以後は行末までを、コメントとしてみなします プログラムの内容についての説明に使うことが多いです。 ●'' 'A'、'a' 文字(文字変数)をくくる時に使うものですね。 ●& なんでしょう? 論理演算子 Gコードのマクロでも論理演算(IF文とか)は使いますよね &に相当するGコードのマクロでの論理演子ってなかったでしょうか? 今、EXCELの入っていないPCから返信していますので ちゃんと確認出来ていません。 少なくとも、前後を足して、 1行全文で、聞いて頂いた方がよいでしょう、 2006/10/03(Tue) 21:46 [ No.20 ] |
|
恥を忍んでUPして見ます
自分が使おうと思っていますので、他人には あまり使い道がないかとは思います 内容は、T,F,S,深さと穴座標を指定し、 穴明パスを作ります Z=0は材料表面とし イニシャル点30mm R点5mm 固定サイクルはG82のみ 切削は油ではなく、エアーです なるべくコメントは付けるようにしましたが、 不足気味かもしれません 責任は持ちませんので著作権は放棄します ご自由に改造してください 添付:17.lzh (18kB) 2006/09/19(Tue) 10:25 [ No.17 ] |
|
条件抽出の不明部分の説明有難う御座いました。
2006/09/16(Sat) 15:49 [ No.16 ] |
|
(;_;)
Sub 条件抽出1() Dim 抽出セル As Range Dim データセル As Range Set 抽出セル = Sheets("a.b.c").Range("A1") Set データセル = Sheets("a.b.c").Range("A21") i = 1 j = 1 Do If ("" = 抽出セル.Offset(j, 0).Value) Then Exit Do End If Do If ("" = データセル.Offset(i, 0).Value) Then Exit Do End If If (抽出セル.Offset(j, 0).Value = データセル.Offset(i, 0).Value) Then Dim aaa As String........この部分わかりません、特にaaa 教えてください。 Call 一致データのコピー1(データセル.Offset(i, 0), 抽出セル.Offset(j, 0)) End If i = i + 1 Loop While i < 150 i = 1 j = j + 1 Loop While j < 19 End Sub 2006/09/14(Thu) 20:51 [ No.13 ]
恐らく、何かの一部分を切り出したものですね
「if」や「Do-Loop」はタブキー等で段落をつけた方が 理解しやすいです こんな感じです ************ Sub 条件抽出1() Dim 抽出セル As Range Dim データセル As Range Set 抽出セル = Sheets("a.b.c").Range("A1") Set データセル = Sheets("a.b.c").Range("A21") i = 1 j = 1 Do httpIf ("" = 抽出セル.Offset(j, 0).Value) Then httphttpExit Do httpEnd If httpDo httphttpIf ("" = データセル.Offset(i, 0).Value) Then httphttphttpExit Do httphttpEnd If httphttpIf (抽出セル.Offset(j, 0).Value = データセル.Offset(i, 0).Value) Then httphttphttpDim aaa As String........この部分わかりません、特にaaa 教えてください。 httphttphttpCall 一致データのコピー1(データセル.Offset(i, 0), 抽出セル.Offset(j, 0)) httphttpEnd If httphttpi = i + 1 httpLoop While i < 150 httpi = 1 httpj = j + 1 Loop While j < 19 End Sub ********** 「Dim」は変数の宣言です http://www2s.biglobe.ne.jp/~iryo/vba/VBA04.html 「aaa」はコードを作った方が適当につけた名前ですので 深い意味はないと思います が、通常変数の宣言は、本来各コード先頭付近で行うほうが 望ましいと思うのですが、この例題は途中で行われているため 少しおかしいです その上、宣言した変数「aaa」を使用しないまま終わっています ので、全く無意味なもののように感じます 推測ですが、コードを作った方がバグ取り用に使っていた 変数で、その後消し忘れたと思うのですが、他にわかる方 いらっしゃいますか? 2006/09/15(Fri) 00:19 [ No.14 ]
あーすいません
段落付けた分が全部詰まってしまいましたね 失礼しました 2006/09/15(Fri) 00:20 [ No.15 ] |
|
(^_^)KANTOKUさん有難う御座いました。
まだまだ質問が山ほどあります、宜しくお願いします。 2006/09/14(Thu) 19:24 [ No.12 ] |
|
Dim rowpos As Integer
Dim colpos As Integer Dim num As Integer rowpos = 2 colpos = 1 Do If Cells(rowpos, colpos) = "" Then Exit Do End If rowpos = rowpos + 1 Loop While num > -1....この部分解説お願いいたします。 Cells(rowpos, colpos).Select (;_;) 2006/09/03(Sun) 18:09 [ No.9 ]
誰も書かないようなので
「Loop While num > -1」 num が -1 以上ならDoに戻ると言うことです Do-Loop内を最低1回は処理します http://www.geocities.jp/cbc_vbnet/kisuhen/loop.html 実際は 「If Cells(rowpos, colpos) = "" Then Exit Do End If」 で空のセルを見つけ出してLoopを抜けていますね 2006/09/08(Fri) 08:46 [ No.10 ] 誤)num が -1 以上ならDoに戻ると言うことです 正)num が -1 を超えているならDoに戻ると言うことです 2006/09/08(Fri) 18:40 [ No.11 ] |
|
(+_+)VBAをもう一度勉強しなおす事にしました。
北條 2006/08/19(Sat) 17:41 [ No.7 ]
北條さんへ。
VBAそのものの文法や約束事はそれほど多くはないと思うんです。 厄介なのは、EXCELシートの関係の操作や、プロパティが やたら細かくて 膨大にありますし 階層的に、長々した記述になるために、 しばしば 自分のプログラムでさえ、構造が把握しにくいことですか? EXCEL自習者向けのHPは本当に、山のようにあって、 私も、何を参考にするのがよいのか、戸惑うばかりですが http://excelfactory.net/excelboard/ このあたりから、探してみたらいかがでしょうか? 2006/08/20(Sun) 06:34 [ No.8 ] |
|
スクロールしない マクロボタンの設置って
出来ないものでしょうか? 縦にながーい、データ入力したときにマクロ起動のボタンが シートと一緒にスクロールしてしまうと、 ボタンを使いたいときに、シートの先頭に戻るのが面倒なんですね。 ウインドウ枠を固定して、1〜2行あたりにボタンを設置する 方法も思いつきますが、 この『ウインドウ枠を固定』は、『ウインドウの分割』とは 両立しなくて、 私の場合には、『ウインドウの分割』の方が優先します、 スクロールしても、シートウインドウの中で位置を保つ 方法がありますかね。 2006/08/06(Sun) 15:10 [ No.6 ] |
|
私は自社の経理に岡部先生のEXCEL版複式簿記を使っています
私と同様に、会計士(経理士)を頼まずに経理&決算をしていて、 何とか、簿記をパソコン化したい、 特に、自営業や零細企業で、外部に依頼する規模で無いと お考えの会社には、うってつけのソフトだと思います。 しいて言えば、EXCELの使いこなしの可否がハードルに なるかと思います。 2006/08/06(Sun) 14:55 [ No.5 ] |
|
(^^)北條さん、
質問よろしく。 2006/04/28(Fri) 18:10 [ No.1 ] |