تگ های موضوع جدا کردن نام و نام خانوادگی در اکسل

جدا کردن نام و نام خانوادگی در اکسل با ماکرو

جدا کردن نام و نام خانوادگی در اکسل به ویژه زمانی که داده‌ها به صورت یکجا وارد شده‌اند، می‌تواند چالش برانگیز باشد. با استفاده از ماکروها، این فرآیند می‌تواند به شدت تسهیل شود. در اینجا، مراحل و کد لازم برای انجام این کار را بررسی می‌کنیم.

مراحل آماده‌سازی

ابتدا، مطمئن شوید که داده‌های شما به درستی در یک ستون قرار گرفته‌اند. به عنوان مثال، فرض کنید نام و نام خانوادگی‌ها در ستون A قرار دارند.

نوشتن ماکرو

برای نوشتن ماکرو، مراحل زیر را دنبال کنید:

1. باز کردن ویرایشگر ماکرو:
   

- با فشار دادن کلیدهای `Alt + F11`، ویرایشگر VBA را باز کنید.

1. ایجاد ماکرو جدید:
   

- در منوی "Insert"، گزینه "Module" را انتخاب کنید.

1. کپی و جایگذاری کد زیر:
   

```vba
Sub SeparateNames()
Dim cell As Range
Dim fullName As String
Dim names As Variant
Dim firstName As String
Dim lastName As String
' انتخاب محدوده‌ای که نام‌ها در آن قرار دارد
For Each cell In Selection
fullName = cell.Value
names = Split(fullName, " ")
' جدا کردن نام و نام خانوادگی
If UBound(names) >= 1 Then
firstName = names(0)
lastName = names(1)
cell.Offset(0, 1).Value = firstName ' نام در ستون بعدی
cell.Offset(0, 2).Value = lastName ' نام خانوادگی در ستون بعدی
End If
Next cell
End Sub
```

1. اجرای ماکرو:
   

- به اکسل برگردید، سپس محدوده‌ای که شامل نام‌ها است را انتخاب کنید.
- با فشار دادن `Alt + F8`، ماکرو را پیدا کنید و اجرا کنید.

نتیجه‌گیری

با اجرای این ماکرو، نام و نام خانوادگی به صورت خودکار در ستون‌های مجاور جدا می‌شوند. این روش به شما کمک می‌کند تا به سرعت و به سادگی داده‌های خود را سازماندهی کنید. حالا می‌توانید از این ماکرو در هر زمان که نیاز به جداسازی نام‌ها دارید، استفاده کنید.