تبدیل تاریخی مثل 1397/1/1 به 1397/01/01

Collapse
X
 
  • زمان
  • نمایش
حذف همه
new posts
  • sepiiid
    • 2018/08/09
    • 2

    پرسش تبدیل تاریخی مثل 1397/1/1 به 1397/01/01

    سلام دوستان
    من یه ستون تاریخ شمسی دارم که فرمتش date نیست و تاریخایی که توش هست، اگر مثلا ماه یا روز یک رقمی هستن قبلشون صفر نداره،یعنی به صورت مثلا 1397/1/3 هست، الان من میخوام یه کاری کنم که برای سلول هایی که ماه یا روزشون تک رقمی هست یه صفر بیاد قبلشون. راه هایی رو برای رسیدن به نتیجه امتحان کردم که در نهایت به فرمول های طولانی و گیج کننده منتهی میشد. میخواستم ببینم آیا راه ساده ای برای این کار وجود داره؟ ممنون
  • Amir Ghasemiyan

    • 2013/09/20
    • 4599
    • 100.00

    #2
    سلام دوست عزیز
    اگر بخواید میشه با vba خیلی راحت این کار رو کرد
    کد:
    Sub fix_date()
    d = Split(Range("A1"), "/")
    For i = LBound(d) To UBound(d)
        If Len(d(i)) < 2 Then d(i) = "0" & d(i)
    Next i
    Range("A1") = Join(d, "/")
    End Sub

    کامنت

    • sepiiid
      • 2018/08/09
      • 2

      #3
      نوشته اصلی توسط Amir Ghasemiyan
      سلام دوست عزیز
      اگر بخواید میشه با vba خیلی راحت این کار رو کرد
      کد:
      Sub fix_date()
      d = Split(Range("A1"), "/")
      For i = LBound(d) To UBound(d)
          If Len(d(i)) < 2 Then d(i) = "0" & d(i)
      Next i
      Range("A1") = Join(d, "/")
      End Sub
      ممنون،ولی من میخوام با توابع اکسل این کار رو انجام بدم

      کامنت

      • Amir Ghasemiyan

        • 2013/09/20
        • 4599
        • 100.00

        #4
        نوشته اصلی توسط sepiiid
        ممنون،ولی من میخوام با توابع اکسل این کار رو انجام بدم

        کوتاه ترین فرمولی که به ذهنم رسید این هست منتها خیلی هم کوتاه نیست

        کد:
        =CONCATENATE(LEFT(K5,FIND("/",K5)-1),"/",TEXT(SUBSTITUTE(MID(K5,FIND("/",K5)+1,2),"/",""),"00"),"/",TEXT(--RIGHT(SUBSTITUTE(K5,"/","    "),2),"00"))

        کامنت

        چند لحظه..