ループ ループ(Do_While_Loop)の記述

VB&VBA
FROG ふろっぐ
 
  • オプション

    本文印刷

    お気に入りに追加

  • 検索

    Googlewwwjp-ia
     

    Googlewwwjp-ia
     
  • 情報

  • 関連

[VB&VBA][ループ ループ(Do_While_Loop)の記述]
 
Do While DateSerial(dateYearMax, dateMonthMax, dateDayMax) + 1 > dateKariDate

dateKariDate = CDate(dateKariDate) + 1

With shtWork
 rngA = rngA + 1
 .Range("k" & rngA).Value = dateKariDate
End With

Loop 





Production Japan Import Application. Since 1998