عدم ورود اعداد تکراری و نمایش تعداد دفعات ورود عدد تکرای در یک ستون!

[mohamadIt]

سلام و عرض ادب خدمت اساتید محترم

دوستان چطور میتونم وقتی چندین عدد رو تو اکسل در یک ستون مثلا a وارد میکنم اعداد تکراری وارد نشه و در عوض در ستون b تعداد دفعات ورود یک عدد تکراری نمایش داده بشه؟

*بطور مثال اگر من 5 بار عدد 2 را تو ستون a وارد کردم فقط یکبار عدد 2 تو ستون a وارد بشه ولی در ستون b تعداد دفعات ورود عدد 2 نمایش داده بشه

خواهشمندم راهنمایی فرمایید

باتشکر

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

[iranweld]

با سلام

وقتی اعداد تکرای نباید وارد بشه چطور انتظار شمارش دارید؟

لطفا بفرمایید چه هدفی از این کار در نظر دارید ؟

فعلا این فایل رو بررسی بفرمایید

هر عددی که در ستون A وارد شود در ستون B بدون تکرار آن لیست شده و در ستون C تعداد تکرار آن درج میگردد

Sub UniqueCopy()

 Sheet1.Columns(2).ClearContents
 
 On Error Resume Next
    With ActiveSheet
         .Range("A1", .Range("A65536").End(xlUp)).AdvancedFilter _
             Action:=xlFilterCopy, CopyToRange:=Sheet1.Range("B1"), Unique:=True
    End With
    
    K1 = Cells(Rows.Count, "A").End(xlUp).Row
    K2 = Cells(Rows.Count, "B").End(xlUp).Row
    
    Range("C2:C" & K2).ClearContents
    
    For I = 2 To K2
    Range("C" & I).Value = "=COUNTIFS(A2:A" & K1 & ",B" & I & ")"
    
    Next
    
On Error GoTo 0

End Sub 

[abootorab]

سلام و عرض ادب خدمت اساتید محترم

دوستان چطور میتونم وقتی چندین عدد رو تو اکسل در یک ستون مثلا a وارد میکنم اعداد تکراری وارد نشه و در عوض در ستون b تعداد دفعات ورود یک عدد تکراری نمایش داده بشه؟

*بطور مثال اگر من 5 بار عدد 2 را تو ستون a وارد کردم فقط یکبار عدد 2 تو ستون a وارد بشه ولی در ستون b تعداد دفعات ورود عدد 2 نمایش داده بشه

خواهشمندم راهنمایی فرمایید

باتشکر

با درود
دوست عزیز برای قسمت اول سوالتون میشد با استفاده از Data Validation به جواب رسید اما با توجه به قسمت دوم سوالتون فقط از طریق vb میشه به خواستتون رسید.
فایل نمونه زیر را مشاهده کنید، امیدوارم منظورتون درست متوجه شده باشم.

[mohamadIt]

با درود
دوست عزیز برای قسمت اول سوالتون میشد با استفاده از Data Validation به جواب رسید اما با توجه به قسمت دوم سوالتون فقط از طریق vb میشه به خواستتون رسید.
فایل نمونه زیر را مشاهده کنید، امیدوارم منظورتون درست متوجه شده باشم.

باتشکر فراوان از شما دوست عزیز abootorab
وکاربر گرامی iranweld
این فایل دقیقا همونی بود که می خواستم
فقط اینکه میشه ستون B رو قفل کرد که پاک یا ادیت نشه یعنی فقط تکرار رو اضافه کنه ادیت یا پاک نشه!
اخه من ستون B رو قفل میکنم و عدد تکراری وارد میکنم نه عدد وارد میشه نه تکرار!
به عبارت دیگه یعنی در ستون B نشه دستی چیزی اضافه یا پاک کرد هرچی میخواد اضافه بشه از ستون A وارد بشه

بینهایت سپاس از پاسخگوییتون

[abootorab]

باتشکر فراوان از شما دوست عزیز abootorab
وکاربر گرامی iranweld
این فایل دقیقا همونی بود که می خواستم
فقط اینکه میشه ستون B رو قفل کرد که پاک یا ادیت نشه یعنی فقط تکرار رو اضافه کنه ادیت یا پاک نشه!
اخه من ستون B رو قفل میکنم و عدد تکراری وارد میکنم نه عدد وارد میشه نه تکرار!
به عبارت دیگه یعنی در ستون B نشه دستی چیزی اضافه یا پاک کرد هرچی میخواد اضافه بشه از ستون A وارد بشه

بینهایت سپاس از پاسخگوییتون

با درود
شما می بایست عمل Protect و Unprotect رو از طریق vb و درون کدها قرار میدادین که این کار در فایل ضمیمه واستون انجام شد.