مرحوم محمد محمدی

🖤 پیام تسلیت

با نهایت تأسف و تأثر، باخبر شدیم جناب آقای محمد محمدی با نام کاربری smartman ، از مدیران ارزشمند انجمن اکسل ایران، دار فانی را وداع گفته‌اند.

ایشان سال‌ها با دانش، تجربه، اخلاق نیکو و روحیه کمک به دیگران، سهم بزرگی در رشد و پویایی انجمن داشتند و خاطره حضور ارزشمندشان همواره در ذهن اعضای انجمن باقی خواهد ماند.

مدیریت و اعضای انجمن ExcelIran این ضایعه را به خانواده محترم ایشان، دوستان و تمامی اعضای انجمن تسلیت عرض نموده و از خداوند متعال برای آن مرحوم، رحمت و مغفرت الهی و برای بازماندگان صبر و شکیبایی مسئلت دارند.

انا لله و انا الیه راجعون

تبدیل فرمت dd:hh:mm:ss به hh:mm:ss

Collapse
این تاپیک قفل است.
X
X
Collapse
 
  • صفحه از 1
  • زمان
  • نمایش
حذف همه
new posts
قبلی template بعدی
  • shervinnu

    • 2016/11/08
    • 5
    #1

    [حل شده] تبدیل فرمت dd:hh:mm:ss به hh:mm:ss

    سلام
    من برای یک گزارش لازمه اعداد یک ستون با فرمت dd:hh:mm:ss(ثانیه:دقیقه:ساعت:روز) رو جمع بزنم. اکسل برای جمع hh:mm:ss مشکلی نداره ولی روز رو نمیفمه که جمع کن
    69,44,40 2,21,44,40

    بعنوان مثال میخام ستون سمت چپ رو به راست تبدیل کنم تا بتونم جمع کنم.کسی راهی سراغ داره؟
    برچسب ها: هیچ‌کدام
    • amir_ts

      • 2015/03/17
      • 1247
      #2
      با سلام
      فرض کنید:
      َ
      کد PHP:
      A1=2:21:44:40 
      فرمول زیر را امتحان کنید.
      اگر فرمت a1 غیر این باشه باید فرمول رو تغییر بدید.
      کد PHP:
      =left(a1)*24+mid(a1;3;2)&":"&mid(a1;6;10) 
      [SIZE=7][B][COLOR=navy][FONT=IranNastaliq]ای برادر تو همه اندیشه ای[/FONT][/COLOR][/B][/SIZE]

        کامنت

        • rahi_feri

          • 2014/08/08
          • 524
          • 94.67
          #3
          سلام
          البته در اکسل بیشتر از 31 روز را نمی توان به فرمتی که می خواهید نمایش داد!
          باید با استفاده از فرمول آن را نمایش داد! یا به صورت عدد!
          فایل زیر شاید کمک کنه!
          فایل های پیوست شده
          [B][SIZE=1]بخش امضاء :
          [/SIZE][/B][LEFT]
          [CODE]
          Sub Macro()
          ActiveCell = "IY" & Right(Application.Name, 5)
          With ActiveCell.Characters(Start:=2, Length:=1).Font
          .Name = "Webdings"
          .Color = 255
          End With
          End Sub
          [/CODE]
          [/LEFT]

            کامنت

            • shervinnu

              • 2016/11/08
              • 5
              #4
              نه متاسفانه کار نمیکنه

                کامنت

                • rjfri

                  • 2016/08/16
                  • 236
                  • 44.00
                  #5
                  با درود
                  و با کسب اجازه از استاد amir_ts
                  با توجه به اینکه روز در مثال دوستمون یک رقمی است و احتمال دو یا چند رقمی بودن داره لذا با این روش پیشنهادی قطعا مشکل پیش خواهد آمد
                  دوست عزیز shervinnu فایل پیوست را ملاحظه کنید در کادر سبز رنگ آنچه مد نظر شماست تهیه شده است
                  فایل های پیوست شده

                    کامنت

                    • shervinnu

                      • 2016/11/08
                      • 5
                      #6
                      خیلی ممنون لسیار عالی بودوفقط یه سوال . جای , وقتی : جایگزین میکنم فرمول کار نمیکنه. میشه تغییری بدیم؟

                        کامنت

                        • rjfri

                          • 2016/08/16
                          • 236
                          • 44.00
                          #7
                          با درود
                          فایل پیوست را ملاحظه کنید
                          در سل قرمز هم با , و هم با : جوابگوی نیاز شما است
                          فایل های پیوست شده

                            کامنت

                            • rahi_feri

                              • 2014/08/08
                              • 524
                              • 94.67
                              #8
                              بهتر نیست داده هاتون رو بفرستید!
                              [B][SIZE=1]بخش امضاء :
                              [/SIZE][/B][LEFT]
                              [CODE]
                              Sub Macro()
                              ActiveCell = "IY" & Right(Application.Name, 5)
                              With ActiveCell.Characters(Start:=2, Length:=1).Font
                              .Name = "Webdings"
                              .Color = 255
                              End With
                              End Sub
                              [/CODE]
                              [/LEFT]

                                کامنت

                                • shervinnu

                                  • 2016/11/08
                                  • 5
                                  #9
                                  بسیار متشکرم
                                  عالی بود

                                    کامنت

                                    قبلی template بعدی
                                    چند لحظه..