次の方法で共有

Excel 2007 でマクロが動作はするが最初に操作を記録した位置でしか実行されない

Anonymous
2011-09-02T16:02:19+00:00

超初心者です よろしくお願いいたします。

 Win7 home64bitに パッケージ版で購入したoffice2007を入れ、 使っています

デジタル署名も済んでいる?のとマクロが 一応記録できている?ようなのですが うまく実行できません

 たとえば セルに入っているデータを右上のセルに移動するマクロを記録しようとして

マクロの記録を開始してA3のセルを選択して切り取り、 B2へ移動してはりつけしたところで 記録を終了

次にA6などのセルを選択したところで マクロを表示して実行するマクロを選んで実行すると 先ほどのA3の内容をB2へ移動ということしかやりません

実際には、 マクロを記録の操作をした時点でA3の内容はB2へ移動済なので 今となっては空欄になっているA3を再度B2へはりつけなので

ただB2が空欄にになっただけですが・・

この パッケージ版で購入したoffice2007を以前XPで使用していたときからこのようなことが起きていたのですが、  

Win7 home64bitにも入れ、 て何度かおなじことを繰り返していたところ

「有効無効の設定をしてください」という表示とヘルプがでまして デジタル署名についてのヘルプも出たので 

(この表示やヘルプはXPの時には1年以上出たことが無かった)デジタル署名を行って、

デジタル署名のはいったマクロ以外を無効という設定にした上で Visualbasicでどのファイルでマクロを実行するか も指定した上で、  

いったん閉じてマクロ有効ファイルとして保存もした上で 再度 ひらいて 

Visualbasicどのファイルでマクロを実行するかも指定した上で マクロを実行しているつもりなのですが

やはり先ほどのように右上に移動するマクロを実行しようとしても A3→B2しか行いません

なにかの設定がまだ完了していないのでしょうか

全く見当がつきません 

アドバイスいただけますと幸いです よろしくお願いいたします。

Microsoft 365 と Office | Excel | 家庭向け | Windows

ロックされた質問。 この質問は、Microsoft サポート コミュニティから移行されました。 役に立つかどうかに投票することはできますが、コメントの追加、質問への返信やフォローはできません。

0 件のコメント コメントはありません

質問作成者が受け入れた回答

Anonymous
2011-09-03T10:23:49+00:00

少々補足しておきます。

記録されたマクロは多分↓のようになっていると思います。(ALT+F11でコードが表示できます)

Sub Macro1()

    Range("A3").Select

    Selection.Cut

    Range("B2").Select

    ActiveSheet.Paste

End Sub

つまりこのコードはA3⇒B2に固定されてしまっているわけで、この動きしかしません。

もし、選択しているセルを一つ右上のセルに貼り付けるとしたら、一つの例ですが次のようになります。

Sub aaa()

Selection.Cut

Selection.Offset(-1, 1).Select

ActiveSheet.Paste

End Sub

この回答は役に立ちましたか?

0 件のコメント コメントはありません

質問作成者が受け入れた回答

Anonymous
2011-09-03T00:24:25+00:00

それで正常です。

マクロ記録は(どの部分から記録したかにより多少変わりますが)記録したとおりにしか実行されません。

理由は操作対象のアドレスが絶対アドレスで記録されているためです。

マクロ記録されたコードは全く同じ操作("同じような"と言う意味ではありません)を繰り返し行う場合以外には使い物にならないと思っていただいた方がよろしいと思います。

マクロ記録されたコードを使うには、記録されたコードをご自分で目的に合うように修正するか、それを参考に独自にコードを書かれる必要があります。

この回答は役に立ちましたか?

0 件のコメント コメントはありません

3 件の追加の回答

並べ替え方法: 最も役に立つ
  1. Anonymous
    2011-09-06T00:58:51+00:00

    y sakuda さん、アドバイスありがとうございます。

    mzmz さん、こんにちは。

    y sakuda さんからいただいたアドバイスがご参考になったようですね。

    同じような問題に遭遇された方にもご参考となるよう、今回は私の方で \[回答としてマーク\] をいたしました。

    次回もぜひ Answers をご利用ください。

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません
  2. Anonymous
    2011-09-03T17:26:58+00:00

    ありがとうございます 

    見よう見まねでやってみます またわからない時に質問するかもしれませんが

    詳しく教えていただきましてありがとうございました

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません
  3. Anonymous
    2011-09-03T07:56:04+00:00

    ・・そうだったのですか・・ にたような動作をどんどんできるものかと思い込んでいました

    ここ数年のモヤモヤが解消しました どうもありがとうございました

    この回答は役に立ちましたか?

    0 件のコメント コメントはありません