استفاده از Excel برای زمان بندی

Question

ممکن است بخواهید از Excel برای ثبت زمان سپری شده برای رویدادهای مختلف استفاده کنید. دو راه برای این کار وجود دارد: یا بومی، در اکسل یا با ماکرو.

اگر نمی خواهید از ماکرو استفاده کنید، می توانید به راحتی سه ستون را برای زمان بندی خود تنظیم کنید. ستون اول می تواند برای ثبت زمان شروع، ستون دوم زمان پایان، و ستون سوم زمان سپری شده (محاسبه با استفاده از فرمولی که زمان شروع را از زمان پایان کم می کند) استفاده شود. برای ثبت زمان، یک سلول را در ستون های زمان شروع یا پایان زمان انتخاب می کنید و Ctrl+Shift+: (نقطه دو نقطه) را فشار می دهید. اکسل زمان فعلی را در آن سلول وارد می کند.

اگر می خواهید از یک ماکرو استفاده کنید که به سادگی زمان سپری شده را برمی گرداند، می توانید از موارد زیر استفاده کنید:

Public Sub TimeIt()
    Dim vStartTime As Date

    vStartTime = Time
    MsgBox Prompt:="Press the button to end the timing" & vbCrLf _
      & "Timing started at " & Format(vStartTime, "hh:mm:ss"), _
      Buttons:=vbOKOnly, _
      Title:="Time Recording Macro"
    ActiveCell.Value = Time - vStartTime
End Sub

این ماکرو زمان شروع را ثبت می کند (در vStartTime)، و سپس یک جعبه پیام را نمایش می دهد. وقتی روی دکمه جعبه پیام کلیک می کنید، تفاوت بین زمان فعلی و زمان شروع در سلول فعلی ذخیره می شود. (شما باید مطمئن شوید که سلول فعلی با یکی از قالب های زمانی قالب بندی شده است.)

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

Global vStTime

Sub StartTiming()
    vStTime = Time
End Sub

Sub EndTiming()
    ActiveCell.Value = Time - vStTime
End Sub

شما به راحتی می توانید این دو ماکرو را به نوار ابزار دسترسی سریع یا به دکمه های مختلف نوار ابزار اختصاص دهید که به ترتیب فرآیند زمان بندی را شروع و متوقف می کنند.