Ｖｚってこんなこともできる（WordPrt.def）

　ふと、夜になって、ああ、そんなのはマクロの仕事でしょ、とさらさら１５分
で、「よっし、今日もまた、自分の環境を便利にしてしまったぜい」と書いたも
のです。ほんとは３０分ちょっとはかかってますね。
　まめまめしく、コメントつけちゃったし。

　それでも、こんなことが簡単にできるのがＶｚのすごいところであり、ものす
ごく優しいところでもあります。（最初からワードで文章を英単語のテストを作
ればいいのでしょうが、それは、あの、馬鹿みたいです…。）

　ちゃんとワードの奴を起動させられると（Ｖｚからですよ）、ざまあ、とか思
ってしまう。（英文のジャスティフィケイションが自動なら、XTR は、うーん、
とりあえずこっちが楽ですねぇ。）

　それでも、色々やばいところはありそうだな、とは感じてます。何か、あれ、
やば、と見つけるのでしょう。未完成品です。



=== WordPrt.def by Bunta ===;Ｖｚの編集ファイルをワードに渡す。
基本仕様として、ワードで印刷することが必要になったときに使う。
元ファイルはセーブされる。
拡張子がdocに変更された同名（base filename）ファイルも同じディレクトリに
セーブされる。（この部分は、頻用するとなると、何か対処が必要だと思うが…。）
元ファイルがdocの場合、それがどうなるのかはワードでの処理に依存。
すでにワードが開いている場合の動作は、すいません、知りません。

* Macro
50 ^^ "WordPrinting"; Vzの編集ファイルをMS Wordで開く。

	?. 
	ss2,
	a=ln,				;<a>行番号
	#S #m				;起動ファイルセーブ
	&Sh(pa,pr)			;元ファイル名保存
	#82				;[ESC]P ファイル名の変更
	#> (3){#h} "doc" #m		;★拡張子が３文字のこと。doc付加。
	b=wn,				;<b>word-doc-dammy-file
	#S #m				;nantoka.docにしてセーブ
	#E &?("Start %s",pr) #m		;コマンドライン、スタートコマンド
	#[				;[ESC]でVzは戻る。
	mx+, #O &?("%s",pa) #m mx-,	;元ファイルへ
	#J &?("%u",a) #m		;元行へ
	&#T(b)				;ダミー・ドックファイルを表にする
	mx+, #C mx-,			;close tmp docfile
	&d

*

WordPrt2.def

　こういうのでは、ぜったいに悩みたくないのだけど…。
　やっぱ、前回のほうがいいのかも…。
　そういえば、マクロはめざらさんちでということだったんだ。すいません＞各位。

=== WordPrt2.def by Bunta ===;Ｖｚの編集ファイルをワードに渡す。
基本仕様として、ワードで印刷することが必要になったときに使う。
元ファイルはセーブされる。
ワードを閉じるまで、Ｖｚに帰って来れないのかもしれない…。
* Macro
50 ^^ "WordPringing"; Vzの編集ファイルをMS Wordで開く。

	?. 
	;ss2,

	a="C:\PROGRA~1\MICROS~2\OFFICE11\WINWORD.EXE ",
	;MS Wordは、winword.exeなんですね。在処を探してね。
	;ヘルプでは見つかりませんでしたが、ちゃんと引き数を受け付けます。

	#S #m
	#E &?("%s%s",a,pr) #m
	#[ &d

*

めざらさん＆あきろさん

> 　いやいや，文太さんは英文の adjust（いやワードラップと言うのかな）が

　いえいえ（よく単語知らないけど）、その両方です。ワードラップは単語次行
送り、ジャスティフィケイションは均等分配でいいのかな。

> いきなり印刷でよいのではないでしょうか。

　って訳にはなかなかいかないのですが、でも、そのワードのマクロって、テキ
ストで見せられるものなのですか？  　だとしたら見たいのですが＞あきろさん
（お久ですねぇ！）

> 特にプレビューが必要であるようなことは書いていらっしゃらないし。

　これなしが理想ですが、書式とかフォントとかの設定に不慣れなもので、プレ
ビューは必要です。でもそれはワードの世界ですから（あるいはＷｚの世界）、
Ｖｚでは触れません。きっとワードにも書式指定で起動の方法があるんだろうけ
ど…。Ｗｚはもちろんあります。それでもプレビュー外せない。研究不足。

> 印刷機能を持たない VZ には，印刷で苦労させられるようですね。

　そういう面もあったのでしょうが、今となってはMS-DOS用プリンタというわけ
にはいかないので、「持たない」ことがいい割り切り効果を生んでいるように思
ってます。印刷はWindowsアプリで、と。

　めざらさん、文太さん、こんばんは。

　マクロに差し替えるだけで、#1604 と同じ方法で、「いきなりプレビューを
  立ち上げる」ことも簡単にできましたよ。

　で、マクロですが、

　（￣＾￣）「私を誰だと思ってるのですか」 私に VBA を読み書きする力は
  ありません！！
