پرسش مشکل در اجازه کپی داده در سلول دارای data validation

[eric]

با سلام خدمت دوستان عزیز
میخواستم لطفا راهنماییم کنید
مثلا مطابق فایل پیوست من دو ستون دارم و در ستون شماره گزارش یک سری داده وارد کردم میخوام تنها در صورتی بتوانم در هر سلول از ستون نام، داده وارد کنم و یا از سلول دیگر داده ای به آن کپی کنم که حتما در سلول روبروی آن درستون شماره گزارش داده ای وارد شده باشد و BLANK نباشد مثلا اگر سلولی در ستون شماره گزارش خالی بود داده ای هم نتوانم در سلول روبروی آن در ستون نام وارد کنم(یعنی حتما شماره گزارش داشته باشیم) این کار را با استفاده از تابع ISBLANK و همچنین قسمت data validation مطابق عکس پیوست انجام دادم ولی انجام نشد .

[mokaram]

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

[eric]

سلام دوست عزیز، ممنون از پاسختون ، با این تنظیماتی که گفتید و برداشتن تیک ignore blank قسمت data validation همونطوری که میخوام پیغام خطا میدهد ولی یک مشکل همچنان وجود دارد و اینکه با تایپ کردن اطلاعات در یک سلول در صورتی که با شرط مورد نظر مغایرت داشته باشد پیغام خطا میدهد و اجازه ورود داده به سلول را نمیدهد ولی وقتی اطلاعات را با استفاده از copy و paste وارد میکنم حتی در صورت مغایرت با شزط مورد نظر هم باز اجازه ورود داده را میدهد (میخوام هم با تایپ کردن و هم با استفاده از copy و paste در صورت مغایرت اصلا اجازه ورود داده را ندهد)

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

[حسام بحرانی]

سلام دوست عزیز، ممنون از پاسختون ، با این تنظیماتی که گفتید و برداشتن تیک ignore blank قسمت data validation همونطوری که میخوام پیغام خطا میدهد ولی یک مشکل همچنان وجود دارد و اینکه با تایپ کردن اطلاعات در یک سلول در صورتی که با شرط مورد نظر مغایرت داشته باشد پیغام خطا میدهد و اجازه ورود داده به سلول را نمیدهد ولی وقتی اطلاعات را با استفاده از copy و paste وارد میکنم حتی در صورت مغایرت با شزط مورد نظر هم باز اجازه ورود داده را میدهد (میخوام هم با تایپ کردن و هم با استفاده از copy و paste در صورت مغایرت اصلا اجازه ورود داده را ندهد)

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

سلام
شما به کدی نیاز دارید که محدوده Data Validation غیر قابل Paste بشه.
ابتدا محدوده مورد نظر را نامگذاری کنید، در این مثال من محدوده ستون B را با نام validhb نامگذاری کردم و سپس از این کد استفاده کردم.

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Not Intersect(Target, Range("validhb")) Is Nothing Then
Application.CutCopyMode = True
End If
End Sub 

ببینید مشکلتون حل میشه؟
درضمن از ایجاد موضوعات تکراری خودداری کنید چون حذف خواهند شد.
موفق باشید.

[eric]

سلام ممنون از پاسختون
کدی که شما زحمت کشیدید و لطف کردید برام فرستادید کلا اجازه کپی کردن در محدوده Data validation را نمیدهد ولی من میخوام کپی را بتوانم انجام دهم و فقط میخوام داده ای را که در هر سلول از محدوده data validation کپی میکنم اگر با شرط مورد نظر مغایرت داشت اجازه ورود و ثبت داده را به من ندهد ،یعنی به کدی نیاز دازم که اجازه past کردن در محدوده data validation را در صورت مغا یرت با شرط مورد نظر ندهد ( دوست عزیز کلا من یک فایل دارم که مربوط به یک سری قطعات تولیدی است میخوام تا شماره گزارش از واحد کنترل کیفیت ثبت نشده واحد ارسال نتواند شماره پکینگ را وارد کند و قطعه را ارسال کند چه با تایپ کردن و په با copy و paste کردن در هر سلول از محدوده . (data validation ممنون میشم اگه راهنماییم کنید