نمایش یک عبارت در یک سلول با پر شدن سلول دیگری

**A.saffari1991** · 2021/07/15, 16:05

سلام
سوالتون کامل نیست
آیا در ستون تاریخ میخاین که تاریخ همون روز وارد بشه یا اینکه جای دیگری منبعی از اطلاعات دارین میخایت از اونجا بیاره ؟

**ayoub.** · 2021/07/17, 08:14

[QUOTE=A.saffari1991;80935]سلام
سوالتون کامل نیست
آیا در ستون تاریخ میخاین که تاریخ همون روز وارد بشه یا اینکه جای دیگری منبعی از اطلاعات دارین میخایت از اونجا بیاره ؟[/QUOTE
سلام و عرض خدا قوت!
بله با ثبت پرسنی به طور خودکار تاریخ همان روز ترجیحا شمسی و در ستون دیگری عبارت ماه مثلا مرداد ثبت بشه
ممنونم

**generalsamad** · 2021/07/17, 08:40

با سلام
این کد پرسنلی و سایر اطلاعات یک جائی ثبت شده با فایل نمونه زودتر به جواب می رسید

**ayoub.** · 2021/07/17, 10:36

متوجه نشدم!
لطف می کنید توضیح بیشتری دهید.

**generalsamad** · 2021/07/17, 12:09

الان شما یک عکس ضمیمه کردید و درخواستی کردید که کد پرسنلی شخصی رو وارد میکنید اطلاعاتی توی فیلدهای بعدی پر بشه
در صورتی که شما طبق عکس یک شیت دارید و اطلاعاتی از دیتابیس (پایگاه داده) موجود نیست معلوم نیست چه اطلاعاتی در دیتابیس وجود دارند.آیا در شیت یک موجود هستن؟ اگه میخواهید کار جستجو را انجام دهید باید از توابعی از قبیل vlookup,index,match استفاده کنید و در مورد تاریخ ثبت هم معلوم نیست چه چیزی مد نظر هست این تاریخ در دیتابیس وجود داره یا میخواهید تاریخ روز درج بشه.در مورد ماه هم میشه از ترکیب توابع متنی و choose استفاده کرد یا از توابع شمسی.
بهتره یک فایل نمونه ضمیمه کنید

**ayoub.** · 2021/07/18, 09:11

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

**saed.rasa** · 2021/07/18, 10:09

سلام
بهتر است تمام گفته های خود را تبدیل کنید به فایل اکسل نمونه کوتاه ، همراه با نتیجه یا جواب یا خروجی مورد انتظار

عکس بدرد نمی خورد
مسیر ارسال فایل : پایین سمت چپ - تنظیمات اضافی - فایل پیوست
توضیح:
با پر شدن یک سلول ، می توان براحتی تاریخ روز (شمسی البته با افزونه) را در سلول مورد نظر آورد
اما ماه مورد نظر شما بر چه اساسی در یک سلول بیاید فقط می توان ماه اون تاریخ روز را در سلول بعدی آورد آیا منظور شما همین است ؟ وگرنه دقیق - واضح - روشن و شفاف در فایل اکسل بگویید لطفا

دلیل اینکه شما در این چند روز و چند پست جواب صریح نمی گیرید مقصر خود شمای مهربون هستید چون که بارها از طرف دوستان از شما خواسته شده فایل اکسل بزارید اما شما اصلا گوش ندادید...

حالا من امیدوارم که این بار شما گوش کنید فقط بخاطر خودتان

متشکرم

**generalsamad** · 2021/07/18, 11:37

از این فرمول برای ماه استفاده شده

کد PHP:


=IFERROR(IF(MID(C2,6,2)="12","فروردین",CHOOSE(INT(MID(C2,6,2)),"اردیبهشت","خرداد","تیر","مرداد","شهریور","مهر","آبان","آذر","دی","بهمن","اسفند")),"")

و از این کد برای ثبت تاریخ

کد PHP:


Private Sub Worksheet_Change(ByVal Target As Excel.Range)
    Dim xRg As Range, xCell As Range
    On Error Resume Next
    If (Target.Count = 1) Then
        If (Not Application.Intersect(Target, Me.Range("A:A")) Is Nothing) Then _
            Target.Offset(0, 2) = J_TODAY(1)
        Application.EnableEvents = False
        Set xRg = Application.Intersect(Target.Dependents, Me.Range("A:A"))
        If (Not xRg Is Nothing) Then
            For Each xCell In xRg
                xCell.Offset(0, 2) = J_TODAY(1)
            Next
        End If
        Application.EnableEvents = True
    End If
End Sub