HOME > 即効テクニック > Excel VBA > セル操作関連のテクニック > ユーザフォーム上のマルチラインプロパティが真であるテキストボックスの値を特定のセルに入力する

即効テクニック

セル操作関連のテクニック

ユーザフォーム上のマルチラインプロパティが真であるテキストボックスの値を特定のセルに入力する

(Excel 97/2000)
サンプルマクロは、A1セルにマルチラインプロパティが真のテキストボックスの値を入力します。
ユーザフォームのコードウインドに記述して実行してください。
Sub Sample()

    'Excel2000
    Range("A1").Value = _
        Replace(TextBox1.Value, vbCr, vbNullString)
    'Excel97
    'With Range("A1")
        '.Value = TextBox1.Value
        '.Replace vbCr, vbNullString
    'End With

End Sub