Excelで「形式を選択して貼り付け」のマクロの作り方

このQ&Aのポイント
  • Excelで「形式を選択して貼り付け」のマクロを作成する方法について教えてください。
  • WinXPでExcelを使用しています。特定のセルの値を別のセルにコピーし、その際に「形式を選択して貼り付け」を適用するマクロを作りたいです。
  • 質問者はVBaに詳しくないため、以前のマクロを参考にすることができず困っています。具体的には、右クリック→「形式を選択して貼り付け」→「罫線を除く全て」の操作をVBAコードで実現したいと思っています。お手数ですが、方法を教えていただけますか?
回答を見る
  • ベストアンサー

Excelで「形式を選択して貼り付け」のマクロの作り方

WinXPです。 Excelで 1.コピー元セルの値をコピーします。 2.コピー先セルを選択します。 3.コピー先セルを右クリックして 4.「形式を選択して貼り付け」を選択します。 5.「罫線を除く全て」を選択します。 ここでコピー元セルもコピー先セルも位置関係はなくランダムです。 上の4.5.のみのマクロを作りたいのですが うまくいきません。 VBAは全くわかりませんが、以前5.の部分が「値」に したものをカーソルの操作を記録することにより 作ってあります。(Win98ですが) したがって今回も5.が違うだけですから 同様にできると思うのですが 昔のことで方法が忘れてしまいました。 単純に4.5.をマクロに記録して、実行したら 「シンジのメソッドが・・・」というエラーに なってしまいました。 よろしくお願いします。

質問者が選んだベストアンサー

  • ベストアンサー
回答No.1

Sub Macro2() Range("A11").Select Application.CutCopyMode = False Selection.Copy Range("B11").Select Selection.PasteSpecial Paste:=xlPasteAllExceptBorders, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False End Sub A1セルをB1セルにご質問者の意向に添って自動記録したものですが、 Selection.PasteSpecial Paste:= 以下のものをxlvaluesのかわりに入れればいいのでは?^^ そうでなければコードのソースをあげていただかないと何とも言えません

Kuma2000
質問者

補足

回答ありがとうございました。 >そうでなければコードのソースを 恥ずかしながらVBAのコードは全くわかりません。 「以前5.の部分が「値」にしたものを・・・」を作ったときは ツール->マクロ->新しいマクロの記録にして カーソルで通常の操作をして、その後 記録終了にしました。 つまり私はVBAコードを書くことなくマクロを作りました。 そこで今回も同様にできないか質問した次第です。

その他の回答 (1)

回答No.2

メニューバーのツール→マクロ→Visual basic editerを起動します。 左上のプロジェクトエクスプローラーの標準モジュールのフォルダを開きModule1をダブルクリックして開きます。 そこで書かれているコードをコピペしてみて下さいな^^ 言っていることが分からなければ下記URLで勉強するのもいいでしょう^^;

参考URL:
http://www.moug.net/skillup/ebb/evbb/evbb001-1.htm

