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

Ali Mohamed Ali

المشرفين السابقين
  • Posts

    11649
  • تاريخ الانضمام

  • تاريخ اخر زياره

  • Days Won

    304

كل منشورات العضو Ali Mohamed Ali

  1. مبروك أستاذ أبو ياسين المشولي إنضمامك لعائلة الخبراء ,أسأل الله لك التوفيق والنجاح دائما ..وأعانك الله على هذه المسئولية الجديدة وسدد الله خطاك عن حق وجدارة بارك الله فيك وزادك الله من فضله
  2. الف سلامة على صحة حضرتك استاذى الكريم ونتمنى لك جميعا الشفاء العاجل والعودة الى بيتك واحبائك مرة اخرى
  3. معادلات ممتازة بارك الله فيك أستاذ سليم وزادك الله من فضله ورحم الله والديك
  4. وهذا هو البرنامج برنامج__الطالب_6.xlsm
  5. وعليكم السلام -جرب هذا أستاذ محمد بمعادلات المصفوفة Quiry-لمساعدة فى كود استعلام بناء على اكثر من شرط.xlsx
  6. طيب موجودة في الملف دى حاجة بسيطة جدا فقط =$B2<>""
  7. تفضل وهذه أسهل طريقة لذلك كما بالصورتين test.xlsx
  8. تفضل تم عمل كل المطلوب بصورة أفضل عند الضغط على New Invoice , سوف يتم الترحيل الى الصفحة الأخرى ثم يكتب رقم الفاتورة التالية لا تقوم بكتابة رقم الفاتورة بنفسك -فالأكسيل سوف يقوم بكتابتها لك كود ترحيل الفاتورة.xlsm
  9. بارك الله فيك وزادك الله من فضله
  10. كان عليك استخدام خاصية البحث في المنتدى قبل رفع المشاركة فهناك العديد من الموضوعات التي تخص موضوعك ومنها : https://www.officena.net/ib/topic/94275-ضبط-كود-ترحيل-خلايا-رأسية-الى-خلايا-أفقية-بصفحة-أخرى/?tab=comments#comment-584221 كود ترحيل الفاتورة.xlsm
  11. هذا من داخل البرامج
  12. تفضل اخى الكريم بعد اذن الأستاذ سليم الملف به الكود ومرتبط بزر عند الضغط على الزر سوف يقوم الكود بتقسيم الملف الى عدة ملفات منفصلة باسم كل صفحة ولكن دائما وابدا عود نفسك عند رفع اى مشاركة لابد من رفع الملف معها بتوضيح دقيق عن المطلوب Split.xlsm
  13. أبدعت فأحسنت استاذى سليم كود ممتاز جعله الله فى ميزان حسناتك
  14. وزيادة في اثراء الموضوع-تفضل follow hyperlink to hidden sheet in Excel.xlsm
  15. أحسنت أستاذ مجدى عمل رائع جعله الله في ميزان حسناتك
  16. استاذى الكريم الأمر في غاية البساطة بالنسبة لملفك فعليك بالضغط كليك يمين على اسم الصفحة التي تظهر لديك بالملف ثم الضغط على UNhide كما بالصور لإختيار الصفحة التي تريد اظهارها
  17. وعليكم السلام-اهلا بك في المنتدى -تفضل بلاغات.xlsm
  18. أحسنت أستاذ أبو اَمنة عمل رائع بارك الله فيك وجعله في ميزان حسناتك
  19. بارك الله فيك استاذ مجدى وجزاك الله كل خير
  20. وعليكم السلام-تفضل هذا الكود Option Explicit Sub opening_multiple_file() Dim i As Integer With Application.FileDialog(msoFileDialogFilePicker) .AllowMultiSelect = True .Filters.Clear .Filters.Add "Excel Files", "*.xls*" If .Show = True Then For i = 1 To .SelectedItems.Count Workbooks.Open .SelectedItems(i) Next i End If End With End Sub
  21. الأمر بسيط وسهل جدا عدل في الكود الى رقم الصف الذى تريده عليك بتغيير الرقم 24 الى الرقم المراد بارك الله فيك
  22. المعادلة تعمل بكل كفاءة وتم تجربتها
  23. أحسنت استاذ عبد اللطيف عمل رائع جعله الله فى ميزان حسناتك ورحم الله والديك
  24. أحسنت استاذ مجدى بارك الله فيك وزادك الله من فضله
×
×
  • اضف...

Important Information