جدا کردن عدد از متن در اکسل با یک کلیک
- آخرین بروزرسانی: 28 خرداد 1402
جدا کردن عدد از متن در اکسل با یک کلیک روی این آموزش رایگان اکسل برای شما دوستان عزیز یک روش فوق العاده عالی برای جداسازی متن از عدد در اکسل به صورت کامل آموزش میدیم
ما توی این آموزش رایگان اکسل برای شما با استفاده از کد نویسی BVA نحوه جداسازی اعداد از متن در اکسل آموزش می دهیم که میتونیم به راحتی فقط با یک کلیک متن های خود را از اعداد جدا کنید
خوب برای این منظور در ادامه همین مطلب براتون یک چند خط کد vba قرار دادم که میتونید اونا به صورت کامل کپی کنید و وارد فایل اکسل کنید
نکات حرفهای برای جدا کردن عدد از متن در اکسل
بعد از اینکه وارد فایل اکسل شدید الان با کلیدهای میانبر Alt + F11
وارد محیط کد نویسی vba اکسل شوید
یک ماکرو ایجاد کنید بعد از اینکه ماکرو ایجاد شد کد هایی که کپی کردید از داخل سایت را به صورت کامل وارد وارد ماکرو کنید
الان هیچ کاری دیگه نیاز نیست انجام بدهید فقط شما نیاز هست داخل کد ها که نوشته شد را مشاهده کنید که کدام قسمت تغییر کند برای جداسازی
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 |
Sub SeparateNames() 'https://academyruhollah.com/ '============= آکادمي روح الله مرجع بانک کد BVA اکسل ======= Dim rng As Range Dim cell As Range Dim text As String Dim parts() As String Dim name As String Dim family As String Dim mobile As String ' تعيين محدوده ستون متن Set rng = Range("A1:A" & Cells(Rows.Count, 1).End(xlUp).Row) For Each cell In rng text = cell.Value parts = Split(text, " - ") ' استفاده از نويزلاتور "-" ' جداسازي بخشهاي متن و قرار دادن در ستونهاي جداگانه If UBound(parts) >= 1 Then name = Trim(parts(0)) ' تراکم اضافي را برداشت کنيد family = Trim(parts(1)) ' تراکم اضافي را برداشت کنيد ' اگر تعداد بيشتري بخش وجود دارد، آنها را به ستون موبايل اضافه کنيد If UBound(parts) >= 2 Then mobile = Trim(parts(2)) ' تراکم اضافي را برداشت کنيد cell.Offset(0, 3).Value = mobile ' شماره موبايل در ستون D End If cell.Offset(, 1).Value = name ' نام در ستون B cell.Offset(0, 2).Value = family ' نام خانوادگي در ستون C End If Next cell End Sub |
راههای ساده برای استخراج عدد از متن در اکسل
به طور مثال داخل این کد ما داخل ستون A نام نام خانوادگی شماره همراه را داریم
الان میخواهیم نام نام خانوادگی در ستون B قرار بگیرد و شماره موبایل در ستون C
اگر اطلاعاتی که شما داخل فایل اکسل دارید مشابه همین فایل هست میتونید ماکرو را اجرا کنید در غیر این صورت آدرس ستون ها را داخل کد نویسی که توزیع دادیم را به صورت کامل تغییر بدهید و ماکرو را اجرا کنید
بعد از اجرا کردن ماکرو همانطور که مشاهده می کنید جداسازی متن و عدد در اکسل به صورت کامل عالی انجام شد
بهترین روشها برای جدا کردن اعداد از متن در اکسل
دوستان گرامی این هم بود از این آموزش رایگان اکسل از دسته بندی بانک کد اکسل در سایت آکادمی روح الله
امیدوارم که برای تو مورد استفاده قرار گرفته باشد هر گونه نظر یا پیشنهادی بود در قسمت نظرات همین صفحه برام بنویسید موفق و پیروز باشید
هیچ دیدگاهی برای این نوشته ثبت نشده است.