

こんにちは。
EXCELのVBAでマクロを作成しています。
セルの値のコピー&ペーストを行おうとしているのですが、結合されているセルのペーストのときに、「同じ結合セルが必要です」とエラーになってしまいます。
例えば、A1とA2が結合されたセル+A3をコピー
Worksheets(x).Activate
Range("A1:A3").Selection
Range("A1:A3").Copy
別のシートで、B1とB2が結合されたセル+B3にペースト
Worksheets(y).Activate
Range("B1:B3").Paste
セルの結合を解除すればうまくいきます・・・
セルを結合したままペーストしたいのですが、どうやら間違っているようです(ノ_・。)
どなたか教えてください。
よろしくお願いします。
No.3ベストアンサー
- 回答日時:
nao_linさんこんにちは。
merlionXXです。> 値だけ貼付けのオプションをつけるとエラーになってしまうのは何故なのでしょうか?
結合セルの値貼り付けは無理のようですね。↓
http://support.microsoft.com/default.aspx?LN=JA& …
製品の問題だったのですが・・・、参考になりました。
一旦結合を解除してから再度結合するしか方法がないようですね。どうもありがとうございました。
No.4
- 回答日時:
なんどもすみません、merlionXXです。
考えたんですが、値貼り付けならなにもコピーしなくてもいいですよね?
Sub test01()
Sheets(2).Range("B1:B3").Value = Sheets(1).Range("A1:A3").Value
End Sub
結合していても、上記でOKでは?
No.2
- 回答日時:
コピー領域と貼り付け領域のセルの状態が同じであれば、なにもわざわざ選択しなくとも
Sub test01()
Sheets(1).Range("A1:A3").Copy
Sheets(2).Range("B1:B3").PasteSpecial
Application.CutCopyMode = False
End Sub
こんな感じでセルを結合したままペースト出来ると思います。
この回答への補足
merlionXXさん、いつもどうもありがとうございます。
確かに、おっしゃるとおりそのまま行えがペーストができました。でも、値だけ貼付けのオプションをつけるとエラーになってしまうのは何故なのでしょうか?
教えていただけますか?罫線とか背景は貼付けしたくないのですが・・・。
↓これはエラー
Sheets(2).Range("B1:B3").PasteSpecial xlPasteValues, xlPasteSpecialOperationNone
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
このQ&Aを見た人はこんなQ&Aも見ています
-
教えて!goo限定!! 電子コミック1000円分ギフトコードプレゼント!!
新規無料会員登録で抽選で1000名様に電子コミック1000円分ギフトコードプレゼント!!
-
エクセルのマクロで結合セルに値を貼り付けたい
Excel(エクセル)
-
エクセルマクロで結合されたセルをコピー
Excel(エクセル)
-
結合セルから結合セルへ値のコピー
その他(教育・科学・学問)
-
4
'Range'メソッドは失敗しました
Excel(エクセル)
-
5
エクセル:マクロ「Application.CutCopyMode = False」って?
Excel(エクセル)
-
6
別のシートから値を取得するとき
Visual Basic(VBA)
-
7
EXCEL VBAで全選択範囲の解除
Excel(エクセル)
-
8
エクセルのエラーメッセージ「400」って?
Visual Basic(VBA)
-
9
VBAでブックを非表示で開いて処理して閉じる方法
Excel(エクセル)
-
10
Exel VBA 別ブックから該当データを検索し、必要なデータを取得する方法について
Visual Basic(VBA)
-
11
vba 2つの条件が一致したらコピーして別シートに値のみ貼り付け
Visual Basic(VBA)
-
12
VBA 実行時エラー1004 rangeメソッドは失敗しました。globalオブジェクトのエラー
Excel(エクセル)
-
13
VBA マクロ実行時エラー’1004RangeクラスのPasteSpecialメソッドが失敗
Access(アクセス)
-
14
サイズの異なる結合セル間でのコピー&ペースト
Excel(エクセル)
-
15
結合セルのデータ消去でエラーになります。どのようにすればいいでしょうか?
その他(Microsoft Office)
-
16
エクセルマクロで「セルのサイズを合わせてください」のエラー表示
Excel(エクセル)
-
17
ExcelVBAを使って、値がある場合は作業を繰り返し実行するプログラムを作成したい。
Visual Basic(VBA)
-
18
ユーザーフォームのコピー?
Excel(エクセル)
-
19
VBAで文字列を数値に変換したい
Excel(エクセル)
-
20
数式による空白を無視して最終行を取得するマクロ
Excel(エクセル)
関連するQ&A
- 1 エクセル 単一セルから結合セルへのコピー&ペーストについて
- 2 EXCEL VBAでセルのコピー&ペーストで幅と高さも貼り付けたい
- 3 結合セル内の値を、結合解除後に結合されていた全てのセルへコピーする方法
- 4 エクセルマクロ コピー元と貼り付け先を指定してコピー&ペーストを実行するマクロ
- 5 サイズの異なる結合セル間でのコピー&ペースト
- 6 マクロでの可視セルのコピー&ペーストについて
- 7 エクセルVBA セルのコピー&ペーストで・・・
- 8 Excel マクロ VBA 2つのsheetからセルをコピーして集計シートにコピペする方法 マクロ
- 9 Excell VBA 指定セルにコピー&ペースト
- 10 EXCELでセルの結合をして 2セル 1セル 3セル の複数行 2セル 1セル 3セル 2セル 1セ
関連するカテゴリからQ&Aを探す
おすすめ情報
このQ&Aを見た人がよく見るQ&A
人気Q&Aランキング
-
4
excelの特定のセルの隣のセル指...
-
5
excelのCOUNTIF関数で、『範囲=...
-
6
EXCEL VBA で特定の文字に色を...
-
7
エクセルで指定したセルのどれ...
-
8
貼り付けで複数セルに貼り付けたい
-
9
エクセル 足して割る
-
10
Excelについて(セル内の文字を...
-
11
VBAで特定の文字が入力されたセ...
-
12
対象セル内(複数)が埋まった...
-
13
【エクセル】IF関数 Aまたは...
-
14
エクセルのセルの枠を超えて文...
-
15
エクセルのセル分割
-
16
VBAでの結合セルのコピー&ペー...
-
17
セルをクリック⇒そのセルに入力...
-
18
エクセルの一つのセルに複数の...
-
19
エクセルで「コピー領域と貼り...
-
20
Excelの下側の空行を消したい
おすすめ情報