お世話になっております。Microsoft Excel 2007 のVBAに関して質問があります。
###前提・実現したいこと
あるワークシートについて、1行目の各セル以外の内容をクリアする(1行目の各値のみそのまま)ロジックを書いています。
###発生している問題・エラーメッセージ
下記コードを実行させると、次のエラーが発生してしまいます。
Paste を行うと
実行時エラー '438': オブジェクトは、このプロパティまたはメソッドをサポートしていません。
PasteSpecial を行うと
実行時エラー '1004': Range クラスの PasteSpecial メソッドが失敗しました。
###ソースコード
Dim wsDest As Excel.Worksheet Set wsDest = ActiveSheet wsDest.Range("1:1").Copy wsDest.Cells.Clear wsDest.Range("1:1").Paste 'または wsDest.Range("1:1").PasteSpecial xlPasteValues
###質問
CopyメソッドのあとでCopy元セルをClearしてしまうと、クリップボードの内容が壊れてしまうのでしょうか?
Clear前に、配列変数などへ地道にセル値を保存をしておく方法くらいしかないのでしょうか?ロジック実現にあたり、シンプルな方法があればぜひご教示ください。
(ちなみに、VBAソースコードのmarkdown記法では、言語記号に何を指定するとVBAと認識してくれるか、ご存じでしょうか?)
回答2件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2015/12/02 00:07