関連するQ&A

  • エクセル「形式選択して貼り付け」について

    こんにちは。罫線を除いてピーしたい時に下記の手順で複写しておりますが うまくいきません。何がおかしいのでしょうか。 エクセル初心者の質問で申し訳ありませんが、よろしくお願い申し上げます。 (問題1 罫線を除いてデータのコピー) 1.元をマウスでドラッグする。(例.セルA1~C3) 2.編集 → コピー 3.’形式選択して貼り付け’を選択。「罫線を除くすべて」を選択。 4.移したい先にカーソルを移動して改行。 が、結果罫線まで複写されてます……。 (問題2 罫線のみコピー) 形式を選択して貼り付け、の中に罫線のみコピーはないですよね。 罫線のみコピーしたい場合はどのような手順になるのでしょうか?

  • Excelマクロ実行不可で掃除してみたい

    Excel2000 罫線を除く全て貼り付けをマクロに記録しCtrl][Alt][v]のショートカットキーを使いたかったので、マクロの記述を他の(以前教わった)Auto_Open()のVBAにコピーししました。その日は使えたのですが、後日使えなくなりました。打つ手はありますか?   今度は既存のVBAに引っ越さないでやってみようと、VBAProject(PERSONAL.XLS)の各Moduleを解放し何もない状態で 再び[罫線を除く全て]を貼付けるマクロを記録しました。やはり実行できません。 症状としては  罫線で囲まれたセルを選択してコピーし 貼付け先を選択し ツールバーの[実行三角印]をクリックするとコピー元の点線アクティブが解除されてしまいます。 何かが悪さしている感じです。お掃除は出来ないでしょうか? Excelを削除してインストールし直さないとダメでしょうか?上書き再インストールでは直りませんでした。

  • Excelのマクロ(VBA)について教えてください。

    このようなマクロをつくりたいのですがうまく作れません。 セルをコピーした後、貼り付け先のセルを選択して、 <ここからがマクロ> 形式を選択して貼り付け→罫線を除くすべて <マクロ終了> 他の貼り付け方法はうまくできるのですが、「罫線を除くすべて」だけができません。 参考までにこれが作られたVBAです。 Sub Macro1() Selection.PasteSpecial Paste:=xlAllExceptBorders, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False End Sub 以上です。 どなたかアドバイスよろしくお願いします。

  • エクセル_形式を選択して貼り付け

    お世話になります。 エクセル操作についてお聞き致します。 セルをコピーして値のみ貼り付けをしたい場合 1.セルをコピー 2.形式を選択して貼り付け 3.値 4.OK だと思います。しかしなぜか分からないのですが、上記操作において 「形式を選択して貼り付け」を選ぶとなぜか「オブジェクト貼り付け」 の画面になってしまうのです。なにが原因なのか全く分かりません。 最近までは普通にできていたと思うのですが、なにか操作がおかしい のでしょうか?お心当たりのある方はご教授願いますm(_ _)m

  • Excel 形式を選択して貼り付けで貼り付ける値は決まっている場合

    こんにちは。Excel2007を利用しています。コピーしたものを貼り付ける場合、形式を選択して貼り付けるがありますが、この中で値を貼り付けでの質問になります。 例えばA1に式が書いてあって、そこにデータを入力します。そこで値が「100」となったとします。これを形式を選択して貼り付けでB1に値貼り付けをします。これで値が貼り付けられますが、こうではなく、B1に貼り付けるときにその特定のセルに貼り付ける場合は常に値の貼り付けで行うことは可能でしょうか? ショートカット、マクロではなく、何か設定か式で可能ではないでしょうか?よろしくお願いいたします。

  • Excelでのコピー貼り付けを繰り返すマクロ

    B4セルをコピーしてB5に貼り付け。 B6セルをコピーしてB7に貼り付けという感じで、コピーと貼り付けを連続して行いたいです。マクロの記録でやっていけると思い色々やっていますが、どうもうまくできません。 皆さん教えて頂けませんか。

  • Excel の 「形式を選択して貼り付け」、デフォルトで 「値」 に設定可能?

    Excel 2000 を使ってます。 ボーダーや背景色のあるセルをコピーする時、 値だけを取り出すために 「形式を選択して貼り付け」 から 「値」 を選択してるのですが、「すべて」 の代わりに 「値」 をデフォルトに設定することは可能でしょうか? また、オプションの設定などで コピーした時に「値」 だけを 取り出すことは可能ですか? あるいは VBA を使った場合はどうでしょう??

  • 「形式を選択して貼り付け」の値のみ貼り付け

    今仕事で、エクセルで関数の入ったセル内の「値のみ」をコピーして同じセルに張り付ける作業をやっています。(計算式の結果の値のみを貼り付けます) 普段コピー&貼り付けの時には「マウスの右クリックでコピーor貼り付け」ではなく、「Ctrl-C」でコピーし、「Ctrl-V」で貼り付けています。 ですが、関数の入ったセルの値だけを貼り付ける場合、「コピー→右クリック→形式を選択して貼り付け→値を選んでOKを押す」という作業を繰り返すことになると思うのですが、さすがにあまりにも数が多く、この作業を繰り返しては終わりそうにありません。 セルをコピー後、「形式を選択して値のみ貼り付け」を「Ctrl-V」のように一回でキーボード操作のみで出来る方法などないでしょうか? 文章が下手でうまく説明できなくて申し訳ありません。また、あまりパソコンの知識がなく専門用語は分からないのですが、よろしくお願い致します。

  • マクロで貼り付けができません。

    エクセルのマクロについて質問です。 ある表を「可視セルを選択」→「アクティブ領域を選択」し、コピーした後、別のシートに貼り付けようとしたところ、エラー「コピー領域と貼り付け領域の形が違う為情報を貼り付けることができません」が表示され、貼り付けられませんでした。マクロを作成した時に、同じ形の元データ数種類を使用し動作を確認した時は、貼り付けができました。今回使用した元データと相違する部分を探しましたが、見当たりせんでした。また、貼り付け元・先共に、結合するセルはありません。 解決策はあるのでしょうか?

  • 「罫線を除く全ての貼り付け」をマクロ化したい

    「罫線を除く全ての貼り付け」をマクロ化したいと思いマクロの記録をすると、 Selection.PasteSpecial Paste:=xlAllExceptBorders, Operation:=xlNone, _ SkipBlanks:=False, Transpose:=False のようなマクロができあがるのですが、これを実行すると RangeクラスのPasteSpecialメソッドが失敗しましたと出て実行できません。 どうも形式を選択して貼り付けが全てそのようになるようです。 原因と解決方法がわかる方いらっしゃったらお願いします。