わせいさんへ
　　解決法が見つかりました。
　　以下のようにすれば、
　ダイアログ(リストのみ)自体を表示しなくて済むようです。
	
	@@ListUserString$=setWord$
	@@ListAutoclose=TRUE
	@ListUser

　なちゃさん作成の NK_OLine.mac 内を調べていて
判明しました。
　
　ただ、ダイアログやウインドウに、キーを送信する方法が
マクロ内で実行できると、他の場合でも自動化が図れるため、
お手数で無ければ、教えていただければ幸いです。

　ご協力いただいた「わせいさん」と、
素晴らしいマクロを作っていただいた「なちゃ」さんと、
細かいところまで考えられているQx を作っていただいた arakenさん
に感謝申し上げます。

@@ListAutoClose=TRUE
これは知りませんでした。便利ですね。さっそく使います。
ありがとうございました。

VBSのsendkeysを試してみました。QGREPにはキーを送れますが、ＱＸには送れ
ません。ＱＸは構造が複雑だからか。
PowerShellならできるかもしれないので、メーリングリストで質問してみます。

訂正。
VBSでＱＸのダイアログにキーを送れました。

C:\QX\MACRO\@_SK_test.MAC
'━━━━━━━━━━━━━━━━━━━━

proc test
dim ret
dim setWord$
ret = shell("Wscript.exe C:\command\WSH\ユーザ定義enter.VBS")
if ret = 0 then
call msgbox("起動できません")
exit proc
end if
@@ToolListType = 4
setWord$="◆,●,■"
@@ListUserString$=setWord$
' @@ListAutoClose=TRUE
@ListUser
end proc

'━━━━━━━━━━━━━━━━━━━━
'━━━━━━━━━━━━━━━━━━━━


C:\command\WSH\ユーザ定義enter.VBS
'━━━━━━━━━━━━━━━━━━━━

Option Explicit

Dim objWshShell
set objWshShell = WScript.CreateObject("WScript.Shell")
WScript.Sleep 3000
'objWshShell.AppActivate "ＱＸ32 : ユーザ定義文字列"
objWshShell.AppActivate "ユーザ定義文字列"
'objWshShell.SendKeys "{ENTER}"
objWshShell.SendKeys "{ESC}"
Set objWshShell = Nothing

'━━━━━━━━━━━━━━━━━━━━
ユーザ定義文字列を表示してからVBSファイルを起動するのではなく、
先にVBSファイルを起動し、WScript.Sleepで長めに待たせておいてから
@ListUserするとダイアログが閉じます。"{ENTER}"でも"{ESC}"でも。
"ＱＸ32 : ユーザ定義文字列"でも"ユーザ定義文字列"でも動きます。

でも、VBSのsendkeysは全角文字が送れません。
やはり、メーリングリストで質問します。
いま質問内容を考えているところ。

　回答ありがとうございます。

　■早速試してみました。上手く行きました。

　Shell の呼び出しは、
@ListUser の前とは、まったく気づきませんでした。

自分では絶対に考えつかなかったと思います。
だだただ、感心するしかありません。

　VBSの
WScript.Sleep 3000 は、500 に設定しました。

　WScript.Sleep は使用しなくても、動作するみたいですね。
今回のマクロにおいては、対象文書に該当する文字列が無い場合、
常駐リストの書き換えがされないことを理解していれば、
無い方が動作は速いため、自分としては、いいかなと思っています。

　■当初、焦ったことがあります。
マクロを実行したときに、「1行目に対しての、コンパイルエラー」が出ました。

偶然手元にあった、VBS ファイルを見て、
Option Explicit の後に、
On Error Resume Next を追加して、実行したところ、エラーが出なくなり
次に、マクロを実行したところ、正常動作しました。

　ただ、現在は、On Error〜 を除いても、正常に動作しています。
今は上手くいっているため、どうということはないのですが、
何か初期的な問題なのか……不明です。

　■Qx にも call _sleep(1000) コマンドがあったため、
sendkey と共に @ListUser の前に適用しましたが、ダメみたいです。

　■あと、自分のメールのフォントが、わせいさんのメールのフォントと
違ってしまったのは何故なのかな？ と、素朴な疑問。
メール文をコピペしたからかな!?

