اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

كتابة اسم معد العمل على ورقة اكسل


الردود الموصى بها

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

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

شاكرين لكم حسن التعاون 

اخيكم 

اسامة

رابط هذا التعليق
شارك

أخي الكريم أسامة

يرجى تغيير اسم الظهور للغة العربية

جرب الدخول لمحرر الأكواد عن طريق Alt + F11 ، وأدخل الكود التالي

Sub LastAuthor()
    With Range("XFA1")
        .Value = ThisWorkbook.BuiltinDocumentProperties("Last Author")
        .NumberFormat = ";;;"
    End With
End Sub

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

إذا أعجبك الحل قم بدعمي من خلال تحميل الملف المرفق

حمل الملف المرفق من هنا

تقبل تحياتي

  • Like 1
رابط هذا التعليق
شارك

استاذي العزيز ياسر

لم افهم ماذكرته لكني دعمتك وانزلت الملف المرفق وكل مااريده هو ان يظهر اسمي اسفل ورقة العمل مثل ما يظهر كلمة درافت او نسخة للمناقشة وشكرا

رابط هذا التعليق
شارك

أخي الكريم أسامة

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

مزيد من التوضيح للمطلوب يسهل تقديم الحل بشكل أفضل

تقبل تحياتي

رابط هذا التعليق
شارك

اخى الكريم ابو البراء

ياريت تقولنا ازاى نحمل الملفات من على المركز دة لانى مش عارف صراحتا اوصل للملفات المرفةعة علية

وشكرا ليك اخى الكريم

رابط هذا التعليق
شارك

أخي العزيز حسام

لما تضغط على الرابط بتدخل على صفحة وتنتظر 5 ثواني وبيظهر لك فوق يمين في أعلى الصفحة بعد الـ 5 ثواني كلمة Skip Ad بتضغط عليها وممكن دا يتكرر مرتين أو تلاتة ..

تقبل تحياتي

رابط هذا التعليق
شارك

اخي الكريم ابو البراء

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

مرفق ملف اكسل اريد ان يظهر اسمي كمعد للورقة تحت الجدول بحيث لايستطيع احد ازالته  ويكون من الافضل ان لايظهر في الطباعة يكون فقط في الشاشة

دفعات معجلة - .rar

رابط هذا التعليق
شارك

أخي الكريم

بحيث لا يستطيع أحد إزالته ..جملة صعبة .. لأن لكل فعل رد فعل مساوي له في المقدار ومضاد له ف الاتجاه ..فلكل حماية كسر حماية ، فمن الصعب وضع الاسم في خلية وعدم استطاعة إزالته ..حتى لو قمت بحماية الخلية وحماية ورقة العمل .. فيه طرق لفعل ذلك ولكن يمكن تخطيها ..! فما من سبيل لعدم استطاعة الإزالة

 

رابط هذا التعليق
شارك

اخى الكريم واستاذنا العظيم

بارك الله لك وبارك عليك ورزققك الفردوس الاعلى ان شاء الله

فعلا تم التحميل

جزاك الله كل خير

 

  • Like 1
رابط هذا التعليق
شارك

أخي الكريم وعليكم السلام

لقد قمت لك بتقديم كود يقوم بالمطلوب .. فقط غير الخلية المراد وضع القيمة فيها

إذا لم يكن المطلوب فوضح من جديد بشيء من التفصيل .. وهل تريد عمل كود للطباعة بشكل منفصل لإزالة القيمة أثناء الطباعة ؟؟

 

الرجاء من الأخوة التدخل لإنهاء الموضوع حيث أنني أعاني من مشكلة كبيرة في جهازي ولن أتمكن من تجربة الأكواد

تقبل تحياتي

رابط هذا التعليق
شارك

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.

  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

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

Important Information