エクセルの「値の貼り付け」ボタンについて

質問

こんにちは　いつもお世話になっています。

　エクセルのテキスト形式での貼り付けについて教えてください。
ツールバーに「値の貼り付け」のボタンを作ってあります。エクセルで文字列が入ったセルをコピーして、別のセル上で「値の貼り付け」ボタンを押すと正常に効きます。
　しかし、たとえばIEで文字列をコピーしてエクセル上で「値の貼り付け」ボタンを押しても何も反応がありません。編集-「形式を選択して貼り付け」でテキスト形式を選ぶと正常にテキスト形式で貼り付けされます。
　HTMLデータではボタンが効かないということなのでしょうか。それとも、固有のトラブルでしょうか。原因、対策を教えてください。

回答No.1

hana-hana3 · ベストアンサー

＞それとも、固有のトラブルでしょうか。原因、対策を教えてください。

その機能の対象では無いからでしょう。
同じ事を手動で行って見てください。コピー元の違い（エクセル内部と外部）異なるダイアログボックスが表示されますよ。

対策を取るなら、コピーデータが内部か外部かを判定して貼り付けコードを変える事でしょうけど、私には判定方法が解りかねます。
他の方法としては”PutInClipboard メソッド”を使うと、クリップボードのデータをテキストに置き換える事が可能のようです。
詳細はヘルプを参考にしてください。

記録マクロでもコードが異なりますし、ヘルプの解説も「Worksheet オブジェクト」と「Range オブジェクト」に分かれます。

---------------------------------------------------------------
ＩＥ（外部データ）からの値貼り付け
ActiveSheet.PasteSpecial Format:="テキスト", Link:=False, DisplayAsIcon:= False

help:Worksheet オブジェクトの PasteSpecial メソッド
指定された形式で、クリップボードの内容をシートに貼り付けます。他のアプリケーションからデータを貼り付けるときや、あるいは特別な形式でデータを貼り付ける場合に使います。

---------------------------------------------------------------
エクセル内部の値貼り付け
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False

help:Range オブジェクトの PasteSpecial メソッド
クリップボードのデータを、指定されたセル範囲に貼り付けます。

--------------------------------------------------------------

お礼

hana-hana3　様　ありがとうございました。
大変勉強になりました。
両者の貼り付けを同じ機能と勘違いしていたようです。
簡単で恐縮ですが、お礼申し上げます。