Excel VBA質問箱 IV

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

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


4364 / 76735 ←次へ | 前へ→

【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

こんな方法があります。

3 hits

【77980】再び質問 勤怠システムを自作したい 16/2/22(月) 14:34 質問[未読]
【77983】Re:再び質問 ichinose 16/2/23(火) 8:28 発言[未読]
【77984】Re:再び質問 勤怠システムを自作したい 16/2/23(火) 12:06 発言[未読]
【77985】Re:再び質問 β 16/2/23(火) 19:24 発言[未読]
【77986】Re:再び質問 β 16/2/23(火) 19:52 発言[未読]
【77987】Re:再び質問 yuto 16/2/23(火) 20:16 発言[未読]
【77991】Re:再び質問 ichinose 16/2/24(水) 6:55 発言[未読]
【77992】Re:再び質問 β 16/2/24(水) 7:36 発言[未読]
【77993】Re:再び質問 勤怠システムを自作したい 16/2/24(水) 11:53 質問[未読]
【77994】Re:再び質問 ichinose 16/2/25(木) 2:11 発言[未読]
【78000】Re:再び質問 ichinose 16/2/28(日) 15:46 発言[未読]
【77999】Re:再び質問 β 16/2/27(土) 19:59 発言[未読]

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