Excel VBA質問箱 IV

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

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


7469 / 13645 ツリー ←次へ | 前へ→

【38914】長さ0の文字列を見つける よちよち 06/6/14(水) 11:53 質問[未読]
【38918】Re:長さ0の文字列を見つける ちくたく 06/6/14(水) 12:54 発言[未読]
【38919】Re:長さ0の文字列を見つける Jaka 06/6/14(水) 13:06 発言[未読]
【38921】おまけ Jaka 06/6/14(水) 13:28 発言[未読]
【39007】Re:おまけ よちよち 06/6/15(木) 20:02 お礼[未読]

【38914】長さ0の文字列を見つける
質問  よちよち  - 06/6/14(水) 11:53 -

引用なし
パスワード
   エクセル表の中に、見たところなにも入っていないセルに、何か格納されています。
過去に「長さ0の文字列」が入っている場合がある。 と聞いたことがあります。
多分この質問箱の中だったと思いますが、読み飛ばしたと思うのです。
今ごろになって、処理に困って履歴を探したのですが、見つかりません。
どなたか、もう一度教えて下さい。(履歴の番号でも良いです。)
1.どんな時に「長さ0の文字列」が発生するのか?
2.どうしたらセルに「長さ0の文字列」が格納されているか確認できるのか?
宜しくご教示下さい。

【38918】Re:長さ0の文字列を見つける
発言  ちくたく E-MAIL  - 06/6/14(水) 12:54 -

引用なし
パスワード
   よちよち さん
こんにちは。

>1.どんな時に「長さ0の文字列」が発生するのか?
一例として、セルに入力したりしたら、そこが最後のセルになると思います。

>2.どうしたらセルに「長さ0の文字列」が格納されているか確認できるのか?
下のサイトに、確認方法、というか、最後のセルの位置の変更方法が掲載されています。
ご参考までに。
http://support.microsoft.com/default.aspx?scid=kb;ja;405492

【38919】Re:長さ0の文字列を見つける
発言  Jaka  - 06/6/14(水) 13:06 -

引用なし
パスワード
   例えば、下記を実行。
途中で止めてセルに「=""」が入っているのを確認してみるのもいいかも。

Sub mmskk()
Range("A1:A10").Clear
With Range("A1,A3,A5:A6,A10")
  .Clear
  .Formula = "="""""
  '.Value = .Value 'これだと空白
End With

'= "" の関数の値を貼り付けた場合(長さ0の文字列)
Range("A1:A10").Copy
Range("A1:A10").PasteSpecial (xlPasteValues)

Range("B1:B10").Formula = "=istext(A1)"
For i = 1 To 10
  Cells(i, 3).Value = TypeName(Cells(i, 1).Value)
Next
End Sub

【38921】おまけ
発言  Jaka  - 06/6/14(水) 13:28 -

引用なし
パスワード
   Sub dkk()
Dim st1 As Variant, st2 As Variant, st3 As Variant
st1 = ""
st2 = Empty
MsgBox TypeName(st1) & vbLf & _
    TypeName(st2) & vbLf & _
    TypeName(st3)
End Sub

【39007】Re:おまけ
お礼  よちよち  - 06/6/15(木) 20:02 -

引用なし
パスワード
   ちくたく,jaka さんご教示ありがとう御座います。
ご回答を参考に、今抱えている問題を解決したいと思います。
都合があって、来週以降になります。
行き詰まったら、また質問しますので、そのときはよろしくお願いします。

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