Excel VBA質問箱 IV

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

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

  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13042 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
▼ 【7271】日付入力について hisao 03/8/29(金) 12:08 質問
【7272】Re:日付入力について INA 03/8/29(金) 12:59 回答
【7319】Re:日付入力について hisao 03/9/2(火) 14:49 お礼
【7273】Re:日付入力について こうちゃん 03/8/29(金) 13:00 回答
【7271】日付入力について
質問  hisao E-MAIL  - 03/8/29(金) 12:08 -
引用なし
パスワード
   教えてください。
例えば　A1及びA2セルに　それぞれ　H15/08/01,H15/08/31 の日付が入っていたとします。
A3=A1 & "〜" & A2 とすると　A3の日付が整数〜整数の表示になります。
H15/8/1〜H15/8/31 と表示出来ないでしょうか。
【7272】Re:日付入力について
回答  INA  - 03/8/29(金) 12:59 -
引用なし
パスワード
   ＶＢＡの掲示板なので、コードで書いておきます。

Private Sub CommandButton1_Click()
　Range("A3").Value = Range("A1").Text & "〜" & Range("A2").Text
End Sub
【7273】Re:日付入力について
回答  こうちゃん E-MAIL  - 03/8/29(金) 13:00 -
引用なし
パスワード
   hisaoさん、こんにちは

>例えば　A1及びA2セルに　それぞれ　H15/08/01,H15/08/31 の日付が入っていたとします。
>A3=A1 & "〜" & A2 とすると　A3の日付が整数〜整数の表示になります。
>H15/8/1〜H15/8/31 と表示出来ないでしょうか。

一般機能でいいんですよね？これでどうでしょう？
=(TEXT(A1,"ge/m/d") & "〜" & TEXT(B1,"ge/m/d"))
【7319】Re:日付入力について
お礼  hisao E-MAIL  - 03/9/2(火) 14:49 -
引用なし
パスワード
   ▼INA さん：
有難う御座いました

>ＶＢＡの掲示板なので、コードで書いておきます。
>
>Private Sub CommandButton1_Click()
>　Range("A3").Value = Range("A1").Text & "〜" & Range("A2").Text
>End Sub
  新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム  
13042 / 13644 ﾂﾘｰ ←次へ　｜　前へ→
ページ：  ┃  記事番号：
2610219
(SS)C-BOARD v3.8 is Free