Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4462 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【56513】米国式日付けをいれるには にしもり 08/6/19(木) 18:21 質問[未読]
【56515】Re:米国式日付けをいれるには マクロマン 08/6/19(木) 18:29 発言[未読]
【56516】Re:米国式日付けをいれるには マクロマン 08/6/19(木) 18:35 発言[未読]
【56517】Re:米国式日付けをいれるには kanabun 08/6/19(木) 18:58 発言[未読]
【56519】Re:米国式日付けをいれるには にしもり 08/6/19(木) 20:10 質問[未読]
【56520】Re:米国式日付けをいれるには kanabun 08/6/19(木) 21:00 発言[未読]
【56541】Re:米国式日付けをいれるには にしもり 08/6/20(金) 10:23 お礼[未読]
【56513】米国式日付けをいれるには
質問  にしもり  - 08/6/19(木) 18:21 -
引用なし
パスワード
   こんにちは。
E19に日付けを入れたいです。
しかも今日なら 06/19/08　と米国式で。
下記のようにしたけどだめでした。

　　Range("E19").Select
　　ActiveCell.FormulaR1C1 = today

どうすればよろしいでしょうか。
市販本にはのっていませんでした。
【56515】Re:米国式日付けをいれるには
発言  マクロマン  - 08/6/19(木) 18:29 -
引用なし
パスワード
   セルの書式設定で設定するか、Format関数で設定します。
>セルの書式設定
こちらもVBAで設定できます。
マクロの自動記録が参考になると思います。
【56516】Re:米国式日付けをいれるには
発言  マクロマン  - 08/6/19(木) 18:35 -
引用なし
パスワード
   >Format関数で設定します。

こちらはうまくいかないようです。
2008/6/19
となってしまいますね。
失礼しました。
【56517】Re:米国式日付けをいれるには
発言  kanabun  - 08/6/19(木) 18:58 -
引用なし
パスワード
   ▼にしもり さん：

>しかも今日なら 06/19/08　と米国式で。

マクロの記録ですが
　　Selection.NumberFormatLocal = "m/dd/yy;@"
ではどうですか？
【56519】Re:米国式日付けをいれるには
質問  にしもり  - 08/6/19(木) 20:10 -
引用なし
パスワード
   ▼kanabun さん、マクロマンさん：
ありがとうございます。　

Range("E19").Select
ActiveCell.FormulaR1C1 = Format(Now(), "m/dd/yy;@")

これだとまだ2008/06/19になってしまいます。

Selection.NumberFormatLocal = "m/dd/yy;@"
をどのように使えばよろしいのですか。
【56520】Re:米国式日付けをいれるには
発言  kanabun  - 08/6/19(木) 21:00 -
引用なし
パスワード
   ▼にしもり さん：
>
>Range("E19").Select
>ActiveCell.FormulaR1C1 = Format(Now(), "m/dd/yy;@")
>
>これだとまだ2008/06/19になってしまいます。

こう？ かな？

　With Range("E19")
　　.NumberFormatLocal = "mm/dd/yy;@"
　　.Value = Date
　End With
【56541】Re:米国式日付けをいれるには
お礼  にしもり  - 08/6/20(金) 10:23 -
引用なし
パスワード
   ▼kanabun さん：
できました！
どうもありがとうございました。
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
4462 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free