| |
ACCESSフォームで入力したデータを、作成されたワードの指定箇所ごとにデータを差し込みたいのですが、行き詰っております。
既存のワードを開くことは出来ましたが、ワードの指定場所ごとにデータを差し込む方法が分からなく困っております。
Accessレポートからワードに変換の方法もやってみましたが、罫線が表示されず困っております。
ご教授、宜しくお願いします。
Private Sub wold_Click()
Dim passadd
DoCmd.SetWarnings False
DoCmd.OpenForm "f申請"
passadd = "C:\users\tsun2804\Desktop\申請様式1"
Shell "C:\Program Files\Microsoft Office\Office14\WINWORD " & passadd & "", 3
DoCmd.SetWarnings True
End Sub
|
|