تبدیل شماره‌ها و بولت‌های خودکار به متن ساده در ورد

شماره‌ها و بولت‌های خودکار در محیط ورد را می‌توانید به سرعت با دو روش‌ به متن ساده تبدیل کنید.

روش اول) تبدیل دستی

1. لیستی را که می خواهید تبدیل کنید انتخاب کنید.

2 کلیدهای Ctrl + C را فشار داده یا کلیک راست کرده تا گزینه Copy را برای کپی کردن لیست در کلیپ بورد انتخاب کنید.

3. مکان نما را روی مکان خالی قرار دهید. سپس راست کلیک کرده و از قسمت Paste Options روی گزینه A کلیک کنید.

پس از کلیک، لیست به متن ساده تبدیل می‌شود. نتیجه را می‌توانید همانطور که در تصاویر زیر نشان داده شده است مشاهده کنید:

روش دوم) استفاده از ماکرو

استفاده از کد VBA نیز یک روش ساده برای تبدیل لیست شماره‌ها یا بولت‌های خودکار به متن ساده در ورد است. می توانید به سرعت مراحل زیر را به شرح زیر انجام دهید:
1: کلیدهای Alt + F11 را فشار دهید تا پنجره Microsoft Visual Basic for Applications باز شود.
2: از تب Insert روی Module کلیک کنید، کدهای زیر را کپی کرده و در پنجره Module قرار دهید.
3: برای اجرای VBA روی دکمه Run کلیک کنید.

اگر می‌خواهید تغییرات در کل فایل ورد انجام شود از کد زیر استفاده کنید:

Sub ConvertAllAutoNumberToText()
  If ActiveDocument.Lists.Count  0 Then
   Dim lisAutoNumList As List

   For Each lisAutoNumList In ActiveDocument.Lists
     lisAutoNumlist.ConvertNumbersToText
   Next
  Else
       
  End If
End Sub

اگر می‌خواهید تغییرات در یک بخش خاص انجام شود از کد زیر استفاده کنید. البته برای اجرا ابتدا قسمت مدنظرتان را انتخاب کرده و سپس کد را اجرا کنید.

Sub ConvertSelectAutoNumberToText()
  If ActiveDocument.Lists.Count  0 Then
   Selection.Range.ListFormat.ConvertNumbersToText
  Else

  End If
End Sub

منابع:

datanumen.com

extendoffice.com