Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


44845 / 76732 ←次へ | 前へ→

【36897】Re:textboxの内容の印刷について
回答  neptune  - 06/4/17(月) 17:46 -

引用なし
パスワード
   Wordを使うのは簡単に出来るようですよ。

参照設定でWordにチェック必要。サンプルです。
Private Sub CommandButton2_Click()
Dim objWord As Word.Application
Dim objDoc As Word.Document
  Set objWord = New Word.Application
  objWord.Visible = True
  Set objDoc = objWord.Documents.Add(, , , True)
  With objDoc
    .Range.Text = Me.TextBox1.Text
'    .PrintOut '各種設定は自分で。このままでもOKかもしれないです。
    DoEvents  '必要かどうか不明だが一応書いている。無くても問題は無いと思う?
    .Close wdDoNotSaveChanges
  End With
  Set objDoc = Nothing
  objWord.Quit
  Set objWord = Nothing
End Sub

立ち上がるのがまどろっこしいので、メモ帳かWordPadがいいかも?
そのうち、Testしたら書き込むかも?

5 hits

【36793】textboxの内容の印刷について まだまだ初心者 06/4/13(木) 23:58 質問
【36797】Re:textboxの内容の印刷について ぱっせんじゃー 06/4/14(金) 8:45 発言
【36799】Re:textboxの内容の印刷について まだまだ初心者 06/4/14(金) 9:47 発言
【36800】Re:textboxの内容の印刷について ぱっせんじゃー 06/4/14(金) 10:01 発言
【36833】Re:textboxの内容の印刷について まだまだ初心者 06/4/14(金) 21:23 発言
【36836】Re:textboxの内容の印刷について neptune 06/4/14(金) 21:42 発言
【36843】Re:textboxの内容の印刷について まだまだ初心者 06/4/15(土) 9:10 発言
【36897】Re:textboxの内容の印刷について neptune 06/4/17(月) 17:46 回答
【36898】Re:textboxの内容の印刷について まだまだ初心者 06/4/17(月) 18:06 お礼
【36905】Re:textboxの内容の印刷について neptune 06/4/17(月) 21:23 発言

44845 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free