اذهب الي المحتوي
أوفيسنا
shatat

تمت الإجابة الكلام مقلوب عند النسخ

Recommended Posts

مرحبا

عندما أقوم بالنسخ من Adobe Acrobat الى الوورد يصبح الكلام مقلوبا

مثلا محمد عبد الكريم

ينسخها : دمحم دبع ميركلا

هل من حل لهذه المشكلة

وشكر

شارك هذه المشاركه


رابط المشاركه
شارك

مرحبا اخي العزيز

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

ولكني سمعت ببعض البرامج المختصه بهذا المجال وانا شخصيا ابحث عنها ، ولكن ربما يساعدنا احد الاخوة ويأتي لنا بحل او برنامج يحل هذه المشكله او يحول صيغه ملف pdf الى وورد doc ....

تحياتي

شارك هذه المشاركه


رابط المشاركه
شارك

لا أعتقد أن هذا نوع من الحماية

وعلى أي حال لماذا لا نقوم بعمل ماكرو يقوم بإرجاع الملف إلى حالته بعد نسخه من ملف الأكروبات عن طريق تغيير ترتيب الأحرف ..

أعتقد أن هذا الأمر ممكن .. وهذا مثال يمكنكم التعديل عليه:

Sub Macro()
    
'الذهاب إلى أول المستند
Selection.HomeKey Unit:=wdStory
      
'معرفة عدد الكلمات في المستند
Set wdDTWC = Dialogs(wdDialogToolsWordCount)
wdDTWC.Execute
dlgwordcount$ = wdDTWC.Words

'تحديد كلمة كلمة
For o = 1 To dlgwordcount$
    Selection.Find.ClearFormatting
    With Selection.Find
        .Text = "<?*>"
        .MatchWildcards = True
    End With
    Selection.Find.Execute
    
'وضع الكلمات في متغيرات
    Dim x As String
    Dim s As String
    x = Len(Selection)
    s = Selection
    
'قلب الكلمة إلى وضعها الطبيعي
    For i = 0 To x - 1
    Selection.TypeText Text:=Mid(s, (x - i), 1)
    Next
Next

End Sub

تم تعديل بواسطه عبد الله فتحي
  • Thanks 2

شارك هذه المشاركه


رابط المشاركه
شارك

اخي عبد الله

لقد وجدت طريقة مسلية ولكنها ليست مجدية

اولا قمت بنسخ النص من مستند الأكروبات ثم قمت بلصقه في مستند وورد "ﻢﺴﺑ ﻢﻴﺣﺮﻟا ﻦﻤﺣﺮﻟا ﷲا"

بعد ذلك قمت بطباعة الأخير الى الأكروبات كماهو ثم نسخته مجدداً الى مستند وورد فأصبحت النتيجة :ﻟﺮﺣﻴﻢ ﺑﺴﻢ ا ﻟﺮﺣﻤﻦ ا ﷲ ا

مارأيك بالموضوع ؟

تحياتي

shatat

شارك هذه المشاركه


رابط المشاركه
شارك
مارأيك بالموضوع ؟

من ناحية التسلية :lol: :lol:

أما من ناحية الجدوى فقد كان تفكيرك منطقياً عند محاولة عكس العكس وبالتالي الحصول على نتيجة إيجابية، ولكن يبدو أن المحاولة قد فشلت :crash:

شارك هذه المشاركه


رابط المشاركه
شارك

مرحبا

شكرا على الرد

لكن أين هو البرنامج الخاص أو ما هو اسمه

شارك هذه المشاركه


رابط المشاركه
شارك

السلام عليكم

احتجت لكود لعكس الكلمات بالوورد،

و جربت كود الاخ عبد الله فتحي المنشور اعلاه

و يعمل بامتياز

مرفق الملف للاستفادة

 

Wor-Reverse.docm

شارك هذه المشاركه


رابط المشاركه
شارك
Guest أبو محمد هاشمي

هل من توضيح لإرجاع الكلمات والعبارات المقلوبة إلى وضصهعا الطبيعي

مثال

ميلستلا دعب دُ عْ ق يَ ال لي هللا لوسر ناك :ثلاق ةًشئاع نع

 

وأصل العبارة:

عن عائشة قالت كان رسول الله لا يقعد بعد التسليم

