من یه اکسل دارم می خوام وقتی مثلا داخل سلول a1 یه مقداری وارد می کنم داخل سلول b2 ساعت وارد کردن اون مقدار رو بزنه
قرار گرفتن خودکار ساعت و تاریخ در اکسل
Collapse
این تاپیک قفل است.
X
X
-
-
سلام،
اگر می خواهید با vba انجام بشه بفرمایید کدش رو براتون قرار بدیم نمونه ای از فایلتون رو هم پیوست کنید تا متناسب با فایلتون پاسخ داده شود.[CENTER]Telegram Channel : [url]https://t.me/UltraOfficeSkills[/url]
[/CENTER] -
با سلام
در رویداد chang ورک شیت مورد نظر این کد رو وارد کنید
کد مربوط به محدوده A1 تا A10 می باشد میتونید ویرایش کنید طبق خواستتون
کد PHP:Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Me.Range("A1:A10")) Is Nothing Then
On Error Resume Next
If Target <> "" Then
tr = Target.Row
Range("B" & tr) = Format(Now, "hh:mm")
End If
End If
End Sub
[CENTER]
[SIGPIC][/SIGPIC]
[/CENTER]کامنت
-
ممنون از راهنماییتون
نمی خوام از VBA استفاده کنم نمیشه از طریق فرمول نویسی انجام داد این کار رو؟؟
با سلام
در رویداد chang ورک شیت مورد نظر این کد رو وارد کنید
کد مربوط به محدوده A1 تا A10 می باشد میتونید ویرایش کنید طبق خواستتون
کد PHP:Private Sub Worksheet_Change(ByVal Target As Range) If Not Intersect(Target, Me.Range("A1:A10")) Is Nothing Then On Error Resume Next If Target <> "" Then tr = Target.Row Range("B" & tr) = Format(Now, "hh:mm") End If End IfEnd Sub
میشه بگید "رویداد chang" کجاست ؟کامنت
-
سلام،
تنها راهی که بنده سراغ دارم استفاده از vba هست و کدش رو هم استاد عزیزمون جناب generalsamad قرار دادند.
برای وارد شده به محیط vba کلید های ترکیبی alt + f11 رو فشار بدید.
در صفحه باز شده روی شیت مود نظر دابل کلیک کنید تا وارد ماژول اون شیت بشوید سپس کد رو در قسمت کد نویسی پیست کنید.
برای ذخیره فایل های دارای کد vba می بایست فایل رو با پسوند xlsm ذخیره کنید.[CENTER]Telegram Channel : [url]https://t.me/UltraOfficeSkills[/url]
[/CENTER]کامنت




کامنت