戻る  □VBAのサロン  □ 使用方法  □ 新着記事  □ 新規に質問する!  □ トピック一覧  □ 検索  □ 過去ログ
[ 最新記事及び返信フォームをトピックトップへ ]
このトピック参照回数 :
和暦生年月日の一桁の場合、空欄にしたい

    [134517] 和暦生年月日の一桁の場合、空欄にしたい-

    ■親トピック/記事引用/メール受信=ON■

    □投稿者/ どう -(2024/06/01(11:58))
    □U R L/

       
       セル入力は、カッコ()で
       ユーザー定義を[$-ja-JP]ge.mm.dd

       S41.09.30 (1966/9/30)
       R05.03.16 (2023/3/16)
       H07.12.03 (1995/12/3)
      S35.01.09 (1960/1/9)

       上記の一桁の0ゼロを空欄で揃えたいのですが・・・
       方法を御教授お願いします。

       


      ++++++++++++++++++++
      OS      ⇒Windows 10
      Version⇒Excel 2010
      ++++++++++++++++++++




    [134518] Re[1]: 和暦生年月日の一桁の場合、空欄にしたい-

    記事引用/メール受信=OFF■

    □投稿者/ Mike -(2024/06/01(15:21))
    □U R L/
         A   B     C
      1 1966/9/30 → S41.09.30
      2 2023/3/16 → R05.03.16
      3 1995/12/3 → H07.12.03
      4 1960/1/9 → S35.01.09
      
      C1: =JIS(TEXT(A1,"gee"))&"."&JIS(TEXT(MONTH(A1),"00"))&"."&JIS(TEXT(DAY(A1),"00"))



      ++++++++++++++++++++
      OS      ⇒Windows 10
      Version⇒Excel 2019
      ++++++++++++++++++++




    [134519] Re[2]: 和暦生年月日の一桁の場合、空欄にしたい-

    記事引用/メール受信=OFF■

    □投稿者/ Mike -(2024/06/01(15:46))
    □U R L/
         A   B     C     D   E   F   G
      1 1966/9/30 → S41.09.30 → S41.09.30 → 1966/09/30
      2 2023/3/16 → R05.03.16 → R05.03.16 → 2023/03/16
      3 1995/12/3 → H07.12.03 → H07.12.03 → 1995/12/03
      4 1960/1/9 → S35.01.09 → S35.01.09 → 1960/01/09
      
      C1: =JIS(TEXT(A1,"gee"))&"."&JIS(TEXT(MONTH(A1),"00"))&"."&JIS(TEXT(DAY(A1),"00"))
      D1: =ASC(C1)
      G1: =C1*1 with 書式: yyyy/mm/dd



      ++++++++++++++++++++
      OS      ⇒Windows 10
      Version⇒Excel 2019
      ++++++++++++++++++++




    [134520] (削除)-

    記事引用/メール受信=OFF■

    □投稿者/ / -(2024/06/01(15:52))
    □U R L/

      この記事は削除されました




    [134521] (削除)-

    記事引用/メール受信=OFF■

    □投稿者/ / -(2024/06/01(15:56))
    □U R L/

      この記事は削除されました




    [134522] Re[5]: (削除)-

    記事引用/メール受信=OFF■

    □投稿者/ Mike -(2024/06/01(16:01))
    □U R L/
      [134519] Re[2]の一部訂正です。m(_._)m
      ↓
      E1: =ASC(C1)
      G1: =C1*1 with 書式: yyyy/mm/dd




    [134523] Re[6]: (削除)-

    記事引用/メール受信=OFF■

    □投稿者/ Mike -(2024/06/01(16:39))
    □U R L/
      余計なお世話かもは承知之助ですが、同じ西暦年で和暦元号が異なるリストです。
         A    B     C     D   E       F
      1 1912/7/29 → M45.07.29 → M45.07.29 → 1912/07/29
      2 1912/7/30 → T01.07.30 → T01.07.30 → 1912/07/30
      3 1926/12/24 → T15.12.24 → T15.12.24 → 1926/12/24
      4 1926/12/25 → S01.12.25 → S01.12.25 → 1926/12/25
      5  1989/1/7 → S64.01.07 → S64.01.07 → 1989/01/07
      6  1989/1/8 → H01.01.08 → H01.01.08 → 1989/01/08
      7 2019/4/30 → H31.04.30 → H31.04.30 → 2019/04/30
      8  2019/5/1 → R01.05.01 → R01.05.01 → 2019/05/01
      




    [134524] Re[7]: (削除)-

    記事引用/メール受信=OFF■

    □投稿者/ ねむねむ -(2024/06/03(09:29))
    □U R L/

      別セルに関数でよければ、元の値がA1セルにあるとして
      =TEXT(A1,"g")&TEXT(TEXT(A1,"ee"),"?0.")&TEXT(MONTH(A1),"?0.")&TEXT(DAY(A1),"?0")
      ではどうだろうか?

      もし全角表記にするのであれば
      =JIS(TEXT(A1,"g")&TEXT(TEXT(A1,"ee"),"?0.")&TEXT(MONTH(A1),"?0.")&TEXT(DAY(A1),"?0"))
      で。




    [134525] Re[8]: (削除)-

    記事引用/メール受信=OFF■

    □投稿者/ ねむねむ -(2024/06/03(09:32))
    □U R L/

      あとMikeさん、

      >上記の一桁の0ゼロを空欄で揃えたいのですが・・・

      S41.09.30 → S41. 9.30
      R05.03.16 → R 5. 3.16
      H07.12.03 → H 7.12. 3
      S35.01.09 → S35. 1. 9
      としたいということなのでは?




    [134526] Re[9]: 和暦生年月日の一桁の場合、空欄にしたい--

    解決!!ありがとうございました! / 記事引用/メール受信=OFF■

    □投稿者/ どう -(2024/06/03(10:21))
    □U R L/

       Mikeさん、ねむねむさん ありがとうございます。

       質問が上手くできておりませんで、分かりにくくご迷惑をお掛けいたしました。
       ねむねむさんの表示通りに、したかったのです。
       ねむねむさん、ありがとうございます。
       Mikeさんにも、いろんな事を教えていただき感謝です。

       お力添えくださり、誠にありがとうございます。
       
       




    [134527] Re[10]: 和暦生年月日の一桁の場合、空欄にしたい--

    記事引用/メール受信=OFF■

    □投稿者/ ねむねむ -(2024/06/03(10:47))
    □U R L/
      解決済みだが。
      
      条件付き書式での回答。
      まずセルの書式設定で表示形式を
      gee.mm.dd
      と設定する。
      
      次に条件付き書式の数式を使用して、書式設定するセルを決定で
      
      数式                                 表示形式
      =AND(LEN(TEXT(A1,"e"))=1,LEN(TEXT(A1,"m"))=1,LEN(TEXT(A1,"d"))=1)   g e. m. d
      
      =AND(LEN(TEXT(A1,"e"))=1,LEN(TEXT(A1,"m"))=1,LEN(TEXT(A1,"d"))=2)     g e. m.dd
      
      =AND(LEN(TEXT(A1,"e"))=1,LEN(TEXT(A1,"m"))=2,LEN(TEXT(A1,"d"))=1)     g e.mm. d
      
      =AND(LEN(TEXT(A1,"e"))=1,LEN(TEXT(A1,"m"))=2,LEN(TEXT(A1,"d"))=2)     g e.mm.dd
      
      =AND(LEN(TEXT(A1,"e"))=2,LEN(TEXT(A1,"m"))=1,LEN(TEXT(A1,"d"))=1)     gee. m. d
      
      =AND(LEN(TEXT(A1,"e"))=2,LEN(TEXT(A1,"m"))=1,LEN(TEXT(A1,"d"))=2)     gee. m.dd
      
      =AND(LEN(TEXT(A1,"e"))=2,LEN(TEXT(A1,"m"))=2,LEN(TEXT(A1,"d"))=1)     gee.mm. d
      と設定、ではどうだろうか?




    [134528] Re[11]: 和暦生年月日の一桁の場合、空欄にしたい--

    解決!!ありがとうございました! / 記事引用/メール受信=OFF■

    □投稿者/ どう -(2024/06/03(12:37))
    □U R L/

       ねむねむさん

       再度、条件付き書式 ありがとうございます。
       こちらも試します。
       私は、セルの消去をDeleteとBakeSpaceで消す場合の違い
       書式を残して消す方法が掴めず・・・恥ずかしいばかりです。
       どちらの方法を選択するかは、作業によってですね。
       関数と条件付き書式、勉強になります。
       もっともっと、エクセルを利用しようと思えました。
       感謝、感謝です。 ありがとうございます。      
                                 ―どう―

       




    [134529] Re[12]: 和暦生年月日の一桁の場合、空欄にしたい--

    記事引用/メール受信=OFF■

    □投稿者/ Mike -(2024/06/04(15:56))
    □U R L/
        A   B     C     D     E     F G  H  I  J  K  L  M  N  O
      1966/9/30 → S41.09.30 → S41. 9.30  01 02 03 04 05 06 07 08 09
      2023/3/16 → R05.03.16 → R 5. 3.16   1  2  3  4  5  6  7  8  9
      1995/12/3 → H07.12.03 → H 7.12. 3
       1960/1/9 → S35.01.09 → S35. 1. 9
      2019/4/30 → H31.04.30 → H31. 4.30
       2019/5/1 → R01.05.01 → R 1. 5. 1
      
      C1: =JIS(TEXT(A1,"gee"))&"."&JIS(TEXT(MONTH(A1),"00"))&"."&JIS(TEXT(DAY(A1),"00"))
      E1: =SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(SUBSTITUTE(JIS(TEXT(A1,"gee"))&"."&JIS(TEXT(MONTH(A1),"00"))&"."&JIS(TEXT(DAY(A1),"00")),G$1,G$2),H$1,H$2),I$1,I$2),J$1,J$2),K$1,K$2),L$1,L$2),M$1,M$2),N$1,N$2),O$1,O$2)



      ++++++++++++++++++++
      OS      ⇒Windows 10
      Version⇒Excel 2019
      ++++++++++++++++++++




    [134530] Re[13]: 和暦生年月日の一桁の場合、空欄にしたい--

    記事引用/メール受信=OFF■

    □投稿者/ Mike -(2024/06/04(16:05))
    □U R L/
      ちなみに、セル G2、 H2、 I2、 …、 O2  には
              _1、_2、_3、…、_9 
      をそれぞれ入力しています。_は全角スペースのことです。



このトピック内容の全ページ数 / [0]

このトピックに書きこむ
Name/
E-Mail/

└>このツリーのレス記事をメールで受信しますか? YES/ NO/
Title/
URL/
Comment/ 通常モード->  図表モード-> (←の場合適当に改行を入れて下さい)
タグが使用できます。例 ⇒ <font color="blue">文字</font>
解決!!ありがとうございました! 解決       保留中です・・・ 保留        迷宮入りorほかあたって見ます・・ 迷宮入       すいませ〜ん。誰か〜! Help! ←※回答者専用
解決したらチェック       保留(コードテスト中など・・)         解決不可orレスが全く付かなくてほかのサイトに行くときなど・・
削除キー/
(半角8文字以内) 


- Child Forum -
Edit:ゆう-G