EXCELの文字列を貼付けた時の「"」をなくしたい

質問

EXCELのセルに複数行の文字列が入っています。
このセルを選択して、Ctrl+Cでコピーしました。
次に「メモ帳」などのテキストエディタを開き、Ctrl+Vで貼り付けました。
すると、先頭と最後に「"」が付加されてしまいます。
この「"」をなくすにはどうすればよいかアドバイスをいただけないでしょうか？

なお、実際はテキストエディタではなく、Webページのフォームに入力するため、文字列の置換はできません。

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

回答No.4

nishi6 · ベストアンサー

「セル」をコピーしてメモ帳などの外部テキストエディタに貼り付けるとダブルクォーテーションで囲まれる場合がありますが、これはセル内改行(LF)をしているからで、Excelはクリップボードのセルの値をダブルクォーテーションで囲んでしまいます。
Excel上では、ダブルクォーテーションは無いことになります。

最初の回答では、ダブルクォーテーションなしのコピー手順を示しました。

＞下記のようなことは可能でしょうか？
だいぶ話が変わってきました。

＞該当のセルが選択されている状態から、キーボード操作で数式バーにフォーカスを移す。
＞数式バーの中の文字列を全文選択する。
　数式バーにフォーカスを移す方法は今のところ分かりません。

やりたいことはテキストを選択して、コピーすることなので、数式バーをフォーカスする必要はないでしょう

下のマクロ「テキスト選択」は、SendKeysメソッドを使ってセルを編集モードにしてコピーしています。補足コメントの「外部プログラムのキーボードマクロ」からSendKeysメソッドを使ってみました。
当方、win10、Excel2010です。

Sub テキスト選択()
　Dim txtLen As Integer '// テキスト文字数
　txtLen = Len(ActiveCell.Value)

　'// セルのセル内編集モードにする
　　SendKeys "{F2}"
　'// テキストの最終位置から先頭に選択する
　　SendKeys "+{Left " & txtLen & "}"
　'// 選択テキストをコピーする
　　SendKeys "^c"
　'// 編集モードから抜ける
　　SendKeys "{Enter}"
End Sub

下のマクロ「テキスト選択2」は、直接、クリップボードにテキストを渡しています。
「テキスト選択2」のDataObjectオブジェクトは、「Microsoft Forms 2.0 Object Library」の参照設定が必要です。しかし、［参照設定］ダイアログボックスの一覧にこのライブラリは表示されないので、設定が面倒です。
Microsoft Forms 2.0の［参照設定］が必要な場合は、ユーザーフォームを挿入することが一番簡単です。これでライブラリが自動的に参照設定されるので、ユーザーフォームをダミーで挿入し、解放します。

いずれのマクロも操作したいセルを選択して実行します。１回のマクロの対象セルは１つです。マクロを実行した後、エディタに貼り付けます。

Sub テキスト選択2()
　Dim txt As String '// セルのテキスト
　txt = ActiveCell.Text

　With New MSForms.DataObject
　　.SetText txt　　　'// テキストをDataObjectに格納する
　　.PutInClipboard　 '// DataObjectのデータをクリップボードに渡す
　End With
End Sub

お礼

ありがとうございます！
「テキスト選択2」でうまくいきました。

説明不足でもうしわけありませんでした。
「外部プログラムのキーボードマクロ」というのはExcelのマクロではなく、全く別のキーボードマクロソフトでした。

ですので、「テキスト選択2」のコードに、Excelのショートカット「Ctrl+Shit+C」を割り当てて、キーボードマクロソフトから呼び出すことで実現できました。

助かりました。ありがとうございました！

回答No.3

HohoPapa

>実は外部プログラムのキーボードマクロで
>EXCELの表からデータを拾っているのです

であれば、

F2　またはダブルクリック
Crl+A
Crl+C

というのはいかがでしょうか？

お礼

なんとかうまくできました。
ただ、Ctrl+Aで全文選択にならないのは少し気がかりなので、もしよろしければ教えていただけると嬉しいです。

補足

ありがとうございます。
ただ、..　セルを選択状態でF2するとセル内での編集モードに入るのですが、Ctrl+Aでセル内の全文選択にならないのです...
Excel2016を使用していますが、回答者様の環境ではいかがでしょうか...？

回答No.2

hahaha8635

>>Webページのフォームに入力するため、文字列の置換はできません。
なぜ？

置換でタブコードやCR+CL
スペースに変換するだけやん
私ならタブコードに置換しますが

お礼

ありがとうございました。

補足

Webページのフォームで置換できますか？
私はChromeを使用していますが...

それとも、テキストエディタを経由して、ということでしょうか？
それは可能なのですが、簡潔にしたいため、できれば避けたいと考えています。

回答No.1

nishi6

セルのコピーではなく、数式バーのテキストをコピーします。
数式バーが見にくければ、数式バーの高さは変えられるので操作しやすくなります。

お礼

本当にありがとうございました！

補足

試してみたところ、確かに可能でした。ありがとうございます。
ただ、実は外部プログラムのキーボードマクロでEXCELの表からデータを拾っているのです。

下記のようなことは可能でしょうか？

・該当のセルが選択されている状態から、キーボード操作で数式バーにフォーカスを移す。
　（何かのキーボードショートカットがあればよいのですが...）

・数式バーの中の文字列を全文選択する。
　（Ctrl+Aではできませんでした...　そして、数十行あります。）