Excel VBA質問箱 IV

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

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


45980 / 76732 ←次へ | 前へ→

【35733】Re:セルの文字列を分ける
回答  Kein  - 06/3/11(土) 15:35 -

引用なし
パスワード
   >Excel2000ではエラーとなる
どこでどんなエラーが出ているか書くこと。それが質問の基本です。
ちなみにTextToColumnsメソッドは Excel5.0 の時代からありますから、どのVersion
でも使えるメソッドなのですが。
>このような空白が入った文字列が、何行も並んでいたとき
>(違う箇所に空白が入っている)連続的に処理し、セルに分ける
TextToColumnsメソッドのヘルプを、全く調べてないことを暴露しているような
もんです。空白(仮にスペースとする)で区切るなら、

〜.TextToColumns DataType:=xlDelimited, _
ConsecutiveDelimiter:=True, Space:=True

などと「区切り文字を基準にした」セル分割の処理を選ばないといけない。
そのとき、先頭のスペースを無視しないと隣の列から入力されてしまうので、
分割する前に予め

For Each C In Range("B:B").SpecialCells(2)
  C.Value = Trim(C.Value)
Next

というようにして、先頭のスペースだけを取り除いておく。
>何行も並んでいたとき連続的に処理
という点については、TextToColumns の文字から推測できるように、処理対象が列単位
なので

Columns(2).TextToColumns 〜

というようにすれば出来るのです。これもヘルプを調べていれば分かることですよ。
12 hits

【35730】セルの文字列を分ける AKIO 06/3/11(土) 12:12 質問
【35733】Re:セルの文字列を分ける Kein 06/3/11(土) 15:35 回答
【35743】Re:セルの文字列を分ける AKIO 06/3/11(土) 20:09 お礼

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