| 投稿日 | ： 2004/04/13(Tue) 20:44 |
| 投稿者 | ： 花ちゃん |
| Ｅメール | ： |
| ＵＲＬ | ： |
| タイトル | ： Re: 複数行入力したテキストボックスの内容をWordのフォームフィールドでも複数行表示させたい |
下記で改行されますが、だめですか？
Option Explicit
Private Sub Form_Load()
Text1.Text = "あいうえお" & vbCrLf & "かきくけこ" & vbCrLf & _
"さしすせそ" & vbCrLf & "たちつてと"
End Sub
Private Sub Command1_Click()
Dim wdApp As Word.Application
Dim wdDoc As Word.Document
Set wdApp = New Word.Application
Set wdDoc = wdApp.Documents.Open("c:\Test.doc")
wdApp.Visible = True
wdDoc.TextBox1.Text = Text1.Text
Set wdDoc = Nothing
Set wdApp = Nothing
End Sub
因みに vbCrLf でも vbCr でも vbLf でも問題なく改行されて表示します。
Word の TextBox1.MultiLine =True に設定しておられますか？
問題のコードを状況が再現できる形で投稿してみて下さい。