| |
半年ぶりにワードの勉強をしてみました。
まずはネットでテキストボックスフォームフィールドについて検索。
マクロを登録すれば出来そうです
ht tp://office.microsoft.com/ja-jp/word-help/HP005186258.aspx
ここのWendy02さんのコードとか参考になります。
ht tp://qanda.rakuten.ne.jp/qa3076625.html
>入力する文字の改行をさせたくない
書いてみましした。Word2000がないので、2010で動作確認。
使い勝手があまり良くないかもしれませんが、こんな感じでしょうか。
Sub test()
With Selection.Bookmarks(1).Range.Fields(1).Result
If InStr(.Text, vbCr) > 0 Then
MsgBox "改行はNG"
.Text = Replace(.Text, vbCr, "")
End If
End With
End Sub
|
|