Non-English forums » Arabic »
كيفية حذف علامات التشكيل آليا في ملفات وورد
Thread poster: ahmadwadan.com
ahmadwadan.com
ahmadwadan.com  Identity Verified
Saudi Arabia
Local time: 09:17
English to Arabic
+ ...
Sep 24, 2007


السلام عليكم

كيف يمكن حذف (وليس إخفاء) علامات التشكيل آليا من ملفات وورد؟
أرجو الإفادة خاصة من كان عنده برنامج خاص للقيام بذلك إذا كان برنامج وورد لا يدعم هذه الخاصية.
شكرا جزيلا
 
Nesrin
Nesrin  Identity Verified
United Kingdom
Local time: 07:17
English to Arabic
+ ...
Find and replace? Sep 24, 2007

That's the only way I can think of - you put each mark at a time in the "Find" field, and leave the "Replace" field blank. It shouldn't take too long to get rid of all the marks.
 
ahmadwadan.com
ahmadwadan.com  Identity Verified
Saudi Arabia
Local time: 09:17
English to Arabic
+ ...
TOPIC STARTER
Sure Sep 24, 2007

Sure Nesrin. However, I wish I could find automatic way. I am sure that there are applications that do that, but where!

Thank you
 
Aranglish
Aranglish
Türkiye
English to Arabic
+ ...
Develop a Macro using MS-Word Visual Basic Editor Sep 29, 2007

تحياتي للجميع،

بالصدفة طورت مؤخراً "ماكرو" لاحتساب العدد الكلي من الكلمات الفعلية في أي مستند "وورد" وذلك بالتخلص من أكثر الكلمات شيوعاً في الإنجليزية مثل الضمائر وغيرها.

إذا كنت ملماً بالبرمجة فإليك مثال عملي مستوحى مما قالته الزميلة بطريقة البحث والاستبدال:... See more
تحياتي للجميع،

بالصدفة طورت مؤخراً "ماكرو" لاحتساب العدد الكلي من الكلمات الفعلية في أي مستند "وورد" وذلك بالتخلص من أكثر الكلمات شيوعاً في الإنجليزية مثل الضمائر وغيرها.

إذا كنت ملماً بالبرمجة فإليك مثال عملي مستوحى مما قالته الزميلة بطريقة البحث والاستبدال:

Sub Macro1()
'
' Macro1 Macro
' Macro recorded 9/29/2007 by Aranglish
'
Selection.Find.ClearFormatting
Selection.Find.Replacement.ClearFormatting
With Selection.Find
.Text = ChrW(1614)
' 1614 = الفتحة
.Replacement.Text = TypeBackspace
' TypeBackspace = Backspaceحذف الفتحة بتوجيه أمر زر
.Forward = True
.Wrap = wdFindContinue
.Format = False
.MatchCase = False
.MatchWholeWord = False
.MatchKashida = False
.MatchDiacritics = False
.MatchAlefHamza = False
.MatchControl = False
.MatchWildcards = False
.MatchSoundsLike = False
.MatchAllWordForms = False
End With
Selection.Find.Execute Replace:=wdReplaceAll
End Sub

ويمكنك نسخ ولصق هذا الروتين البرمجي عدة مرات وفي كل مرة تغير رمز علامة التشكيل لاستبدالها بزر الحذف.

مع تحياتي
معتز

[Subject edited by staff or moderator 2007-09-29 17:24] ▲ Collapse
 
ahmadwadan.com
ahmadwadan.com  Identity Verified
Saudi Arabia
Local time: 09:17
English to Arabic
+ ...
TOPIC STARTER
Cool... Sep 29, 2007

Dear Mo'taz,

Yes, macro...the greatest and simplest solution. I am pretty familiar with scripts so I'll try it with some additions (Kasra, sokoon...etc).

Thank you so much for your valuable input.

Kind regards
 


To report site rules violations or get help, contact a site moderator:

Moderator(s) of this forum
Abdallah Ali[Call to this topic]
Murad AWAD[Call to this topic]

You can also contact site staff by submitting a support request »

كيفية حذف علامات التشكيل آليا في ملفات وورد






TM-Town
Manage your TMs and Terms ... and boost your translation business

Are you ready for something fresh in the industry? TM-Town is a unique new site for you -- the freelance translator -- to store, manage and share translation memories (TMs) and glossaries...and potentially meet new clients on the basis of your prior work.

More info »
Trados Business Manager Lite
Create customer quotes and invoices from within Trados Studio

Trados Business Manager Lite helps to simplify and speed up some of the daily tasks, such as invoicing and reporting, associated with running your freelance translation business.

More info »