Jump to content

Khalf

04 Silver Member
  • Content Count

    617
  • Joined

  • Last visited

  • Days Won

    3

Khalf last won the day on October 27 2018

Khalf had the most liked content!

Community Reputation

191 Excellent

2 Followers

About Khalf

Profile Information

  • Gender (Ar)
    ذكر
  • Job Title
    MVP

Recent Profile Visitors

837 profile views
  1. السلام عليكم أخي الفاضل إن إصدار Word 2013 لا يقبل بعض الخطوط أو يبدي نتائج غير متوقعة و قد اضطررت في بعض الأحيان إلى اللجوء إلى خطوط شبيهة أو العودة إلى إصدار ٢٠١٠ إلم أتمكن من الترقية إلى٢٠١٦ مع تمنياتي بالتوفيق
  2. السلام عليكم لعلك تريد شيئاً كهذا Private Sub Worksheet_selectionChange (ByVal Target As Range) On Error Resume Next If Activecell.WrapText = False then Dim X As Integer X = Application.WorksheetFunction.Find("PutYourCharOrYourCritetiaRange",Activecell,1) If X > 0 then Activecell = Mid (Activecell.value,1,X) & chr(10) & Mid (Activecell.value, X+1,Len(Activecell)) End If End If End Sub
  3. شكراً لك عمل رائع و جهد كبير بالرغم من أن موضوعات الحماية تبدو بالنسبة لي معقدة و خارج نطاق اهتمامي كوني لا أبيع البرامج أو أصممها لعملاء بل مجرد هاوٍ يقوم بإعداد بعض الملفات البسيطة لخدمة الزملاء أو للاستخدام في بيئة عمل مغلقة كما هو المتعارف عليه في مجموعة أوفيس. لكن يلفت اهتمامي حجم الجهد المبذول في مجال الحماية و الذي برأيي المتواضع لو جنِّد لعمل برامج بلغات برمجة لكن أجدى و أقوى ، و مقدار التفكير العميق الذي أصبح الأكسس يتجاوز حدوده و يتفوق على ذاته به و الذي سيحمل معه نتائج عظيمة لو أعمل في غير الأوفيس . و أسأل و أتمنى أن أحصل على إجابة من مطلع و متابع ، لماذا لا تقوم مايكروسوفت بتهيئة برامجها و تزويدها بإمكانيات الحماية المماثلة بصورة افتراضية؟لماذا تصر على ترك الباب موارباً لهذه المبادرات ؟
  4. العزيز @خالد سيسكو أشكر لك اهتمامك كود جميل جداً سأحتفظ به إن شاء الله و لكن لا يحقق المطلوب كل ما انتهيت إليه هو استخدام الهوتميل و الذي ينقصني فيها الكثير و جزى الله خيراً الأستاذ @ابو محمد 316 فقد أصاب الهدف تماماً
  5. السلام عليكم لقد وجدت الحل بعمل مربع نص مصدره حقل من الجدول و عمل ماكرو بهذه الطريقة Me.TXT = Plaintext(me.TXT0) و بتنفيذه نحصل على المطلوب الأخ العزيز @SEMO.Pa3x الحل الذي تفضلت به مشكوراً هو حل طويل يقوم على استبدال جميع أكواد التنسيقات . لا أدري إن كان هناك كود سحري يستطيع بالمشاركة مع Replace إنجاز المطلوب . شكراً لكل من شارك أو رغب بالمساعدة
  6. السلام عليكم لدي نموذج بحقل بخاصية ريتش تيكست تمكنني من تغيير التنسيقات حيث تحفظ في جدول على صورة وسوم هوت ميل لأتمكن بعدها من طباعتها بتقرير يكون حقله ريتش تيكست أيضاً و السؤال هل يمكن حفظ مدخلات النموذج مرتين إحداهما مع تنسيقاتالهوتميل و الأخرى دون ذلك في حقل آخر ضمن السجل نفسه.؟ و شكراً
  7. شكراً لك أخي @خالد سيسكو لأشاهد المرفق الذي تفضلت به مشكوراً و لكن الطريقة المذكورة بالتعليق السابق هي المطلوبة و تحقق القصد تماماً و لم أجد خلال بحثي في جوجل و تجربتي ما يفي بالغرض سواها
  8. شكراً لك أخي @خالد سيسكو طلبي مختلف عما تفضلت به ، فهو عن التحكم بتنسيقات أجزاء من مربع نص و ليس تغير تنسيقاته بالكامل و الطريقة التي قدمتها - مشكوراً- لم أتمكن من خلالها من تحقيق المطلوب و لكي أتمكن من خلالها من عمل المطلوب فقد فكرت باستخدام طريقة كتابة أكواد إكسل بتفعيل مكتباته .لكن أرجأتها كمحاولة أخيرة فالأمر يحتاج إلى بحث و سؤال مع عوائق إضافة المكتبات على أجهزة مختلفة .
  9. جزاك الله كل خير و أحسن إليك لقد حاولت تطبيق كود شبيه باستخدام وسوم HTML كونها تظهر عند استخدام Rich Text لكن كان ما يظهر لي اسم الحقل و ليس مضمونه و الخطأ كما بات واضحاً لي أنني وضعت اسم الحقل دون إشارتي & للخبرة أهلها أخي الكريم ألف شكر لك و أثابك الله من الخير كله
  10. السلام عليكم قمت بعمل ما يشبه الكود التالي Text0= Text1 &" "& Text2 كيف أستطيع جعل النص الموجود في Text2 يظهر Bold أو بلون آخر و ما إلى ذلك من تنسيقات مختلفة ضمن المربع Text0 ليس لدي مثال محدد و ما أبحث عنه طريقة كتابة الكود المطلوب إن أمكن و لكم جزيل الشكر .
  11. جزاك الله كل خير هذا من ذوقك الرفيع بارك الله بك و آمل أن أكون عند حسن ظنكم.
  12. السلام عليكم بعد إذن الأستاذ كريمو و يمكن أن تجعل لغة الإدخال في النموذج العربية دون الحاجة إلى أي كود و ذلك من خصائص لغة لوحة المفاتيح اجعلها العربية
  13. السلام عليكم هذه الرسالة تظهر عند وجود عنصر تحكم غير مرتبط و على الأغلب أنه استخدمت بالأمر الخاص به في جزء ما من العملية التي تستخدم بها عنصر التحكم مثل التركيز الفتح ... التعبير Me. يفضّل أن تستبدلها باسم نموذجك الجديد أو عنصر التحكم أو أي ما ترمز له me. بصورة عامة السبب الثاني الممكن (الغالب) أنك تقوم بإجراء أمر على عنصر تحكم قبل أن يفتح النموذج بشكل كامل و هنا عليك تغير موضع الحدث
  14. شافاك الله و عافاك و أعتذر على مشاركتي المتأخرة إن شاء الله تمت الأمور على خير ما يرام
×
×
  • Create New...