Excel VBA質問箱 IV

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

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


48590 / 76732 ←次へ | 前へ→

【33077】Re:ある条件のセルを選択
発言  ponpon  - 06/1/2(月) 0:39 -

引用なし
パスワード
   こんばんは。
参考になれば。excel2003(WINxp)、excel2002(WIN2K)で確認

Sheet1のA列にある日付をSheet2のA列にカットペースト

Sub test()
  Dim X As Range, Y As Range
  Dim A As Date, B As Date
  
  With Sheets("Sheet1")
'   A = #1/1/2005#
    A = "2005/1/1"
'   B = #12/1/2005#
    B = "2005/12/1"
    Set X = .Range("A:A").Find(what:=A, LookAt:=xlWhole)
    Set Y = .Range("A:A").Find(what:=B, LookAt:=xlWhole)
    .Range(X, Y).Cut Sheets("Sheet2").Range("A1")
  End With
End Sub

0 hits

【33065】ある条件のセルを選択 サザエ 06/1/1(日) 18:20 質問
【33067】Re:ある条件のセルを選択 やっちん 06/1/1(日) 19:56 発言
【33070】Re:ある条件のセルを選択 サザエ 06/1/1(日) 21:43 発言
【33068】Re:ある条件のセルを選択 ponpon 06/1/1(日) 20:18 発言
【33069】Re:ある条件のセルを選択 サザエ 06/1/1(日) 21:35 発言
【33071】Re:ある条件のセルを選択 サザエ 06/1/1(日) 23:00 発言
【33073】Re:ある条件のセルを選択 やっちん 06/1/1(日) 23:08 発言
【33074】Re:ある条件のセルを選択 サザエ 06/1/1(日) 23:38 発言
【33075】Re:ある条件のセルを選択 やっちん 06/1/2(月) 0:01 発言
【33076】Re:ある条件のセルを選択 サザエ 06/1/2(月) 0:33 お礼
【33077】Re:ある条件のセルを選択 ponpon 06/1/2(月) 0:39 発言

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