में मिलीसेकंड प्रदर्शित करें मैं एक्सेल मैक्रो में मिलीसेकंड प्रदर्शित करने की कोशिश कर रहा हूं। मेरे पास पूर्णांक का एक स्तंभ है जो मिलीसेकंड में बस टाइमस्टैम्प हैं (उदाहरण के लिए 28095200 7: 48: 15.200 बजे है), और मैं इसके आगे एक नया कॉलम बनाना चाहता हूं जो चलने वाले औसत को बनाए रखता है और "एचएच: मिमी में समय प्रदर्शित करता है : एस .000 "प्रारूप। मैंने कई अलग-अलग मार्गों की कोशिश की है, लेकिन मुझे अजीब चीजें होने के बिना मिलीसेकंड नहीं मिल सकता है। ,एक्सेल
Dim Cel As Range
Set Cel = Range("B1")
temp = Application.Average(Range("A1:A2"))/1000
ms = Round(temp - Int(temp), 2) * 1000
Cel.Value = Strings.Format((temp/60/60/24), "hh:mm:ss") _
& "." & Strings.Format(ms, "#000")
किसी कारण से यह केवल प्रदर्शित करता है:
यहाँ है कि मैं क्या अभी है "मिमी: ss.0" सेल में। फिर भी जब मैं सेल पर क्लिक करता हूं, तो यह सूत्र बार में "एचएच: मिमी: एसएस" दिखाता है। सेल में घंटों क्यों गुम हैं?
इसके अलावा, एक और अजीब बात यह होती है कि अगर मैं Strings.Format(ms, "#000.") पर अंतिम पंक्ति बदलता हूं, तो मुझे "hh: mm: ss.000" मिलता है। यही वह है जो मैं चाहता हूं, अतिरिक्त अवधि नहीं।
यय! लेकिन क्या कोड में ऐसा करने का कोई तरीका है? अब जब भी मैं मैक्रो चलाता हूं, स्वरूपण रीसेट हो जाता है। (क्योंकि मैं मैक्रो में शीट को हटा रहा हूं और पुनर्निर्माण कर रहा हूं।) Cel.EntireRow.NumberFormat = "[h]: mm: ss.000" लेकिन उसने मुझे सेल में "######" दिया। – Evelyn
@Evelyn - 3 चीजें: 1) मैंने कोड प्रारूप को सेट करने के लिए आवश्यक कोड जोड़ा है। 2) सुनिश्चित करें कि आपका कॉलम पूरे स्वरूपित पाठ को फिट करने के लिए पर्याप्त है। ऊपर मेरा नोट देखें। 3) गिल्बर्ट के जवाब देखें और 'राउंड' समारोह में '3' के उपयोग पर ध्यान दें। यह सुनिश्चित करता है कि आपको केवल 2 के बजाय 3 दशमलव स्थान प्राप्त हों। –
आह! तुम सही हो। मुझे बस कॉलम को चौड़ा करने की जरूरत है। इसके अलावा, मैं केवल इस मामले में 2 की सटीकता चाहता था। मैं बस इसे 3 के लिए स्वरूपित करना चाहता था। मदद के लिए बहुत बहुत धन्यवाद! – Evelyn