2011年9月16日金曜日

VBAでスペースを削除する方法

LTrim(文字列)

RTrim(文字列)

Trim(文字列)


LTrim関数,RTrim関数,Trim関数を利用して文字列の中からスペースを取り除くことができます。
引数に設定した文字式から,全角,半角にかかわらず,
LTrim関数は先頭のスペースを,
RTrim関数は末尾のスペースを,
Trim関数は先頭と末尾のスペースをを取り除きます。

------------------------------------------------------------------------
Sub スペース削除()
  Dim astr as String

  astr = "   FC2ブログ     "
  MsgBox "@" + astr + "@"         ' 「@   FC2ブログ     @」と表示
  MsgBox "@" + LTrim(astr) + "@"    ' 「@FC2ブログ     @」と表示
  MsgBox "@" + RTrim(astr) + "@"    ' 「@   FC2ブログ@」と表示
  MsgBox "@" + Trim(astr) + "@"     ' 「@FC2ブログ@」と表示

End Sub
------------------------------------------------------------------------

EXCEL VBA xls Excel2003

0 件のコメント:

コメントを投稿