Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1938 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【71011】(Now, "Long Date")形式 ｸﾘｼｭﾌｧｰ 12/1/25(水) 21:41 質問[未読]
【71015】Re:(Now, "Long Date")形式 kanabun 12/1/26(木) 9:25 発言[未読]
【71022】Re:(Now, "Long Date")形式 ｸﾘｼｭﾌｧｰ 12/1/26(木) 14:17 お礼[未読]
【71011】(Now, "Long Date")形式
質問  ｸﾘｼｭﾌｧｰ  - 12/1/25(水) 21:41 -
引用なし
パスワード
   よろしくお願いいたします
コマンドボタンを押したときに（CommandButton1_Click()）
Sheet2.Range("C6:AG19")のセルに(Now, "Long Date")形式で表示させるにはどうしたらよろしいでしょうか

よろしくお願いいたします
【71015】Re:(Now, "Long Date")形式
発言  kanabun  - 12/1/26(木) 9:25 -
引用なし
パスワード
   ▼ｸﾘｼｭﾌｧｰ さん：おじゃまします

>Sheet2.Range("C6:AG19")のセルに(Now, "Long Date")形式で表示させる
>には
質問がよくわかりません。
なので、２つ考えられることを。

(参考1) セルに 今の日時を "long date" 形式で書き込む
　　Range("A1").Value = Format$(Now(), "long date")
　　⇒ [A1] セルには 「2012年1月26日」が表示されます。

（参考2 ）セルに 数式で NOW()関数を埋め込み、そのセルの「表示形式」を
　　「日付 - 長い日付の形式」とする　（Excel2010 で記録したもの）
　　With Range("B1")
　　　　.Formula = "=NOW()"
　　　　.NumberFormatLocal = "[$-F800]dddd, mmmm dd, yyyy"
　End With

どちらか が 参考になるかと？
【71022】Re:(Now, "Long Date")形式
お礼  ｸﾘｼｭﾌｧｰ  - 12/1/26(木) 14:17 -
引用なし
パスワード
   ▼kanabun さん：


>
>(参考1) セルに 今の日時を "long date" 形式で書き込む
>　　Range("A1").Value = Format$(Now(), "long date")
>　　⇒ [A1] セルには 「2012年1月26日」が表示されます。
>
上記でできましたありがとうございます
また　よろしくお願いいたします
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
1938 / 13658 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free