صفحه 1 از 2 12 آخرینآخرین
نمایش نتایج: از شماره 1 تا 10 , از مجموع 12

موضوع: ثبت خودکار تاریخ و ساعت

  1. #1


    آخرین بازدید
    2015/12/15
    تاریخ عضویت
    October 2012
    نوشته ها
    6
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    ثبت خودکار تاریخ و ساعت

    با سلام و خسته نباشید:

    در اکسل فرمی درست کردم برای ورود و خروج و محاسبه ساعات کار افراد.

    مشکلم اینه که می خوام به محض اینکه افراد کارت پرسنلی شونو جلوی بارکد اسکنر بگیرند در یک

    سل که شماره پرسنلی شون ثبت شد در سل دیگر تاریخ و زمان به صورت اتوماتیک ثبت شود.

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

  2.  

  3. #2


    آخرین بازدید
    2013/02/23
    تاریخ عضویت
    January 2011
    نوشته ها
    36
    امتیاز
    3
    سپاس
    0
    سپاس شده
    6 در 4 پست
    تعیین سطح نشده است

    RE: ثبت خودکار تاریخ و ساعت

    نقل قول نوشته اصلی توسط mstfatata
    با سلام و خسته نباشید:

    در اکسل فرمی درست کردم برای ورود و ---وج و محاسبه ساعات کار افراد.

    مشکلم اینه که می خوام به محض اینکه افراد کارت پرسنلی شونو جلوی بارکد اسکنر بگیرند در یک

    سل که شماره پرسنلی شون ثبت شد در سل دیگر تاریخ و زمان به صورت اتوماتیک ثبت شود.

    با تشکر
    با زدن ctrl و F11 به قسمت ویژوال بیسیک اکسل وارد شوید و بر روی شیت مورد نظر دابل کلیک کرده و کدهای زیر را کپی پیست نمایید
    کد PHP:
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim c As Range
    For Each c In Range("a2:a10000")
    If 
    <> "" And c.Offset(01) = "" Then
    c
    .Offset(01) = Now()
    c.Offset(10).Select
    Exit Sub
    End 
    If
    Next
    End Sub 

  4. سپاس ها (1)


  5. #3


    آخرین بازدید
    2015/12/15
    تاریخ عضویت
    October 2012
    نوشته ها
    6
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    RE: ثبت خودکار تاریخ و ساعت

    [quote=morteza2006]

    با زدن ctrl و F11 به قسمت ویژوال بیسیک اکسل وارد شوید و بر روی شیت مورد نظر دابل کلیک کرده و کدهای زیر را کپی پیست نمایید
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim c As Range
    For Each c In Range("a2:a10000")
    If c <> "" And c.Offset(0, 1) = "" Then
    c.Offset(0, 1) = Now()
    c.Offset(1, 0).Select
    Exit Sub
    End If
    Next
    End Sub
    خییییییییییییلللللللللللل للییییییییییییییی ممممممممممنننننننننوووووو وووننننننننننن :D



  6. #4


    آخرین بازدید
    2015/12/15
    تاریخ عضویت
    October 2012
    نوشته ها
    6
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    RE: ثبت خودکار تاریخ و ساعت

    با سلام مجدد و تشکر از کمکتون

    کد بالا تاریخ و ساعت و داخل یک سل وارد می کنه من می خوام تاریخ داخل یک سل و ساعت هم داخل سل دیگه ثبت بشه.

    مشکل دیگم اینه که کاربرها بعد از ثبت کد پرسنلی نتونن هیچ تغییری توی سلهای ثبت شده بدن.

    ممنون می شم اگه کمکم کنید.

  7. #5


    آخرین بازدید
    2013/02/23
    تاریخ عضویت
    January 2011
    نوشته ها
    36
    امتیاز
    3
    سپاس
    0
    سپاس شده
    6 در 4 پست
    تعیین سطح نشده است

    RE: ثبت خودکار تاریخ و ساعت

    نقل قول نوشته اصلی توسط mstfatata
    با سلام مجدد و تشکر از کمکتون

    کد بالا تاریخ و ساعت و داخل یک سل وارد می کنه من می خوام تاریخ داخل یک سل و ساعت هم داخل سل دیگه ثبت بشه.

    مشکل دیگم اینه که کاربرها بعد از ثبت کد پرسنلی نتونن هیچ تغییری توی سلهای ثبت شده بدن.

    ممنون می شم اگه کمکم کنید.
    دوست عزیز ستون b رو سلکت کن و روی منطقه آبی رنگ کلیک راست کن و format cells رو انتخاب کن گزینه custom را انتخاب کن و در قسمت در قسمت type به جای general کد زیر رو بنویس
    yyyy/mm/dd
    ستون c رو هم به همین ترتیب اما در قسمت type کد زیر رو بنویس
    hh:mm
    سپس کد های زیر رو در قسمت ویژوال در شیت مربوطه کپی کن
    کد PHP:
    [Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim c As Range
    For Each c In Range("a2:a10000")
    If 
    <> "" And c.Offset(01) = "" Then
    c
    .Offset(01) = Now()
    c.Offset(02) = Now()
    c.Offset(10).Select
    Exit Sub
    End 
    If
    Next
    On Error Resume Next
    If Target <> "" Then
    Cells
    .Find(What:=""After:=ActiveCellLookIn:=xlFormulasLookAt:= _
    xlPart
    SearchOrder:=xlByRowsSearchDirection:=xlNextMatchCase:=False _
    SearchFormat:=False).Activate
    End 
    If
    End Sub 
    امیدوارم کامل گفته باشم

  8. سپاس ها (2)


  9. #6


    آخرین بازدید
    2022/12/05
    تاریخ عضویت
    October 2011
    محل سکونت
    مشهد
    نوشته ها
    4,374
    امتیاز
    12614
    سپاس
    4,596
    سپاس شده
    11,990 در 3,203 پست
    سطح اکسل
    70.00 %

    RE: ثبت خودکار تاریخ و ساعت

    کد رو به شکل زیر تغییر بده
    [align=left]
    کد PHP:
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim c As Range
    For Each c In Range("a2:a10000")
    If 
    <> "" And c.Offset(01) = "" Then
    c
    .Offset(01) = Time
    c
    .Offset(02) = Date
    c
    .Offset(10).Select
    Exit Sub
    End 
    If
    Next
    End Sub 
    [/align]

  10. سپاس ها (1)


  11. #7


    آخرین بازدید
    2015/12/15
    تاریخ عضویت
    October 2012
    نوشته ها
    6
    امتیاز
    1
    سپاس
    0
    سپاس شده
    1 در 1 پست
    تعیین سطح نشده است

    RE: ثبت خودکار تاریخ و ساعت

    نقل قول نوشته اصلی توسط morteza2006

    دوست عزیز ستون b رو سلکت کن و روی منطقه آبی رنگ کلیک راست کن و format cells رو انتخاب کن گزینه custom را انتخاب کن و در قسمت در قسمت type به جای general کد زیر رو بنویس
    yyyy/mm/dd
    ستون c رو هم به همین ترتیب اما در قسمت type کد زیر رو بنویس
    hh:mm
    سپس کد های زیر رو در قسمت ویژوال در شیت مربوطه کپی کن
    کد PHP:
    [Private Sub Worksheet_SelectionChange(ByVal Target As Range)
    Dim c As Range
    For Each c In Range("a2:a10000")
    If 
    <> "" And c.Offset(01) = "" Then
    c
    .Offset(01) = Now()
    c.Offset(02) = Now()
    c.Offset(10).Select
    Exit Sub
    End 
    If
    Next
    On Error Resume Next
    If Target <> "" Then
    Cells
    .Find(What:=""After:=ActiveCellLookIn:=xlFormulasLookAt:= _
    xlPart
    SearchOrder:=xlByRowsSearchDirection:=xlNextMatchCase:=False _
    SearchFormat:=False).Activate
    End 
    If
    End Sub 
    امیدوارم کامل گفته باشم
    با سلام و تشکر فراوان از لطفتون

    کدتون درست کار کرد . فقط من به جای c.Offset(0, 1) = Now() و c.Offset(0, 2) = Now() از

    c.Offset(0, 1) = Date و c.Offset(0, 2) = Time استفاده کردم تا دیگه احتیاجی به تنظیمات

    فرمت سل نداشته باشم.

    بازم ازتون ممنونم.

  12. سپاس ها (1)


  13. #8

    آخرین بازدید
    2022/05/30
    تاریخ عضویت
    July 2012
    نوشته ها
    1
    امتیاز
    0
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    سلام - ی سوال واسه من پیش اومده ؟؟؟ راهی وجود داره که ساعات ورود خروج پرنسل رو ثبت کنیم !؟ اونم موقع شب کاری ؟؟
    چون نحوه ثبت و محاسبش مشکله!!! مثلا : شنبه ساعت ورود 18 /// و خروج یکشنبه ساعت 8 صبح میباشد /. من اینو چطوری ثبت کنم

  14. #9


    آخرین بازدید
    2023/08/14
    تاریخ عضویت
    March 2010
    محل سکونت
    تهران
    نوشته ها
    2,034
    امتیاز
    4508
    سپاس
    2,467
    سپاس شده
    4,096 در 1,241 پست
    سطح اکسل
    85.00 %

    khakzad به Yahoo ارسال پیام
    سلام
    چون چند روز فاصله بینش هست
    در یک سل که ساعت زدید
    در سل کناری تاریخ هم بزنید
    بعدش مشکلی برای محاسبه وجود نخواهد داشت


  15. #10

    آخرین بازدید
    2017/06/08
    تاریخ عضویت
    November 2015
    نوشته ها
    2
    امتیاز
    10
    سپاس
    0
    سپاس شده
    0 در 0 پست
    تعیین سطح نشده است

    باسلام میخام ببینم چه طور میشه فرمت ساعت خودکار ایجاد کنم به طور مثال 1452بنویسم 14:52بهم نشون بده


صفحه 1 از 2 12 آخرینآخرین

اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

موضوعات مشابه

  1. کم کردن ساعت
    توسط 3pahan در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 4
    آخرين نوشته: 2013/01/01, 13:03
  2. فرمت ساعت را در کمبو باکس
    توسط amirgolshan در انجمن سوالات پیرامون ويژوال بيسيك - VBA Questions
    پاسخ ها: 3
    آخرين نوشته: 2012/11/29, 11:13
  3. درج اعداد ساعت بدون ":"
    توسط ff7ss در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 13
    آخرين نوشته: 2012/06/26, 10:39
  4. مشکل در تفریق ساعت
    توسط mr.excel در انجمن سوالات اكسل - Excel Questions
    پاسخ ها: 5
    آخرين نوشته: 2012/05/27, 10:23
  5. تفريق ساعت
    توسط Mod در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 1
    آخرين نوشته: 2011/02/23, 10:09

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

درج اتوماتیک تاریخ در اکسل

ثبت خودکار تاریخ در اکسل

ثبت خودکار ساعت در اکسل

ثبت ساعت در اکسل

ثبت تاریخ در اکسل

ثبت زمان در اکسل

درج اتوماتیک ساعت در اکسل

تاریخ اتوماتیک در اکسل

ثبت اتوماتیک تاریخ در اکسل

تاریخ خودکار در اکسل

تغییر نوشته با ثبت تاریخ در اکسل

تاریخ زدن اتوماتیک در اکسل

ساعت خودکار

زمان و تاریخ خودکار

ثبت ساعت به صورت اتوماتیک در اکسل

ثبت خودکار تاریخ و ساعت در اکسلتاریخ و ساعت خودکاردرج تاریخ و ساعت در اکسلدرج تاریخ اتوماتیک در اکسلثبت ساعت خودکار در excelدرج اتوماتیک تاریخ میلادی در اکسلزدن ساعت سیستم در اکسلدرج خودکار ساعت در اکسلکد ساعت با ساعت کامپیوتر در اکسلتغییر اتوماتیک تاریخ در اکسل

علاقه مندی ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است