Jw_cad 相談室−その２
Jw_cad についての相談の場としてお使いください
情報の交換には Jw_cad 情報交換室 をご利用ください
なお、情報交換室と相談室の両方に同じ内容を投稿するのはご遠慮ください
2009年9月以前の発言は 過去ログのページからご覧ください。
それ以降の過去ログは消失しています。
申し訳ありませんが、復活の予定はありません。
Jw_cad Copyright (C)1997-2021 Jiro Shimizu & Yoshifumi Tanaka
Jw_cad についての相談の場としてお使いください
情報の交換には Jw_cad 情報交換室 をご利用ください
なお、情報交換室と相談室の両方に同じ内容を投稿するのはご遠慮ください
2009年9月以前の発言は 過去ログのページからご覧ください。
それ以降の過去ログは消失しています。
申し訳ありませんが、復活の予定はありません。
|
kojima - 21/10/6(水) 20:15 - |
マクロでできました。
短いコードですみます。
以下はrubyで書いていますが、マクロはVBscript や Jscript VBA のほうが書きやすいと思います。
外部変形コマンドから実行できるようにしています。
@REM 用紙サイズの変更
@echo off
REM #jww
REM #cd
REM #e
start ruby -x %~f0
#!ruby -Ks
STDERR.puts "pape_size 0:A0 1:A1 2:A2 3:A3 4:A4 A:2A B:3A C:4A D:5A E:10m F:50m G:100m"
size=STDIN.gets.chomp
require 'win32ole'
shell=WIN32OLE.new("WScript.Shell")
shell.AppActivate("jw_win")
sleep(1)
shell.Sendkeys("%sy#{size}")
__END__
:end
EXCEL VBAのマクロだと以下のようになるようです？
(用紙サイズをA2にする)
Sub paper_size_change()
AppActivate "Jw_win.exe"
SendKeys "%sy2"
End Sub
短いコードですみます。
以下はrubyで書いていますが、マクロはVBscript や Jscript VBA のほうが書きやすいと思います。
外部変形コマンドから実行できるようにしています。
@REM 用紙サイズの変更
@echo off
REM #jww
REM #cd
REM #e
start ruby -x %~f0
#!ruby -Ks
STDERR.puts "pape_size 0:A0 1:A1 2:A2 3:A3 4:A4 A:2A B:3A C:4A D:5A E:10m F:50m G:100m"
size=STDIN.gets.chomp
require 'win32ole'
shell=WIN32OLE.new("WScript.Shell")
shell.AppActivate("jw_win")
sleep(1)
shell.Sendkeys("%sy#{size}")
__END__
:end
EXCEL VBAのマクロだと以下のようになるようです？
(用紙サイズをA2にする)
Sub paper_size_change()
AppActivate "Jw_win.exe"
SendKeys "%sy2"
End Sub
<Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/94.0.4606.71 Safari/537.36 Edg/94.0.992.38
 |
 |
外部変形で用紙サイズを変更したいのですが 正廣 21/9/24(金) 10:15 |
|
 |
Re:外部変形で用紙サイズを変更したいのですが kojima 21/9/24(金) 15:05 |
|
  |
Re:外部変形で用紙サイズを変更したいのですが 正廣 21/9/24(金) 16:41 |
|
|
jwfでも既に開いている図面の用紙は変更できない。 kojima 21/9/24(金) 20:38 |
|
|
Re:jwfでも既に開いている図面の用紙は変更できない。 正廣 21/9/27(月) 10:28 |
|
|
Re:jwfでも既に開いている図面の用紙は変更できない。 kojima 21/9/27(月) 21:59 |
|
|
Re:jwfでも既に開いている図面の用紙は変更できない。 正廣 21/9/28(火) 8:03 |
|
|
マクロで用紙サイズ変更 kojima 21/10/6(水) 20:15 | ≪ |
|
|
Re:マクロで用紙サイズ変更 kojima 21/10/6(水) 23:09 |
|
|
Re:外部変形で用紙サイズを変更したいのですが 荻窪姉妹 21/10/6(水) 15:45 |