AccessVBAで下記のようなコードを記述して
差し込み文書のWORDファイルのデータを更新して、別名保存・終了をしています。
[ Set objOrg = GetObject(strOrgNm)]の部分でWORD起動する際、
「この文書を開くと、次のSQLコマンドが実行されます。」というメッセージが表示されます。
複数のファイルについて処理するため、このメッセージを表示しないようにさせたいのですが
良い方法がありますでしょうか。
--<コード>--------------------------------------------
Dim strOrgNm As String ' 差し込み文書元ファイル名
Dim objOrg As Object
Dim objTemp As Object
Set objOrg = GetObject(strOrgNm)
Set objTemp = GetObject(Class:="Word.Application")
With objOrg
With .MailMerge
.Destination = 0
.SuppressBlankLines = True
With .DataSource
.FirstRecord = 0
.LastRecord = DCount("*", "テスト用クエリ")
End With
.Execute Pause:=False
End With
objTemp.Application.ActiveDocument.SaveAs FileName:=pstrOrgNm & "_test"
objTemp.Application.ActiveDocument.Close
End With
-------------------------------------------------------
A 回答 (2件)
- 最新から表示
- 回答順に表示
No.2
- 回答日時:
そうなると・・私には分かりませぬ。
一応最後の足掻き・・ということで、Wscript.shellの
http://technet.microsoft.com/ja-jp/scriptcenter/ …
で処理前後に書き換えるとか・・
セキュリティの面でOSから蹴られるかもしれない。(未検証)
私からは以上です。
No.1
- 回答日時:
この文書を開くと、次のSQLコマンドが実行されます
でGoogleと
http://support.microsoft.com/kb/825765/ja
だそうです。
レジストリを変更してセキュリティを下げることになります。
頑張ってAccessのレポートで完結するか、Wordで・・の二者択一かと?
早速のご回答ありがとうございます。
レジストリ変更ですと他の差し込み文書もメッセージが表示されなくなってしまうので
このプログラム内で一時的にアラートオフにしたいです。
また、Wordファイルでファイルを保存したいので、レポートでの対応は考えていません。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
あなたの「必」の書き順を教えてください
ふだん、どういう書き順で「必」を書いていますか? みなさんの色んな書き順を知りたいです。 画像のA~Eを使って教えてください。
-
スマホに会話を聞かれているな!?と思ったことありますか?
スマートフォンで検索はしてないのに、友達と話していた製品の広告が直後に出てきたりすることってありませんか? こんな感じでスマホに会話を聞かれているかも!?と思ったエピソードってありますか?
-
自分独自の健康法はある?
こうしていると調子がいい!みたいな自分独自の健康法、こだわりはありますか?
-
洋服何着持ってますか?
洋服を減らそうと思っているのですが、何着くらいが相場なのかわかりません。
-
今から楽しみな予定はありますか?
いよいよ2025年が始まりました。皆さんには、今から楽しみにしている予定はありますか?
-
AccessからWordの差し込み印刷文書を印刷するVBAについて教えてください
Access(アクセス)
-
ACCESSのクエリで抽出したデータをWord文書へ差込印刷したいです。
Windows Me・NT・2000
-
アクセスのボタンから指定のワードファイルを開く
Access(アクセス)
-
-
4
ACCESS VBA からのワードファイルの起動
その他(データベース)
-
5
Access2010でWORD差込VBA実行後終了
その他(Microsoft Office)
-
6
ACCESSからVBAでWORDの印刷を..
その他(データベース)
-
7
AccessのマクロでWordを最前面に開く
Word(ワード)
-
8
ACCESSのカレントレコードを、wordに差し込みたい
その他(Microsoft Office)
-
9
アクセスとワードへの差し込み印刷
Access(アクセス)
関連するカテゴリからQ&Aを探す
おすすめ情報
- ・「みんな教えて! 選手権!!」開催のお知らせ
- ・漫画をレンタルでお得に読める!
- ・【大喜利】【投稿~1/20】 追い込まれた犯人が咄嗟に言った一言とは?
- ・洋服何着持ってますか?
- ・みんなの【マイ・ベスト積読2024】を教えてください。
- ・「これいらなくない?」という慣習、教えてください
- ・今から楽しみな予定はありますか?
- ・AIツールの活用方法を教えて
- ・【選手権お題その3】この画像で一言【大喜利】
- ・【お題】逆襲の桃太郎
- ・自分独自の健康法はある?
- ・最強の防寒、あったか術を教えてください!
- ・【大喜利】【投稿~1/9】 忍者がやってるYouTubeが炎上してしまった理由
- ・歳とったな〜〜と思ったことは?
- ・ちょっと先の未来クイズ第6問
- ・モテ期を経験した方いらっしゃいますか?
- ・好きな人を振り向かせるためにしたこと
- ・【選手権お題その2】この漫画の2コマ目を考えてください
- ・【選手権お題その1】これってもしかして自分だけかもしれないな…と思うあるあるを教えてください
- ・スマホに会話を聞かれているな!?と思ったことありますか?
- ・それもChatGPT!?と驚いた使用方法を教えてください
- ・見学に行くとしたら【天国】と【地獄】どっち?
- ・これまでで一番「情けなかったとき」はいつですか?
- ・この人頭いいなと思ったエピソード
- ・あなたの「必」の書き順を教えてください
- ・14歳の自分に衝撃の事実を告げてください
- ・人生最悪の忘れ物
- ・あなたの習慣について教えてください!!
- ・都道府県穴埋めゲーム
このQ&Aを見た人がよく見るQ&A
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
バッチ終了時にDOS窓を閉じるコ...
-
バッチファイル 文字列にスペ...
-
Pythonで単純にファイルを結合...
-
ftpコマンドを実行すると「425 ...
-
コマンドプロンプトをクリック...
-
make test って何をするための...
-
バッチファイルを使ってテキス...
-
DOSプロンプト(cmd.exe)の標準...
-
ショートカットをデスクトップ...
-
AccessVBAで実行時間を指定する...
-
VBS【プリンタドライバのインス...
-
コマンドプロンプトで、特定の...
-
コマンド プロンプト
-
DOSコマンドに詳しい方、お知恵...
-
WebOTXのdeployコマンドについて
-
【ppt、VBA】ファイル開閉時の...
-
VisioのVBAでユーザにファイル...
-
シェルからpsqlコマンドでトラ...
-
フォルダ、ファイル操作に最適...
-
SSH接続でwindowsサーバのコマ...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
バッチ終了時にDOS窓を閉じるコ...
-
バッチファイル 文字列にスペ...
-
コマンドプロンプトをクリック...
-
make test って何をするための...
-
ftpコマンドを実行すると「425 ...
-
ショートカットをデスクトップ...
-
findstrでヒットした1行前の文...
-
バッチファイルを使ってテキス...
-
シェルの「:コマンドが見つか...
-
AccessVBAで実行時間を指定する...
-
コンピュータ名をファイル名に...
-
コマンドプロンプトでファイル...
-
Pythonで単純にファイルを結合...
-
コマンドプロンプトで、特定の...
-
SSH接続でwindowsサーバのコマ...
-
DOSコマンドに詳しい方、お知恵...
-
DOSコマンドで指定日数よりも過...
-
ftpコマンド出力結果の取得
-
FTPの連続実行でフリーズする
-
コマンドプロンプトのFTPコマン...
おすすめ情報