サンプルコード1
1 2 3 4 5 6 7 | '生徒の情報を検索する Public Function SearchItemIndex(ByVal vID As String) As Variant SearchItemIndex = False If mItemDictionary.Exists(vID) Then SearchItemIndex = mItemDictionary.Item(vID) End If End Function |
1 2 3 4 5 6 7 | '生徒の情報を検索する Public Function SearchItemIndex(ByVal vID As String) As Variant SearchItemIndex = False If mItemDictionary.Exists(vID) Then SearchItemIndex = mItemDictionary.Item(vID) End If End Function |
Copyright© 集計用VBAサンプルコードをやさしく学ぼう , 2023 All Rights Reserved.