Excel VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちら をご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


38941 / 76732 ←次へ | 前へ→

【42915】Re:自作関数にヘルプを追加したい
回答  りん@通りすがり  - 06/9/25(月) 12:56 -

引用なし
パスワード
   村長 さん、こんにちわ。

アドインを作成する場合、組み込まれたままエクセルを起動したときにエラーになるので、ちょっと修正。

↓標準モジュールへ
Function AAAAA() As String
  '関数の挿入ダイアログで、全て表示にしたときに一番上になる名前
  AAAAA = Format(Date, "ggge年m月d日")
End Function

↓Thisworkbookへ
Private Sub Workbook_Open()
  With Application
    If .Workbooks.Count = 0 Then .Workbooks.Add  'エラー回避のため
    '関数の挿入ダイアログに新しいカテゴリで追加
    .MacroOptions Macro:=.ThisWorkbook.Name & "!AAAAA", _
       Description:="今日の日付を和暦文字列で返します", _
       Category:="自作関数なのよ", _
       HelpFile:=.ThisWorkbook.Path & .PathSeparator & "Project1.hlp"
  End With
End Sub

アドインと同じフォルダにヘルプファイルを入れておけば、ちゃんと表示されました。
2 hits

【42814】自作関数にヘルプを追加したい 村長 06/9/22(金) 17:41 質問
【42850】Re:自作関数にヘルプを追加したい りん 06/9/23(土) 11:31 回答
【42905】Re:自作関数にヘルプを追加したい 村長 06/9/25(月) 10:03 質問
【42910】Re:自作関数にヘルプを追加したい りん@通りすがり 06/9/25(月) 11:51 回答
【42915】Re:自作関数にヘルプを追加したい りん@通りすがり 06/9/25(月) 12:56 回答
【42927】Re:自作関数にヘルプを追加したい 村長 06/9/25(月) 17:33 お礼

38941 / 76732 ←次へ | 前へ→
ページ:  ┃  記事番号:
2610219
(SS)C-BOARD v3.8 is Free