Microsoft Access 掲示板
目次（索引）作成 / 18
39
コメント
views
5
フォロー
18
適当にエラーが出るプロパティを設定してみたら同じエラーメッセージ出ませんでした。多分原因は
ArrayListSort関数も省略しているので適当な場所に入れておいてください
こっちのほうですね。
完全なコピペ
で必要な関数を消してしまったんでしょう。開く時（Report_Open）ではArrayListSort()使ってないのでエラーメッセージが残念な感じですがよくあることなので・・・
通報 ...
先週金曜日から何とかご指摘を克服しようと努力はしましたが、今の知識では難しくお知恵を頂こうと思っていました。
13の完コピに、1のSub ArrayListSort以下を合体させたところ”薬品名のフリガナフィールドが見つかりません”とのメッセージに変わりました（前進ですか？）。レポートに「薬品名のフリガナ」がないのは気になっていたのですが、この点は如何でしょうか？
Sub ArrayListSort(ary As Variant)
Dim aryList As Object
Dim s
'// .NET FrameworkのArrayListクラスを利用する
Set aryList = CreateObject("System.Collections.ArrayList")
For Each s In ary
Call aryList.Add(s)
Next
Call aryList.Sort
ary = aryList.ToArray
End Sub