ユーザー定義関数をつくって、ブックに保存すると、メッセージが出るので、
個人用マクロブックに（ＰＥＲＳＯＮＡＬ．ｘｌｓ）に入れました。

ところが、Ｅｘｃｅｌを通常通り立ち上げると問題ないのですが、
ＶＢでブックを開くとＰＥＲＳＯＮＡＬ．ｘｌｓが一緒に開かれず、
更新のメッセージが出てしまいます。

回避する方法はありますか。

早速の回答ありがとうございます。

> VBからブックを開いた時に上記マクロを別に実行してみたらどうですか？
関数で定義しているのは、１００箇所以上あり関数で参照しているセルも５ヶ所くらいあるので
マクロで作成するのは困難です。

ちなみに、別のマクロで私がやろうとしているのは、先日質問させて頂いたように、
ｘｌＡｐｐ．Ｒｕｎ（マクロ名）
で実行すると、参照出来ませんと言うようなメッセージが出てしまいます。
そのマクロも個人用マクロに登録してあります。

ブックを開く時に、別でファイルを開かないといけないのでしょうか

下記のように指定すると開けるようです。

Private Sub Command1_Click()
    Dim xlApp    As Excel.Application
    Dim xlBook   As Excel.Workbook
    Dim xlSheet As Excel.Worksheet
    Set xlApp = CreateObject("Excel.Application")
    Set xlBook = xlApp.Workbooks.Open("C:\MacroTest.xls")  'オープンするファイル名
    Set xlSheet = xlBook.Worksheets(1)
    xlApp.Visible = True    'Excelを表示
    'PERSONAL.XLS のパスを指定して下さい。
    xlApp.Workbooks.Open "C:\Documents and Settings\YPCS_NO1\Application Data\Microsoft\Excel\XLSTART\PERSONAL.XLS"
    'Macro1 = 作成したマクロ名を指定
    xlApp.Run ("PERSONAL.XLS!Macro1")

    '終了処理
'    xlApp.Quit
    Set xlSheet = Nothing
    Set xlBook = Nothing
    Set xlApp = Nothing
End Sub


＃ 追記
ユーザー定義関数を使用する場合
上記で xlApp.Run ("PERSONAL.XLS!Macro1") をコメントアウトしてテストして見てください

途中のレスが削除されていますので連結がうまくされず表示がおかしくなっています。
一連表示の場合は　No.4172 の ★ をクリックして下さい。


>     xlApp.Workbooks.Open "C:\Documents and Settings\YPCS_NO1\Application Data\Microsoft\Excel\XLSTART\PERSONAL.XLS"

Win98 だったら

xlApp.Workbooks.Open "C:\WINDOWS\Application Data\Microsoft\Excel\XLSTART\PERSONAL.XLS"

ご自分の環境に合わせて下さい。

ご返事ありがとうございました。

ファイルを別でＯｐｅｎしないといけないのですね。
普通に、Ｅｘｃｅｌを立ち上げると、勝手に立ち上がるのに、ＶＢでブックをＯｐｅｎすると何故開かないのでしょうか？
そういうものなのでしょうか？
ちょっと不便ですね。

Excel単独で使用する場合は個人として使用する為に、個人用マクロブックが
有効になるかと思います。
VBからExcelを操作する場合は、不特定な人を対象にする場合が多いかと
思います。
その場合、貴方が作ったシステムの動作（キー）等が その個人用マクロブック
の操作と競合する可能性も起きてくるかと思います。
個人用マクロブックを使ったプログラムは、貴方個人用のプログラムと言う事
かと思います。他の機械で使用する場合は余程の注意が必要です。