Jump to content
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

Search the Community

Showing results for tags 'كود'.

  • Search By Tags

    Type tags separated by commas.
  • Search By Author

Content Type


Forums

  • Welcome
  • MS Applications & Languages
    • Personal Channels, Free & Paid Courses
    • Individuals Personal Paid Adds
    • General Forum
    • MS Excel
    • MS Access
    • دعم أنظمة الويندوز المختلفة
    • MS Word
    • MS Powerpoint
    • MS Outlook
    • MS Visio
    • Ms Project
    • MS Frontpage
    • MS InfoPath
    • MS One Note
    • MS Publisher
    • Communicator
    • Expression Web
    • SQL Server
    • VB.net
    • C#.net
  • Other Programming Languages and Tools
    • General Web Discussons
    • Delphi
    • PHP
    • Android Programming
  • Management Topics and Software
    • إدارة المشاريع
    • Quality Management
    • Leadership & Human Resource Development
    • Primavera Enterprise
    • Primavera 3.1
  • Scientific Research and Data Science
    • مناهج البحث العلمي
    • علم الإحصاء
    • Artificial Intelligence & Data Mining
    • Orange
    • R
    • SPSS
    • Python
  • General Section
    • نرحب بزوار الموقع
    • Suggestions and Complaints
    • Officena on Facebook
    • Blogs Posts

Categories

  • VBA Code Library
  • قسم الإكسيل
  • قسم الأكسيس
  • قسم الوورد
  • Project Management
  • Self development التطويرالذاتي
  • EFQM & DGEP
  • معلومات مفيدة
  • أدوات عامة

Blogs

  • M-Taher's Blog
  • Officena
  • مدونة محمد طاهر
  • اا الفاروق اا
  • ‎مدونة أخبار التكنولوجيا
  • M-Taher's Blog
  • يحيى حسين's Blog
  • خبور خير's Blog
  • Dr. AbdelMalek Abu Sheikh's Blog
  • m.hindawi's Blog
  • احمدزمان's Blog
  • الحسامي
  • مدونة أ / محمد صالح
  • yahiaoui's Blog
  • عبدالله المجرب's Blog
  • صيد الخواطر
  • حمادة عمر مدونة
  • مدونة جعفر
  • مدونة عادل حنقي
  • مجدى يونس: لمسة وفاء لمنتدى اوفيسنا
  • Excel Expert Financial&Accounting
  • مدونة اعمال ايقونات الماس لمنتدى اوفيسنا
  • Shivan Rekany
  • رقائق فى دقائق

Find results in...

Find results that contain...


Date Created

  • Start

    End


Last Updated

  • Start

    End


Filter by number of...

Joined

  • Start

    End


Group


Job Title


Location


Interests


AIM


MSN


Website URL


ICQ


Yahoo


Jabber


