ストライキ[最小公倍数]を呼び出すためのExcelの機能
LCM [最小公倍数]を取る方法を直接Excel関数を使って数学演算を使用していません
オブジェクトを作成するために、」オブジェクトとしてXLS薄暗いです
設定XLS =のCreateObject（「まずExcel.Application」）は「建設されたビルドエクセル応用例（個別）
「（オブジェクトのコレクションを）ExcelワークブックとATPVBAEN.XLAのインを開きます。
エクセルライブラリフォルダパスのための「Xls.LibraryPath - 注1
「マクロ（マクロ）を実行するRunAutoMacrosメソッドを呼び出し- 注2
「1 xlAutoOpen - 注3
xls.Workbooks.Open（xls.LibraryPath＆ "Analysisatpvbaen.xla"）。RunAutoMacros 1
「ATPVBAEN.XLA利得集中機能を使用して、最小公倍数LCM 6、12、144を取得します
メッセージボックスxls.Run（ "ATPVBAEN.XLA！LCM"、6、12、144）「メソッド1
「GetMacroRegIdは、マクロログイン（登録）IDを達成しました
「LCM機能6を介して最小公倍数計算さGetMacroRegIdを得るため、12、144
メッセージボックスxls.Run（ "GetMacroRegId（" "LCM" "）"、6、12、144） '方法2
xls.Quit「離れて、Excelを閉じます
Excelアプリケーションオブジェクトの設定XLS =何も「リリース
言語自体は、特定の数学関数を持っていない場合ちなみに、同じようには..あなたは、Excelの関数の使用を呼び出すために、このメソッドを使用することができます
注1：
エクセル共通のデフォルトパス
「スタート置換フォルダの名前を返します。
Application.AltStartupPath
「ワークブックの現在のパスを返すために（ファイルがアーカイブでない場合、空の文字列を返します）
ActiveWorkbook.Path
「今、ワークブックの現在のパスとファイル名を持つ（一時ファイルの名前だけを返し、ファイルがアーカイブでない場合）
ActiveWorkbook.FullName
ネットワークパスは、所与のネットワーク・パスが存在しない場合、このプロパティは空の文字列を返す場合「保存されたテンプレートを返します
Application.NetworkTemplatesPath
「どこパス保存されたテンプレートの面積を返します。
Application.TemplatesPath
「Excelプログラムへのフルパスを返します。
Application.Path
「を設定またはMicrosoft Excelファイルを開くときに使用されるデフォルトのパスに戻ります
Application.DefaultFilePath
「フォルダのスタートへのフルパスを返します。
Application.StartupPath
フォルダライブラリの「リターンパス
Application.LibraryPath
（2000以上）「リターンパスコンピュータCOMゲインはユーザの取付位置を設定します
Application.UserLibraryPath
「リターンパス区切り文字
Application.PathSeparator
注2：
2つの自動マクロはAuto_Closeのは、1があるのAuto_Open、エクセル内があります
役割：
Excelワークブックのオープンは、マクロが含まれている場合、それは自動的に閉じられたときには、Auto_Open、Auto_Closeのが実行されます実行されます
しかし、プログラム呼び出しの確立を介してExcelアプリケーションオブジェクト（OLEオートメーション;のActiveX）
したがって、メソッドRunAutoMacrosを通して実行（動作）を設定する必要のAuto_Open、のAuto_Closeを行いません
注3：
RunAutoMacros方法
Workbooks.RunAutoMacros（パラメータ）
定数説明
xlAutoOpen：1 - 自動的にマクロをオンに
xlAutoClose：2 - マクロは自動的にシャットダウン
xlAutoActivate：3 - マクロの役割
xlAutoDeactivate：4 - マクロは無効です。
オリジナル：大列 攻撃するExcel関数を呼び出す[最小公倍数]