Excel VBA質問箱 IV

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

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


31260 / 76738 ←次へ | 前へ→

【50730】Re:Aの列に2000年1月1日から現在までの日付を入れたい
回答  Hirofumi  - 07/8/13(月) 10:20 -

引用なし
パスワード
   マクロの記録を少し直してこんなのでは?

Option Explicit

Public Sub Sample()

  Const dtmStart As Date = #1/1/2000#
  
  With ActiveSheet.Range("A1").Resize(, 2)
    .Value = Date
    .Cells(1).NumberFormatLocal = "yyyy/m/d"
    .Cells(2).NumberFormatLocal = "aaa"
    .DataSeries _
      Rowcol:=xlColumns, _
      Type:=xlChronological, _
      Date:=xlDay, _
      Step:=-1, _
      Stop:=CLng(#1/1/2000#), _
      Trend:=False
  End With
  
End Sub
0 hits

【50727】Aの列に2000年1月1日から現在までの日付を入れたい もりひでひさや 07/8/13(月) 0:43 質問
【50728】Re:Aの列に2000年1月1日から現在までの日付... かみちゃん 07/8/13(月) 0:50 発言
【50729】Re:Aの列に2000年1月1日から現在までの日付... もりひでひさや 07/8/13(月) 5:09 発言
【50731】Re:Aの列に2000年1月1日から現在までの日付... かみちゃん 07/8/13(月) 10:42 発言
【50730】Re:Aの列に2000年1月1日から現在までの日付... Hirofumi 07/8/13(月) 10:20 回答
【50732】Re:Aの列に2000年1月1日から現在までの日付... じゅんじゅん 07/8/13(月) 11:23 発言

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