• ベストアンサー

excelのマクロが記録されない

excelにて写真を貼り付け、サイズを変更する作業をマクロにて行おうと思い、記録しようとしているのですが、表示を見てみるとend subしか記録されません。なぜでしょうか? excelは2007です。 よろしくお願いします。

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

  • ベストアンサー
  • merlionXX
  • ベストアンサー率48% (1930/4007)
回答No.1

Excel2007では、図形オブジェクトの操作はマクロに記録されなくなりました。 参考までに、Excel2000で、写真(img001.jpg)をワークシートに貼り付け、移動し、縮小したものを記録してみました。 こんな感じです。 Sub Macro1() ' ' Macro2 Macro ' マクロ記録日 : 2010/2/4 ユーザー名 : merlionXX ' '   ActiveSheet.Pictures.Insert("C:\Documents and Settings\merlion\My Documents\My Pictures\img001.jpg").Select   Selection.ShapeRange.IncrementLeft 210#   Selection.ShapeRange.IncrementTop 151.5   Selection.ShapeRange.ScaleWidth 0.78, msoFalse, msoScaleFromTopLeft   Selection.ShapeRange.ScaleHeight 0.78, msoFalse, msoScaleFromBottomRight End Sub

関連するQ&A

  • Excel、マクロの記録、ショートカットキーが使えません

    Excelで下記のようにマクロの記録をしました。 1. Sub 改ページ() '表示-改ページのマクロです。 ' 改ページ Macro ' マクロ記録日 : 2009/11/26 ユーザー名 : ' ' Keyboard Shortcut: Ctrl+a ' ActiveWindow.View = xlPageBreakPreview End Sub 2. Sub 標準() '表示-標準のマクロです。 ' 標準 Macro ' マクロ記録日 : 2009/11/26 ユーザー名 : ' ' Keyboard Shortcut: Ctrl+z ' ActiveWindow.View = xlNormalView End Sub 3. Sub 改ページ範囲() '改ページ範囲を設定するマクロです。 ' 改ページ範囲 Macro ' マクロ記録日 : 2009/11/26 ユーザー名 : ' ' Keyboard Shortcut: Ctrl+q ' ActiveSheet.PageSetup.PrintArea = "$A$1:$P$27" End Sub ここで、1及び2についてはショートカットキーが使えるのですが、 3のショートカットキーを押しても何の反応もありません。 メニューバーのツール-マクロ-マクロのダイアログボックスを表示させてから、 「改ページ範囲」のマクロを選ぶと改ページされます。 そこで質問なのですが、 なぜ、ショートカットキーが使えないのでしょうか? よろしくお願いします。

  • エクセル2007でのオートシェイプのマクロ記録

    エクセル2007でのオートシェイプのマクロ記録ができません。 エクセル2000、エクセル2003では、可能です(テスト済)。 2007でのオートシェイプのマクロ記録のやり方は何か特殊なのでしょうか。 たとえば、エクセル2007の開発タブから「マクロの記録」を選び、楕円を描いてマクロ記録を終了し、VBEでそのマクロを開いても、題名等はあるものの sub 題名()から End Sub までの間にコードはなく空白になります。 おわかりの方にお尋ねします。 検索してみましたが、件数が多く閲覧した範囲では、見当たりませんでしたので、よろしくお願いします。

  • 検索はマクロで記録できないのでしょうか?

    エクセル2007です。 マクロの記録ボタンを押して、CTRL+Fで検索を立ち上げて、文字を検索して、マクロを終了したら、 Sub Macro1() ' Macro1 Macro End Sub としか記録されてませんでした。 検索はマクロで記録できないのでしょうか? ご回答よろしくお願いします。

  • Excelのマクロの結合方法を教えてください

    Excelのマクロを使っての処理を少しだけ使うようになりました。 「これがコンピュータなの!」と一瞬で作業が進みます。(当然ですね。) ☆・・・・・☆ マクロについて学びたいので、数冊の「基本技」などの参考書籍を購入しました。 でも、わかりません。 現在は、「マクロの記録」で始めて「記録の終了」でマクロを記録してボタンに登録して「マクロを利用」しています。 ボタンが増えてしまうのです。(泣・・・) ☆・・・・・☆ マクロの編集を開くと何にも分かりません。 (Sub Macro1)   End Sub (Sub Macro2)   End Sub (Sub Macro3)   End Sub  ----- と、作成した順にマクロが書かれていることが分かりました。   我流でそれぞれを繋ぐと止まってしまいます。  ☆・・・・・☆ このように、記録によって書かれた複数のマクロを繋げて、一個のマクロに纏める書き方のポイントを教えてください。 また、このように記録されたマクロ(テンプレートでも可)の推敲(朱筆?)から入門するような参考書名をご存じでしたら具体的に教えてください。   ☆・・・・・☆

  • マクロがコードに記録されない

     今晩は、宜しくお願いします。  エクセルのシートに写真を取り込んで、「ある大きさにサイズ変更 ⇒ 同じ大きさのセルに 移動させる」を「マクロの記録 ⇒ マクロの終了」でマクロを作成し、別のシートでも実行させ たいのです。  実は、あるエクセルファイルでは、うまく実行出来たのですが、今日、同じやり方で、別のエ クセルファイルでマクロを作成しましたが、マクロが全く実行されません。  「マクロ ⇒ 編集」からマクロコードを見ても、あるサイズに変更するところのマクロコードが 記録されていません。  これは何故でしょうか。  また、「相対参照で記録」というオプションがありますが、これが何らかの関係があるのでしょ うか。  どうしても理由がわかりません、以上、宜しくお願いいたします。

  • エクセルのマクロ、Modulu、プロシージャ及び記録したマクロの名称に

    エクセルのマクロ、Modulu、プロシージャ及び記録したマクロの名称について エクセルを開きます ツール → マクロ → 新しいマクロの記録 マクロの記録のウィンドーが開きます。 ・マクロ名 ・マクロの保存先 ・説明 このマクロ名ですが「Macro1」となっています。 ここを例えば「クリア」と入れます。 マクロの記録を始めます。 セルのB2~F2を選択します。 DELETEキーを押します。 カーソルをA1に持って行きます。 記録の終了をします。 ツール → マクロ → Visuai Basic Editor → 標準モジュール をクリック その下にツリー表示で Modulu1 とあり、それをクリックすると (General)▼ クリア ▼ ---------------------------  Sub クリア() ' ' クリア Macro ' マクロ記録日 : 2010/8/30 ユーザー名 : ※※※ ' ' Range("B2:F2").Select Selection.ClearContents Range("A1").Select End Sub --------------------------- と出ます。本を読んだり、WEBで検索したりこういう所で質問した時に出てきます、 ・Macro1 ・作成したマクロ とはどれを差すのでしょうか? ・マクロの記録をした時はMacro1 ・Visuai Basic Editorで見るとModulu1 ・マクロの中身はSub クリア() です。 よく教えていただく文例の ・Call 作成したマクロ ですが、 この場合、他のマクロ文の途中に ・Call クリア とかにすると コンパイルエラーですとか、プロシージャーを入力してくださいとか のアラートが出ます。 でも ・Call 印刷 とかで動作する場合もあります。これは偶然動いているのでしょうか? 本やWEB検索等でも説明がばらついていてよくわからなくなってきました。 ・Macro1 ・Modulu1 ・Sub クリア() ・プロシージャー とはこの例の場合どういうものなのか教えてください。 各単語でWEB検索しても的を得た回答が得られません。 またこの例で作成した :クリア:ですが 名前は変えてもいいのでしょうか? 例えばクリア → リセットに変更する場合はどうやって直すのでしょうか。 ・Modulu1を右クリックで VBAProjectのプロパディというのはありますが この名前を変更するのでしょうか?またここは変更していいのでしょうか? また名前を変更した場合 :Sub クリア():の部分は自分で :Sub リセット():と書き換えるのでしょうか? どうもすっきりしないので、超初心者用に教えていただきたいです。 以上よろしくお願いします。

  • マクロの記録

    VBの自動記録が分かりません。 特定のセルに背景色を試しに付けてみました。そこで「新しいマクロの記録」を実行、「記録終了」と手順を行いましたが、「マクロの編集」を開くと下記のように中身がありません。ご教示願います。 Sub Macro1() ' ' Macro1 Macro ' マクロ記録日 : 2007/2/3 ユーザー名 : Administrator ' End sub

  • Excelマクロ教えてください。

    いつも大変お世話になっております。 あるシートにあるフォントのすべてをMSゴシックにしたいのですが、 マクロ記録→全選択してフォント変更→記録解除 で下記のマクロができました。 Sub Macro1() ' ' Macro1 Macro ' マクロ記録日 : 2007/11/21 ユーザー名 : TEST ' ' Cells.Select With Selection.font .Name = "MS ゴシック" .Size = 11 .Strikethrough = False .Superscript = False .Subscript = False .OutlineFont = False .Shadow = False .Underline = xlUnderlineStyleNone .ColorIndex = xlAutomatic End With End Sub 全選択せずに、あるシートすべてのフォントを変更する方法はありますか? シートのフォントを変更するだけの目的です。 よろしくお願いします。

  • マクロの記録で何も記録できない理由は?

    「ブックを開く」という動作が知りたかったので、 現在開いているブック1から、マクロの記録ボタンを押し、 デスクトップにあるブック2をダブルクリックして開きました。 しかし記録終了ボタンを押した後、 ブック1の標準モジュールを確認しても Sub Macro1() ' ' Macro1 Macro ' マクロ記録日 : 2009/10/16 ユーザー名 : ' End Sub と何も記録できていません。 何故でしょう? ちなみにブックを開く方法は http://officetanaka.net/excel/vba/file/file01.htm で確認できました。 なのでマクロの記録で記載されない理由を教えてください。 エクセル2003です。

  • 記号をマクロで記録することは不可能か?

    記号をマクロで記録することは不可能か? エクセル2003を使用しています。 マクロの記録→挿入→記号と特殊文字で ハートを挿入し、マクロの記録の終了をして標準モジュールを見たのですが Sub Macro1() ActiveCell.FormulaR1C1 = "?" Range("a1").Select End Sub となります。 セルにはハートが入っています。 そのあと、Macro1を実行すると、?がセルに挿入されました。 VBAで記号を挿入することは不可能のなのでしょうか?

専門家に質問してみよう