ویرایش کدملی های اشتباه

/در /توسط

📌 روش حل مشکل با استفاده از تابع IFS

برای نمایش درست کد ملی، می‌توان از تابع IFS در اکسل استفاده کرد. این تابع بر اساس طول مقدار ورودی، صفرهای از‌دست‌رفته را مجدداً اضافه می‌کند.

✅ فرمول پیشنهادی:

=IFS(LEN(A1)=8;"00"&A1;LEN(A1)=9;"0"&A1;LEN(A1)=10;A1)

🔹 این فرمول بررسی می‌کند که اگر طول مقدار وارد شده:

  • ۸ رقم باشد، دو صفر در ابتدای آن اضافه کند.
  • ۹ رقم باشد، یک صفر در ابتدای آن اضافه کند.
  • ۱۰ رقم باشد، بدون تغییر نمایش داده شود.*اگر از اکسل ورژن 2016 و بالاتر استفاده می کنید گاها ممکن است فرمول ifs نمایش داده نشود، مجددا فایل رجیستری آفیس رو نصب کنید تا مشکل حل شود!

کد VBA چک باکس اکسل

/در /توسط

Sub addchekboxes()
On Error Resume Next
Dim c As Range, myrange As Range
Set myrange = Selection
For Each c In myrange.Cells
ActiveSheet.CheckBoxes.Add(c.Left, c.Top, c.Width, c.Height).Select
With Selection
.linkecell = c.Address
.Characters.Text = “”
.Name = c.Address
End With
c.Select
Next
myrange.Select
End Sub