Excel VBA質問箱 IV

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

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


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

4363 / 76734

←次へ　｜　前へ→


	【77994】Re:再び質問

ichinose - 16/2/25(木) 2:11 -


	引用なし

	パスワード

一例です。

新規ブックにて

標準モジュールに

Sub mk_sample()
　　With Range("a1:b10")
　　　 .Formula = Array("=datevalue(""2016/2/1"")+row()-1", "=char(64+row())")
　　　 .Value = .Value
　　End With
End Sub

上記のmk_sampleで作成したデータを日付で検索することを考えると・・・、

Sub test()
　　MsgBox Application.VLookup("2016/2/5", Range("a1:b10").Value, 2, False)
　　MsgBox Evaluate("vlookup(datevalue(""2016/2/6""),a1:b10,2,false)")
End Sub

こんな方法があります。

9 hits

▼

【77980】再び質問 勤怠システムを自作したい 16/2/22(月) 14:34