Skype

  1. السلام عليكم Option Explicit ' بسم الله الرحمن الرحيم " ' ********************* " ' دالة استخراج النص او الارقام " '==============================================" ' False = مهمل او Kh_Number اذا كان " ' تقوم باستخراج النص " ' True = Kh_Number اذا كان " ' تقوم باستخراج الارقام " '==============================================" '----------------------------------------------------------------- Function Kh_Replace_Text(ByVal Kh_Sub As String,
  2. الاخوة الافاضل ارجوا سرعة الرد لدي ملف للتفقيط حاولت استخدامه مؤخرا في اكسل 2007 ووجدت الكلمات العربية غير مفهومة يرجى شرح كيف يمكن تعريبها او اذا كان الاكسل لدي ينقصه اي تعريف للغة
  3. احتجت لدمج محتويات عدد من الخلايا مع دمج محتوياتها فى كمية كبيرة من الجدوال ، مع اضافة فاصلة بين محتوياتها فاعددت هذا الكود اختر الخلايا المراد دمجها و دمج محتوياتها قبل تشغيل الكود Sub mergitwithcomma() Selection.Cells.merge With Selection.Find .Text = "^p" .Replacement.Text = "، " .Forward = True .Wrap = wdFindStop .Format = False .MatchCase = False .MatchWholeWord = False .MatchKashida = False .MatchDiacritics = False .MatchAlefHamza = False .MatchControl = Fal
  4. السلام عليكم اخواني الكرام هذه اول مشاركة لي في منتداكم الرائع واسف انها طلب مساعدة وليست مشاركة فعالة اطلعت على منتداكم الرائع وتعلمت منه الكثير وقمت بعمل بعض ملفات الاكسل التي احتاجها في عملي باستخدام اكواد vba التي تتحفوننا بها ولكن لاني لست الذي يعمل علي هذه الملفات قمت بعمل كلمة سر للكود حتى لا يعبث به من يقوم بادخال البيانات والا ن احتاج الى تعديل في الاكواد ولكني نسيت كلمة السر برجاء مساعدتي في فك الحماية عن الملف وياريت اذا بتعطوني كلمة السر الموجودة لان لدي 3 ملفات مقفلة بنفس كلمة السر وجزاكم الله خيرا الموردين.rar
  5. السلام عليكم اخوانى ما اريدة هو تعديل لكود تصدير اسماء الزوار الى ملف VCF لسهولة استدعاءة للهاتف المحمول.الكود يعمل بنجاح ولكن لاول اسم فقط ولا يقوم بتصدير باقى الاسماء الكود : Const ForReading = 1, ForWriting = 2, ForAppending = 3 Const TristateUseDefault = -2, TristateTrue = -1, TristateFalse = 0 Dim rst As DAO.Recordset Dim fs, f, ts, s 'انشاء الملف فى المسار المحدد بالسطر التالى ActiveControl.Hyperlink.CreateNewDocument "E:\LotusNotes_VCard.vcf", True, True ' فتح الملف المصدر Set fs = CreateObject("Scripting.FileSystemObject") Set f = fs.GetFile("E:\LotusNotes_VCard.vc
  6. السلام عليكم احبتي مشرفي واعضاء المنتدى المطلوب التعدبل على الكود لكي يظهر الميساج مرة واحدة خلال كل شهر وبشرط وجود مبلغ إقتطاع واذا لم يكن وجود مبلغ الإقتطاع يظهر الميساح بعدم وجود الإقتطاع خلال هذا الشهر ويكون كذلك مرة واحدة كل شهر Private Sub cmd_Pay_installments_Click() On Error GoTo err_cmd_Pay_installments_Click Dim rst As DAO.Recordset 'Cridi and Elec Payments Set rst = CurrentDb.OpenRecordset("Select * From tbl_Loans Where [Payment_Month]=CDATE('" & Me.TxtMonth & "')") rst.MoveLast: rst.MoveFirst RC = rst.RecordCount a1
  7. السلام عليكم أحتاج إلى أمر / كود فيجوال يمكنني من إضافة ظل إلى نص . خلال عملي لـ template في الوورد احتجت إلى هذا الأول و قد بحثت و لم أجد إجابة واضحة فلم أحصل على الطريقة الملائمة للاستفادة من الخاصية .FONT.shadow بانتظار إسهاماتكم بارك الله بكم .
  8. ياجماعة كان فيه أخ فاضل منزل برنامج كشوف الملاحظة وهو برنامج رائع بس أنا مش عارف أعدل في الكود عشان العدد في مدرستي كبير أكتر من 20 لجنة وهو متصمم على 16 لجنة بس فرجاء شرح الكود وكيفية التعديل عليه أولا ده الكود ملئ بيانات اليوم الأول: Sub يوم1فترة1() Application.ScreenUpdating = False Sheets("الكشاف").Range("a10:f" & ['الكشاف'!d3] + 9).Select Selection.Sort Key1:=Range("f10"), Order1:=xlAscending Sheets("الكشاف").Range("n10:p" & ['الكشاف'!d3] + 9).ClearContents r = 10 x = 10 xx = ['الكشاف'!d3] + 9 For i = x To xx If Sheets("الكشاف").Cells(i, 3) <&g
  9. السلام عليكم ورحمة الله وبركاته بحثت عن طريقة لتخفيض أمان الاكسيس برمجيا، فوجدت طريقة للأخت زهرة بارك الله فيها ونفعنا وإياها بما تعلم. ولكن لم أستطع تنفيذ الكود مع الأكسيس ٢٠٠٧ حيث يمنع الاكسيس تنفيذ الملف الخاص بالمثال من العمل. فهل من مساعدة لتنفيذ ذلك على ٢٠٠٧ ولكم جزيل الشكر ومرفق المثال الخاص بها. zaAllAccesVersionAndSecurityLowLevel_Pro.rar
  10. الساده السلام عليكم ورحمة الله وبركاته المرفق كود عمليه ضرب عمودين ووضع الناتج فى العمود الثالث من احد الساده الافاضل بالموقع وأريد شرح لخطوات الكود حتى أستطيع الاستفاده منه فى ملف أخر ولكن مسمى الأعمدة مختلفة Sub BOQ() For s = 1 To Sheets.Count Sheets(s).Select x = Cells.SpecialCells(xlCellTypeLastCell).Row For r = 8 To x If IsNumeric(Cells(r, "I")) = False Then Cells(r, "F").FormulaR1C1 = "=RC[2]*RC[4]" Next r Next s End Sub وشكرا
  11. السلام عليكم هل يوجد حل لهذه المشكلة مع العلم انها تظهر في ويندوز 10 وفي الاصدارات الاخرى لاتظهر المشكلة في ملف عمل اكسيل 2003 و اكسيل 2010 نفس المشكلة يرجى الافادة وشكرا
  12. السلام عليكم ورحمة الله وبركاته الرجاء المساعدة في حل مشكلة اولى تظهر عند تشغيل كود لتكرار اوراق وتعبئتها حسب الداتا الموجودة في ورقة ثانية . مشكلة تانية ظهور اصفار (0) عند عدم وجود احد البيانات والمفروض عدم ظهور شيء في الخلية وشكرا مقدماً ‏‏ورقة اسماء اولية.xlsm
  13. السادة الأعزاء مرفق صورة لكود ترحيل لكن أجد عند تشغيل الكود رسالة خطأ ويقوم بعمل لون اصفر فوق Sub CommandButton1 رجاء المساعدة
  14. السلام عليكم ورحمة الله وبركاته اساتذتي الكرام تابعت درس الاستاذ إياد شقورة حول المهارات الفنية في استخدام الحلقات التكرارية طبقت الدرس جيدًا لكن لا ادري لماذا يظهر لي خطأ عند تشغيل الكود هذا هو رابط الدرس المهارات الفنية في استخدام الحلقات التكرارية الجزء الثاني تجدون الكود في الـ UserForm1 صورة الخطأ والملف في المرفقات وجزاكم الله كل خير بيانات الموظف الشخصية.rar
  15. السلام عليكم ورحمة الله اخواني الكرام (اعضاء وخبراء وعلماء) في هذا الصرح العملاق الذي طالما قدم ويقدم الكثير في مجال العلم والمعرفة أود أن أهنئكم وأهنئ نفسي اليوم بإفتتاح الاقسم الجديدة في الموقع التي سوف تقدم مجال واسع في تواصل ونشر المعرفة على مستوى الوطن العربي والعالم أيضاً وفي تلك المناسبة أود أن أقدم لكم كما وعدتكم في موضوعنا السابق وهو برنامج ومنظومة صرافة العملات بحلته وشكله الجديد هدية متواضعة مني لطلابنا الاعزاء وهي البرنامج نفسه ولكن مفتوح المصدر الآن تستطيع مشاهدة ومعرفة الكودات الموجودة في البرنامج وطريقة التصميم والبرمجة بكل بساطة وسهولة كل ماعل
  16. تحياتى لاساتذه المنتدى الكرام هذا العمل مدمج من شرح بعض الاساتذه الكرام هل من الممكن الدمج بين كودين ووضعهم فى زر امر واحد ارجو منكم تعديل الكود المرفق فى الملف لترحيل الفاتوره ( شيت مشتريات ) الى شيت ( اضافه) وحفظ الفاتوره على صيغه pdf فى فلدر مشتريات ووضع لنك فى شيت (يوميه مشتريات ) ويجب عدم ترحيل الفاتوره بدون كتابه اسم العميل وعدم تكرار الفاتوره save pdf.rar
  17. السلام عليكم و رحمة الله و بركاتة عندي مشكلة في النموذج المستمر (continuous form) كما هو مرفق في الصورة عندي مرتبات الأشخاص إذا أردت زيادة المرتب لجميع الأشخاص بقيمة معينة مثلا 500 بيغير المرتبات كلها بناءً علي أول مرتب و بكده كل المرتبات تبقي 5000 مع ان في موظفين رواتبهم أكثر و أقل من 4500 هل من مساعد .. هذا هو الكود الخاص بي
  18. السلام عليكم اريد كود لزر امر يقوم بطباعة ملف مرتبط بكود العميل او باسم العميل بمعني اسم الملف يساوي كود العميل او اسمه مع جزيل الشكر
  19. السلام عليكم ورحمة الله وبركاته قمت بتصميم برنامج على اكسس 2010 واريد ان احمي قاعدة البيانات من النسخ الغير مشروع حتى احفظ حقي بحيث يجب استدام قاعدة البيانات على جهاز كمبيوتر واحد فقط ارجو المساعدة باسهل الطرق دام فضلكم
  20. السلام عليكم ورحمة الله وبركاته السادة الأفاضل أصحاب الخبرات في الاكسل ارجو المساعدة مرفق ملف اكسل لساعات حضور الموظفين مستخرج من برنامج البصمة والمطلوب تغيير تنسيق عمود الوقت للتحكم في البيانات داخله وجزاكم الله خيرا محمود.rar
  21. بسم الله و ما شاء الله اللَّهُمَّ انْفَعْنَا بِمَا عَلَّمْتَنَا , وَعَلِّمْنَا مَا يَنْفَعُنَا , وَزِدْنَا عِلْمًا إِلَى عِلْمِنَا اهداء لكل من شارك بعلمه اقل ما يقال لكم "عندما تنتهى كلمات الابداع و تبدأ من جديد و تنتهى عندكم" بارك الله لكم ( فكرة المدونة هى سهولة الوصول و البحث فى المنتدى للذهاب الى ملف _ المدونه الاصدار الاول من هنا مدونة ا
  22. السلام عليكم ورحمة الله وبركاته من زمان كنت ابحث في المنتديات والمواقع التقنية عن كود لجلب الصور من فولدر الى الاكسيل لم اوفق في هذا البحث واقرب ما وجدته كان كود قديم لا يعمل الا على الاكسيل القديم 97 - 2003 وكان الملف حجمه كبير وبطيء على الجهاز ولا يناسب طبيعة عملي ثم تركت الفكرة لفترة ثم بدأت في الاطلاع على ال VBA وبدات في تسجيل بعض الماكرو البسيطة واستخدامها في عملي حتى تذكرت في يوم رغبتي القديمة فقلت ولم لا لما لا ابدء في عمل كود لجلب الصور من الملف بامكانياتي المتواضعه فبدأت في تسجيل ماكرو عادي ثم عدلت على الكود قليلا قليلا بمساعدة البحث وموقع Stack Overflow وكتاب VBA For Dummies حتى
  23. شباب اريد داله او كود ليفعل التالي .
  24. السلام عليكم ارجو النظر الى المرفق اذا امكن عمل تعديل تهائي على الملف حيث اني في المرحلة الاخيرة الكود الموجود حاليا هو في حال تم وضع رقم الموظف في العامود (بي) يتم استيراد بياناتة من ورقة عمل "داتا" من الاعمدة (سي الى جي) المطلوب 1 في حال نسيان اي موظف من قائمة الموظفين في ورقة العمل"داتا" ولم يتم ذكرة في ورقة عمل "تيست" يظهر الاسم باللون الاحمر في ورقة عمل "داتا" 2 في حال حذف اي اسم من قائمة الموظفين في ورقة العمل "داتا" يتم بشكل اوتوماتك حذف اسمة في قائمة ورقة العمل "تيست" او اظهارة بللون معين على الاقل للتنبية
  25. بسم الله و ما شاء الله اللَّهُمَّ انْفَعْنَا بِمَا عَلَّمْتَنَا , وَعَلِّمْنَا مَا يَنْفَعُنَا , وَزِدْنَا عِلْمًا إِلَى عِلْمِنَا اهداء لكل من شارك بعلمه اقل ما يقال لكم "عندما تنتهى كلمات الابداع عندكم و تبدأ من جديد و تنتهى عندكم" ايام مباركه من الله عز وجل و لا تنسونا من صالح الدعاء أقدمه لكم صدقه جاريه على روح المغفور لها امى و استاذنا / عماد الدين الحسامى للذهاب الى ملف _ المدونه الاصدار الاول من هنا مدونة اعمال ايقونات الماس لمنتدى اوفيسنا_سلسله ت
×
×
  • Create New...