شارك هذه المشاركه


رابط المشاركه
شارك

عندما جربت كود الأخ عبد الله فى مشاركتي السابقة اختبرته على كلمات و ليس جمل

و هو بالفعل يقوم بعكس ترتيب أحرف كل كلمة

عائشة تصبح ةًشئاع 

و ةًشئاع  تصبح عائشة

و لكنه لا يغطي عكس ترتيب الكلمات ضمن الجملة الواحدة

و اذا أردنا الإضافة عليه لاعادة ترتيب الكلمات، فسنواجه بعض الصعوبات ، فكيف نحدد بداية و نهاية الجمل ، هل عن طريق الفواصل و النقط فقط ؟

يبدو الأمر صعباً شيئاً ما. ربما يكون التحديد حلاً ، مثلا نختار الجملة يدويا و ضمن الكلمات المختارة يقوم الكود بعكس ترتيب الكلمات أيضا ، و يكن ذلك سيكون مرهقاً فى حالة الملفات الكبيرة، و اذا اعتمدنا النقاط والفواصل لا نضمن أن تكون الجمل موجود بها علامات سليمة للنقطات و الفواصل و بالتالي قد يحدث تغيير فى المعنى دون أن نلاحظ.

حاليا الكود فى ملف الوورد فقط يقوم بعكس ترتيب الحروف ضمن نفس الكلمة لكل الكلمات فى الملف

لم اجد وقت لمراجعة مثالي الأكسيس و الاكسيل بعد ، و ساحاول ذلك لاحقا بإذن الله تعالى

 

شارك هذه المشاركه


رابط المشاركه
شارك

السلام عليكم

بمراجعة ملف الاكسيل المشار اليه، وجدت به دالة جاهزة اسمها StrReverse تقوم بعكس النص باستخدام VBA ، وهي كافية لاداء المطلوب و تعمل ايضا فى الوورد

الدالة من موقع ميكروسوفت

 و عليه قمت بتطبيقها فى الوورد ، و عملت معي جداً

فقط قبل تشغيل الكود قم باختيار النص المطلوب عكسه، حيث يعمل الكود الذى أعددته على النص المختار فقط

Sub reversit()
Selection.Text = StrReverse(Selection.Text)
End Sub

مرفق الملف

 

Word-Reverse.docm

  • Like 2

شارك هذه المشاركه


رابط المشاركه
شارك

الملف له استخدمات طريفة ـ مثلا أن ترسل الكلام مقلوب لاختبار من يستطيع قراءته فى جروب او شات

مثلا

انأ ةملك ةباتكب هروضح لجسي بوتكملا مالكلا ارقي فراع يللا

هي معكوس

 اللي عارف يقرا الكلام المكتوب يسجل حضوره بكتابة كلمة أنا

لتشغيل الماكرو فى الملف

اكتب اي عبارة

ثم قم باختيارها بالماوس

ثم اضغط ALT+ F8

1.thumb.gif.fe41109524609c23a94f825473adf45a.gif

 و شغل الماكرو

ستظهر العبارة معكوسة الحروف  كما يلي

2.gif.75f3cda3061dca24da190c53f43c3771.gif

 

شارك هذه المشاركه


رابط المشاركه
شارك

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.


  • محتوي مشابه

    • بواسطه honey776
      السلام عليكم ورحمة الله وبركاته
      أريد قراءة رقم مثل : 123
      بالعكس 321
      ياريت أعرف الطريقه جزاكم الله خير
    • بواسطه gamalin
      قمت بتصدير ملف الى الاكسل عربي وجاء مقلوب
      اي ان الكتابة العربي من اليسار الى اليمين
      واريد اذا كان هناك كود او وظيفة يمكنها عمل مقلوب للنص ليصبح مقرؤ اكون شاكر
      Transaction_his.rar
    • بواسطه إيهاب عبد الحميد
      السلام عليكم ورحمة الله وبركاته
      السادة الأفاضل
      المطلوب في المرفق
      أرجو أن يكون طلبي واضخ
      بارك الله في مجهودكم
      ترتيب اسم الصنف.xlsx
  • المتواجدين الان   0 اعضاء متواجدين الان

    لايوجد اعضاء مسجلون يتصفحون هذه الصفحه

×
×
  • اضف...