VBScript

GUIDを作成するVBScript

Office アドインを作成するのに必要(マニフェストのId要素)なGUIDですが、いちいちguidgen.exeを立ち上げたり、Generate GUIDs onlineにアクセスするのも面倒くさいので、手軽に取得できるようスクリプトを作成しました(元々は「[Office用アプリ]野良アプリのススメ」で書いたコードです)。

Option Explicit

Dim ret

Do
  ret = InputBox("終了する場合は「キャンセル」ボタンをクリックしてください。", _
                 "GUID作成", _
                 LCase(Mid(CreateObject("Scriptlet.TypeLib").GUID, 2, 36)))
Loop Until Len(Trim(ret)) < 1

実行すると下図のようにInputBoxが表示され、Enterキー、もしくはOKボタンをクリックすると、GUIDを再生成します。

CreateGUID

Enterキーを押して気に入った(?)GUIDが作成されたらCtrl + Xキーを押して切り取り、ESCキーを押してスクリプト終了、なかなか手軽で便利です。

関連記事

  1. VBScript

    クリップボードに文字列をコピーする

    2012/4/3 追記:関連記事として「clipコマンドを利用してクリ…

  2. VBScript

    画像の一部にぼかしを入れるバッチ処理

    Paint.NETなどの画像処理ソフトを使うと、簡単に画像にぼかしを入…

  3. Windows 10

    AppUserModelId(AUMID)を列挙するVBScript

    「「ファイル名を指定して実行」からMicrosoft Edgeを起動す…

  4. Windows 10

    Microsoft Edgeを操作するVBScript

    「Microsoft Edgeを操作するVBAマクロ(WebDrive…

  5. Office関連

    Officeアプリケーションの「最近使用したファイル」を削除するVBScript

    WordやExcel等のOfficeアプリケーションでは、下記サイトに…

  6. Windows関連

    Windows 8を従来のスタイルに変更するスクリプト

    2012/3/2 追記:下記情報はWindows Develope…

コメント

  • コメント (0)

  • トラックバックは利用できません。

  1. この記事へのコメントはありません。

Time limit is exhausted. Please reload CAPTCHA.

最近の記事

アーカイブ

RapidSSL_SEAL-90x50
PAGE TOP