Excel VBA質問箱 IV

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

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


64004 / 76738 ←次へ | 前へ→

【17319】何度もすみません・・・
質問  karakol  - 04/8/26(木) 22:52 -

引用なし
パスワード
   ご回答、今回も頂きまして、ありがとうございました。
頂いてからずっと試しているのですが、
まだうまく動きません。

頂いたものを参考に、下記のように記述したのですが・・・
(随分と短くなってしまいました)

  Dim WS1     As Worksheet
  Dim Mydate   As Date

  Set WS1 = Worksheets("sheet1")

  Mydate = DateAdd("q", 2, WS1.Cells(1, 1).Value) - 1
  WS1.Cells(1, 2) = Mydate

「型が一致しません」
と表示されてしまいます。

まだ、どうもよく分からないのですが、
Date
という型は、例えば
20040826
とか
040826
とか、あるいは
082604
等とセルに書かれていた場合、上記のように任意の名前
(例えばMydate等)に、特になにも指定しなくても、
「これは日付のことだな」と判断して、
取得し、格納してくれるものなのでしょうか?
前回の長ったらしくなってしまったマクロは
そういったところが分からず、どうにかして
#mm/dd/yy#
の形にもっていこうとしていたのですが・・・。

また、上記がどうして動かないのかも、
何を調べてみても、よく分からないんです。

それと、numberを6に修正、とありましたが、
2
でも
18
でもなく、
6
でよろしいんですか?


何度も投稿して恐縮ですが、お返事お待ちしております。

0 hits

【17255】一年半後の日付を取得する方法 karakol 04/8/25(水) 22:07 質問
【17257】Re:一年半後の日付を取得する方法 ちゃっぴ 04/8/25(水) 22:11 回答
【17309】DateAdd関数を使ってみたのですが・・・ karakol 04/8/26(木) 19:10 質問
【17316】Re:DateAdd関数を使ってみたのですが・・・ ちゃっぴ 04/8/26(木) 21:39 回答
【17317】Re:DateAdd関数を使ってみたのですが・・・ Asaki 04/8/26(木) 21:42 回答
【17318】Re:DateAdd関数を使ってみたのですが・・・ ちゃっぴ 04/8/26(木) 22:09 発言
【17319】何度もすみません・・・ karakol 04/8/26(木) 22:52 質問
【17322】Re:何度もすみません・・・ ちゃっぴ 04/8/26(木) 23:07 回答
【17323】Re:何度もすみません・・・ Asaki 04/8/26(木) 23:10 回答
【17325】できました! karakol 04/8/26(木) 23:57 お礼

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