質問編集履歴
3
説明文変更
test
CHANGED
@@ -1 +1 @@
|
|
1
|
-
vba
|
1
|
+
vba 時刻の検索をしたい。
|
test
CHANGED
File without changes
|
2
誤字
test
CHANGED
File without changes
|
test
CHANGED
@@ -18,11 +18,11 @@
|
|
18
18
|
|
19
19
|
リストボックスの値【日付,時刻,ID,セルのaddress,選択されたlistboxのindex】を配列に格納し、それを引数(num2)とした関数を作っています。
|
20
20
|
|
21
|
-
そして、num2(0)の日付(令和3年7月
|
21
|
+
そして、num2(0)の日付(令和3年7月5日のような表記)とnum(1)の時刻(12:00のような表記)はString型だと思うので、CDateで変換し、match関数で検索するということをしています。
|
22
22
|
|
23
|
-
日付は、7月
|
23
|
+
日付は、7月5日からエンドレスに作成してあり、時刻は、12:10~16:00まで10分刻みで作成しています。
|
24
24
|
|
25
|
-
検索したい箇所は、それぞれ日付(7月
|
25
|
+
検索したい箇所は、それぞれ日付(7月5日のような表記)はsheet2の9行目、時刻(12:00のような表記)はsheet2のC列(9~80行)です。
|
26
26
|
|
27
27
|
sheet2の時刻9行~80行は、「12:10, 12:10, 12:10, 12:20, 12:20, 12:20, ・・・, 16:00, 16:00, 16:00」というように同じ時刻を3回ずつ表記してあり、初めにmatchした値(行番号)を取得できれば良いです。
|
28
28
|
|
1
画像の追加
test
CHANGED
File without changes
|
test
CHANGED
@@ -137,3 +137,27 @@
|
|
137
137
|
|
138
138
|
|
139
139
|
### 補足情報(FW/ツールのバージョンなど)
|
140
|
+
|
141
|
+
ユーザーフォームのリストボックスはこんな感じです。
|
142
|
+
|
143
|
+
num2(0)に日付
|
144
|
+
|
145
|
+
num2(1)に時刻
|
146
|
+
|
147
|
+
num2(2)にID
|
148
|
+
|
149
|
+
num2(3)に選択されたIDが位置するsheet1のaddress(画像では非表示)
|
150
|
+
|
151
|
+
num2(4)に選択されたリストボックスのindex(画像では非表示)
|
152
|
+
|
153
|
+
![ユーザフォームのリストボックス](f3293edf6590c2d775e8522e131ed0c8.png)
|
154
|
+
|
155
|
+
|
156
|
+
|
157
|
+
sheet2はこのような表示になっています。
|
158
|
+
|
159
|
+
![sheet2](c777570d67b104f511fa224bda49a412.png)
|
160
|
+
|
161
|
+
|
162
|
+
|
163
|
+
説明下手で申し訳ございませんが、何卒よろしくお願い致します。
|