　■罫線つきのため、回答がとても分かり易かったです。
ありがとうございます。

また、わせいさんのブログも、いつも参考にしており、助かっています。

　QXエディタを10年ぐらい前から使っています。
　いつも縦書きで、三点リーダー（…）もよく使うのですが、きょう（2018.06.17)古い文書を書き換える形で新規文書をつくろうとしたら、…が縦に表示されず横向けに「…」の形になってしまいました。
　試しにほかの文書もみたところ、みな横向けになっていました。先月文書を作成したときには、ちゃんと縦に表示され、印刷もＯＫでした。
　小説を書いているので、たいへん困っています。
　超初心者のような質問ですみません。ご助言をお待ちしております。

ＯＳのバグ、文字コード、フォントなど……原因はいろいろ考えられます。
もっと情報をください。

ＯＳはWindows10ですか？
文字コードはShiftJIS？
文字のフォントは？　　＠MSゴシックでも同じ症状が出ますか？
横倒しになるのは「…」だけ？　ほかに横倒しになる文字はありませんか？

　わせい　さん、ご返信ありがとうございます。

　ＯＳはWindows10です。
　文字のフォントは＠ＭＳ明朝、でも＠ＭＳゴシックでも同じ症状が出ました。
　文字コードは…分かりません。すみません、どうやって調べるのか教えてください。
　横倒しになるのは「…」だけで、今のところほかには見当たりません。

　すみません、宜しくお願いします。

フォントを変えても症状が出るなら、ＯＳのバグかもしれません。


ジャストシステムの公式サイトに、同じ症状が出ています。

[056986]Windows 10 April 2018 Update環境で、縦書きのダッシュやリーダー
などが横書きで表示されてしまう
http://support.justsystems.com/faq/1032/app/servlet/qadoc?QID=056986


三点リーダーがおかしいです。 - Windows10を最新のもの（エディ... -
Yahoo!知恵袋
https://detail.chiebukuro.yahoo.co.jp/qa/question_detail/q12190179932
ベストアンサーに
「ビルド1803」とあるのはまちがい。
「バージョン1803」。質問者が正しいです。

四月のアップデートは私もしましたが、こちらのＱＸでは症状は出ません。
こちらは Windows 10 Version 1709 です。
バージョン1803 だけに現れる症状なのか。

こういうことがあるので、Windowsのアップデートは自動ではおこなわず、手
動で許可するように設定していて、六月のアップデートはまだやっていません。
これでトラブルが減らせるけど、もちろんゼロにはできません。

'━━━━━━━━━━━━━━━━━━━━
Windows10のバージョンが1803か、確かめる方法は、こちら。

dynabook.com | サポート情報 | Windowsのバージョンとビルド番号を確認す
る方法＜Windows 10＞　【動画手順付き】
https://dynabook.com/assistpc/faq/pcdata2/017041.htm

'━━━━━━━━━━━━━━━━━━━━
>文字コードは…分かりません。すみません、どうやって調べるのか教えてください。

とくになにも指定していないなら、文字コードはShiftJISです。

ＱＸで文字コードを調べたい: ＱＸエディタ入門
http://qx-nosusume.cocolog-nifty.com/qx/2010/03/check_code.html

わせいさん、アドバイス有難うございます。

教えてもらった方法で調べました。
バージョンは1803、文字コードはShiftJISのままでした。

また、三点リーダだけでなく縦棒「―」も横向きになるので頭を抱えています。
こちらは「ー」のままなら縦で表示されます。

一太郎でも結構困っている方いらっしゃいますね。この部分だけフォントを変えるという方法もあるようですが、QXではどうしたらできるのか分からないので、とりあえず今はこの二点を使わないようにしていきます。

ご助言、本当にありがとうございました。次回は自動でUPdateしないように(この次は修正されるかもしれないので、次のみUpdateしたほうがいいんでしょうか？）対策してみます。

久々にビル・Ｇの横面を…(失礼しました)
わせいさんには、感謝しています。

他に方法が思いつかず、ここに投稿することをご容赦ください。
ねこみみさんの月メモがバージョンアップされたのでインストールしたところ、少し不備があるように思います。
問い合わせたいのですが、ねこみみさんにどのようにコンタクトしたらよいのか教えていただけないでしょうか？