Windows8 & Office2013 Access2013

Print Friendly

埋め込みマクロのコード変換

投稿日:

Access2007以降(拡張子accdb)では、[コマンドボタンウィザード]や[マクロビルダー]を使ってボタンを作成すると、[埋め込みマクロ]が作成されます。
通常の独立マクロであれば、[マクロをVisualBasicに変換]でコードに変換できるのですが、この埋め込みマクロは変換できません。ただ、埋め込みマクロの仕様は見ることができるので、一度 埋め込みマクロをマクロ作成で作成し直し、VisualBasicに変換することはできます。

※拡張子がmdbの場合は、イベントプロシージャとなりますのでコードを確認できます。

レコードの検索ボタンをウィザードで作成

ここでは、[レコードの検索]ボタンを作成します。
フォームをデザインビューで開き[デザイン]タブの[ボタン]をクリックします。このとき[コントロールウィザードの使用]はオンにしています。(既定)
コマンドボタンの作成

[コマンドボタン ウィザード]から[レコードの移動]と[レコードの検索]を選択して[次へ]ボタンをクリックします。
コマンドボタンウィザード

[文字列]を選択して、[次へ]ボタンをクリックします。
コマンドボタンウィザード

ボタン名をつけて、[完了]ボタンをクリックします。
コマンドボタンウィザード

フォームのデザインビューには、レコードの検索ボタンが作成され、ボタンのプロパティ、イベントには、[クリック時]に[埋め込みマクロ]と表示されます。
埋め込みマクロ

フォームビューに切り替えて、[レコードの検索]ボタンをクリックすると、[検索と置換]ダイアログボックスが表示されます。
レコードの検索

埋め込みマクロの詳細

デザインビューで、この埋め込みマクロの詳細をみてみます。[埋め込みマクロ]右横の[…]ボタンをクリックします。
プロパティ

下のようになっています。
埋め込みマクロ

埋め込みマクロの[マクロをVisualBasicに変換]ボタンは無効

でも、コードに変換しようとしても[マクロをVisualBasicに変換]ボタンは無効です。
マクロをVisualBasicに変換ボタン

独立マクロの作成

通常のマクロであればコードに変換は出来るので、埋め込みマクロを参照して同じマクロを作成します。[作成]タブの[マクロ]をクリックします。
マクロの作成

埋め込みマクロと同じようにアクションを設定して、マクロに名前を付けて保存します。
マクロに名前を付けて保存

独立マクロをVisualBasicに変換

作成したマクロをデザインビューで開き、[マクロをVisualBasicに変換]ボタンをクリックします。
VisualBasicに変換

ウィンドウが表示されますので、[変換]ボタンをクリックします。
マクロの変換

VBEが開き、変換されたコードを見ることができます。
変換されたコード

参考Officeのバージョンによって操作が異なる場合があります。以下の記事で、お使いのOfficeのバージョンを確認する方法を解説しています。

Office(Word、Excel、PowerPointなど)のバージョンを確認する方法

Microsoft Officeも時を得て、大きく様変わりしてきました。トラブルを解決しようとするとき、あるいは、何かの操作を探すときなど、 ...

続きを見る

あなたへのおすすめ

関連記事

ハイパーリンクの下線を消す

Excelで文字列にハイパーリンクの設定をすると、文字列に青い下線が表示されます。 ハイパーリンクの設定はそのままで、下線のみ表示しないよう ...

グラフをプレビューして確定

Excel2013では、グラフの種類を決定する際、プレビューで確認しながら確定できるようになりました。 Excel2010の場合 Excel ...

バージョン情報の確認

Office2013のバージョンを確認する方法です。Office2010の時と異なるため、戸惑われる方も多いようです。 Wordで解説します ...

A4用紙に大きな2文字を印刷

WordでA4用に大きな縦書き2文字を印刷して、貼り紙を作成したい時に役立つ方法です。 ページ設定 まず、ページ設定ををするため、「ページレ ...

印刷プレビュー時に[印刷プレビューの表示]が出現する

Excel2013で[印刷]をクリックして、印刷プレビューを表示させると、時々 下のように[印刷プレビューの表示]ボタンが現れ、このボタンを ...

-Windows8 & Office2013 Access2013

Copyright © 2001-2017 初心者のためのOffice講座 All Rights Reserved.

Copyright© 初心者のためのOffice講座 , 2017 AllRights Reserved Powered by AFFINGER4.