Excel VBA質問箱 IV

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

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


7488 / 76732 ←次へ | 前へ→

【74831】テキストファイルから貼り付けた結果が違う
質問  3891  - 13/9/23(月) 9:03 -

引用なし
パスワード
   テキストファイルの内容を、クリップボードにコピーして、
ブックに貼り付けるという作業をします。


国語 = 80
英語 = 90
数学 = 70

上の3行を貼り付けたときに、最初は、

A1="国語" A2= "=" A3="80"
のように、1行の内容が、スペースで区切られて、
別々のセルに貼り付けられました。

その後、クリップボードが空のときのエラーを回避するために、

  Dim CB As Variant, i As Long
  CB = Application.ClipboardFormats
  If CB(1) = True Then
  MsgBox "クリップボードに何も入っていません"
  End If

という記述を追加したら、
A1="国語 = 80"

のように、1つのセルに、1行の内容が貼り付けられるようになってしまいました。

どちらの結果でも、かまわないのですが、後の処理の都合で、
必ず同じ貼付結果になるようにしたいのですが、
どのようにしたら良いでしょうか。

よろしくお願いいたします

1 hits

【74831】テキストファイルから貼り付けた結果が違う 3891 13/9/23(月) 9:03 質問
【74832】Re:テキストファイルから貼り付けた結果が... kanabun 13/9/23(月) 12:54 発言
【74833】Re:テキストファイルから貼り付けた結果が... 3891 13/9/23(月) 14:53 発言
【74834】Re:テキストファイルから貼り付けた結果が... kanabun 13/9/23(月) 14:58 発言
【74835】Re:テキストファイルから貼り付けた結果が... 3891 13/9/23(月) 16:55 お礼

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