در فایلی که قرار دارم می خوام با استفاده از Data Validation در یک ستون به خصوص، فقط بشه نام کابرانی که از نوع عادی هستند رو وارد کرد. فایل رو گذاشتم و توضیح رو برای دوستان قرار دادم.
با تشکر
|
🖤 پیام تسلیتبا نهایت تأسف و تأثر، باخبر شدیم جناب آقای محمد محمدی با نام کاربری smartman ، از مدیران ارزشمند انجمن اکسل ایران، دار فانی را وداع گفتهاند. ایشان سالها با دانش، تجربه، اخلاق نیکو و روحیه کمک به دیگران، سهم بزرگی در رشد و پویایی انجمن داشتند و خاطره حضور ارزشمندشان همواره در ذهن اعضای انجمن باقی خواهد ماند. مدیریت و اعضای انجمن ExcelIran این ضایعه را به خانواده محترم ایشان، دوستان و تمامی اعضای انجمن تسلیت عرض نموده و از خداوند متعال برای آن مرحوم، رحمت و مغفرت الهی و برای بازماندگان صبر و شکیبایی مسئلت دارند.
انا لله و انا الیه راجعون
|
=VLOOKUP(B2;'اطلاعات کاربران'!$B$2:$C$13;2;0)="عادی"
Private Sub Worksheet_Change(ByVal Target As Range)
Cellb = Split(ActiveCell.Address, "$")(1)
If Cellb <> "B" Or Range(ActiveCell.Address).Value = "" Then
Exit Sub
End If
Dim cell As Range
lastcell = Cells(Rows.Count, "a").End(xlUp).Row
For Each cell In Sheet19.Range("b2:b" & lastcell)
If cell.Offset(0, 1) <> "" And cell.Offset(0, 1) = Sheet18.Range("e1") Then
MsgBox "خطا در ورود اطلاعات", vbInformation, ""
Range(ActiveCell.Address).Value = ""
End If
Next
End Sub
کامنت