　って、使い方が違うか！？・・(。_゜☆＼(-- ) 

　閑話休題。
　誰でも使える「キーマクロ」を使いました。

　ワードのメニューの　　【 ツール(T) → マクロ → 新しいマクロの記録 】
　を使っただけですよん。

　では、また。(^^)/

> 　マクロに差し替えるだけで、#1604 と同じ方法で、「いきなりプレビューを
　　~~~~~~~
    「マクロを」の書き間違いです。 


　暗証キーを設定したつもりだったのですが、プレビューから「前画面に戻る」
　で戻ってしまうと、暗証キーも消えちゃうんですねぇ。うっかりしてました。
　ということで、修正できずにコメントをぶら下げちゃいました。申し訳ない。

あきろさん、

　ああ、やっぱりテキストで貼るわけにはいかないものなのね。キーマクロです
か。ワードの勉強を必要に迫られたらやります。気持ちは、やっぱ乗らないのだ
けどね。でも、色々便利になれるということだけ教えてもらいました。ありがと
う。

文太さん、

WordPrt2.def とあきろさんの情報を合わせていきなり印刷＆いきなりプレビューに
成功しました。

> 　って訳にはなかなかいかないのですが、でも、そのワードのマクロって、テキ
> ストで見せられるものなのですか？  　だとしたら見たいのですが＞あきろさん


え〜、僭越ですが、あきろさんに代わってマクロコードをご紹介いたします。

●いきなり印刷
Sub test_for_Vz()
'
' test_for_Vz Macro
' 記録日 06/10/16 記録者 Est
'
    Application.PrintOut FileName:="", Range:=wdPrintAllDocument, Item:= _
        wdPrintDocumentContent, Copies:=1, Pages:="", PageType:=wdPrintAllPages, _
        Collate:=True, Background:=True, PrintToFile:=False, PrintZoomColumn:=0, _
        PrintZoomRow:=0, PrintZoomPaperWidth:=0, PrintZoomPaperHeight:=0
End Sub

●いきなりプレビュー
Sub Test_for_Vz2()
'
' Test_for_Vz2 Macro
' 記録日 06/10/16 記録者 Est
'
    ActiveDocument.PrintPreview
End Sub


記録したコードをそのまま転記しています。「_」は長い行を折り返すときに使う記号
です。Vz マクロでいえば「$」にあたるものです。

印刷するのとプレビューするのではこんなにコードが違うとは意外でした。

Estさん、としきさん

　盛り上がっていただいて、多くの情報ありがとうございました。ＶＢＥってそ
んな感じなんですか。見られてよかった。

> え〜、僭越ですが、あきろさんに代わってマクロコードをご紹介いたします。

　多謝でありまする。

> 記録したコードをそのまま転記しています。「_」は長い行を折り返すときに使う記号
> です。Vz マクロでいえば「$」にあたるものです。

　これは大事な情報ですね。
　これ以外にも、「いざ挑戦」というときには役に立ちそうな情報をたくさんあ
りがとうございました。 すごいな、みんな。 昨日、エクセルで地獄に（本人と
してはどうでもいい書類、と思うと余計にどつぼ）。こいつらの基本はやっぱ
「勉強」しないと駄目ですねぇ…。

　みなさん、こんにちは。(^^)
　このツリーが伸びているのでびっくりしました。


　Est さん、
　「xyzzy にファイルを渡すマクロ」が、Est さんのお役に立っていたなんて、
  自分のマクロでも役に立つことがあるなんて、なんだかちょっとうれしいで
  す。
　また、マクロコードを書き込んでいただき、ありがとうございます。m(._.)m
　そうそう、「_」の意味を教えていただき、ありがとうございます。


　文太さん、
　word や excel のキーマクロをお使いになったことがなかったんですね。結
  構便利ですよ。私はかつて職場で、excel の印刷マクロをでっち上げなくて
  はならなくなったことがあり、ほとんどキーマクロで対応しました。だって、
  VBA なんて分からないし。

　キーマクロで対応できないところは、VBA の本を１冊購入し、使えそうなと
  ころを適当に切り張りです。Vz のマクロをいじるとき以上に、もうほんとに
  勘のみで適当にやりました。それゆえに、望み通りに動いたときには、感動
  でした。

　もう、その仕事にタッチしなくてすむようになったので、今は完全に忘却の
  彼方です。


　konno さん、
　Vzk08Q2 と Vzk08Q3、を使わせていただいております。感謝 <(_ _)>

　他でのエディタの印刷機能と比較はしたことがないのですが、xyzzy の印刷
  機能はなかなか強力です。多段組印刷はもちろんＯＫですし、縦書き印刷も
  できちゃいます。


　みなさん、色々な方法で Vz から印刷しており、面白いですね。

　Konno さん、こんばんは。

　w2k のＤＯＳ窓でＶｚを使っていますが、Vzk08Q3 は、カーソルの移動が速
  くなったように思います。私が使用しているＰＣはかなり低速のＰＣなので
  すが、カーソルのもたつきが、ほとんど気にならなくなりました。ありがと
  うございます。

> これは、WLPRT32.EXE でした。ベクターから落としました。
> http://www.vector.co.jp/soft/winnt/writing/se016940.html

　↑↑ 落としてみました。フリーソフトとしての最終版なのですね。w2k でも
  問題なく動作しています。WLPRT32 は、書式を保存しておけるようですね。

　xyzzy は、書式を保存できないので、使い分けようと思います。とりあえず、
  シフト起動で WLPRT32 が起動するように、マクロを書き換えようと思ってい
  ます。

　情報をありがとうございました。m(._.)m