R天空比較の使用法
Hinoさまこんにちは。

いつもすばらしいツールをありがとうございます。
ありがたく使用させて頂いております。
この度、R天空比較をダウンロードさせて頂き、色々試してみたのですが、
添付された図面を読み込み⇒外変起動⇒範囲選択⇒エクセル起動⇒マクロを有効にチェックを入れるのですが、エクセル画面に変化なく、エクセルを閉じると
JWの画面に戻り未実行になってしまいます。
私の環境は、Windows Vista SP2
Jw_cad Ver.7.02です。
お手数を掛けますが、よろしくお願いします。

先程、手違いで、書きかけのままno nameで送信してしまいました。
大変失礼しました。
TOSHI 14:44 2010.04.12 Mon
TOSHIさんこんにちは。
そういえば以前rjさんにいただいたアイディアを実装した版が私のローカルPCにのみ置かれていましたので張っておきます。
[Link]
色の設定が出来るようになってます。
外変から起動せずにR天空比較.xlsファイルをダブルクリックで起動しますと普通のエクセルファイルとして編集出来るようになってます。

付属ファイルでの稼動も確認できました。
お試しくださいませ。
Hino 12:51 2010.04.13 Tue
Hinoさま今晩は。
先日、R天空比較の件で質問させて頂きました、TOSHIです。
早速、アドバイスを頂き驚いております。ありがとうございます。
すぐにダウンロードして試してみたのですが、やはり上手く動いてくれません。
同じくHinoさまのR平均地盤も使わせて頂いているのですが、
こちらの方は問題なく動いているのですが、
因みに、R平均地盤では、xlsファイルをダブルクリックで起動し編集後、保存すると、
同じフォルダ内にjwc_temp.txtファイルが出来るのですが、
R天空比較.xlsファイルの場合は生成されない事と、マクロを有効にチェックを入れると、
実行時エラー'53'ファイルが見つかりません、というメッセージが出ますが、
これはどういう意味なのでしょうか。
分からないなりに参考書で調べてみたのですが、よくわかりません。
まだまだ修行が足りない初心者のぼやきです。
もう少し自分なりにいじってみようと思っています。
ありがとうございました。
TOSHI 23:06 2010.04.14 Wed
TOSHIさんこんにちは。
たぶん問題解消できました。
↓ダウンロードしてみてください。
[Link]

何が起きていたかと言いますと。

まず私のメンテナンス用に、R天空比較.xlsが起動した時、同じフォルダ内にある「jwc_temp.txt」ファイルの更新日時と現在の日時を参照して5秒以内であれば外変として起動し、それ以外は普通のエクセルファイルとして起動するようにしていたことがすべての原因ではないかと考えています。

マクロセキュリティの警告が出て実行するにチェックをしたりしている間にすぐ5秒経ってしまうのでまず一つ目の実行されない問題はここだろうと。
とりあえず20秒に伸ばしました。

それとjwc_temp.txtファイルの日時を確認するときにjwc_temp.txtファイルが存在しているかどうか確認しておらず、必ず存在していることを前提として処理していたことに気が付きました。
そこでファイルの有無をチェックするようにしてみました。

さてこれが当りだと良いのですが
Hino 15:30 2010.04.17 Sat
Hinoさま今晩は。
出来ました〜〜\(~o~)/
感動です。早速意味もなしに、何度も試してみてニヤニヤしてしまいました。
実は何度実行しても上手く行かず諦めかけておりました。
お忙しい中をアドバイスを頂き本当にありがとうございました。
これからも感謝しつつHinoさんの有用なツールの数々を使用させて頂きます。
ありがとうございました。
TOSHI 22:16 2010.04.17 Sat
Hino様こんばんは。

初めてご連絡させて頂きます。
いつも素晴らしいツール、誠にありがとうございます。
今回、R天空比較を使用させて頂きたく思い、試してみたのですが、上手く動いてくれませんでした。
どのようにしたら動いてくれるか色々調べておりましたら、こちらのページを見つけまして、一読致しました所、上記の2010年にTOSHI様がご質問されている状況と類似しておることがわかりました。

添付された図面を読み込み⇒外変起動⇒範囲選択⇒エクセル起動⇒マクロを有効にチェックを入れるのですが、エクセル画面に変化なく、エクセルを閉じるとJWの画面に戻り未実行になってしまいます。

私の環境は、Windows10 サーフェス
Jw_cad Ver.8.25aです。

お手数を掛けますが、何卒よろしくお願いします。
本当に便利なツールだと思い、是非使わせて頂きたいです。。
masato 18:54 2022.07.16 Sat
masatoさん、こんにちは。

上に貼ってあるこちらのバージョンを試してみてください。
[Link]

ちなみにエクセルのバージョンが分かれば教えてください。
Hino 14:14 2022.07.17 Sun
Hino様こんばんは。

早速ありがとうございます。
頂戴致しましたLinkをクリック致しました所、
エラー(4xx) お探しのページが見つかりません。
となってしまいました。

Excelのバージョンは、
Microsoft® Excel® 2019 MSO (バージョン 2205 ビルド 16.0.15225.20278) 64 ビット
でございます。

何度も申し訳ございません、宜しくお願い致します。
masato 22:35 2022.07.17 Sun
masatoさん、こちらこそすみません。
リンク切れてました
こちらです→[Link]
Hino 17:06 2022.07.18 Mon
Hino様

とんでもございません、お手数お掛けしております。。
早速DLし試してみました。

以前のR天空比較のエクセルデータは消去し、今回頂戴しましたR天空比較のエクセルデータを入れ替えました。
入れ替えた後、JWWより 外部変形→R天空比較 を実行したところ、

申し訳ございません。R天空比較.xlsが見つかりません。名前が変更されたか、移動や削除が行われた可能性があります。
とのエラーが発生致しました。

その後、試しに今回頂戴しましたR天空比較のエクセルデータを、97-2003ワークシートに変換してみましたところ、上記エラーは解消されましたが、

実行エラー1004
Cellsメソッドは失敗しました Globalオブジェクト
のエラーが発生してしまいました。

別件にてご指南頂きました、デバックをクリックしてみましたら、
標準モジュール
→main
→num1 = Cells(18, 7) * 100 '数値1 が黄色くなっておりました。

何度も誠に申し訳ございません。
masato 17:52 2022.07.18 Mon
お名前

コメント(リンクは貼れません)