|
▼kanabun さん:
こんにちは
ありがとうございます
希望の操作はかないました
当初、セル選択/削除で
ご提示頂いたコードを動かしたところ
文字列の入ったセルをアクティブにして実行
が出て、??
で、
>区切り位置の設定を、Excelを開いたときのTAB区切りモードに
>するしかないかと思います。
With ActiveCell
If .Text = "" Then
MsgBox "文字列の入ったセルをアクティブにして実行"
ふーん・・・そうなのか〜・・・何でかな・・・
取り込んだテキストの区切り位置の設定は、マクロ記録で
Sub 区切り位置セット()
ActiveSheet.Columns(1).Select
Selection.Columns(1).TextToColumns _
Destination:=Selection.Cells(1, 1), _
Other:=True, _
OtherChar:=" "
End Sub
としていたので、With ActiveCell が気になって
"文字列の入ったセルをアクティブにして実行"
を、色々試してみたのですが
結局、区切り位置が設定されているシート上であれば
値の入ったセルが1つでも、それが何処でもいいんですね
そして、
これがシートの 区切り位置の初期化 というより
ブックの 区切り位置の初期化 をしているんですね・・・・??
ただ、上記 ?? が、しっくりきません
これが
>このため、新規ブックでの処理ならば問題はありませんが
の原因のような気がしますが
簡単に解説頂けるとうれしいです
よろしくお願い致します
|
|