logo

لوحة التميز الأسبوعي
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
العضو المتميز المشرف المتميز المراقب المتميز المدير المتميز الموضوع المتميز القسم المتميز
احمد شريف ali mohamed ali-- لا تميز خلال هذه الفترة YasserKhalil نقل بيانات بشرط اكسيل اسئله واجابات



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


  1. أكاديمية الصقر للتدريب
  3. منتدى الاكسيل
  5. اكسيل اسئله واجابات
  7. طلب معادلة في برنامج حجز قاعات


موضوع مغلق


  • تمت الإجابة
subject icon تمت الإجابة طلب معادلة في برنامج حجز قاعات
28-09-2021 02:37 مساءً
بدون صورة شخصية
بكار للأبد
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-01-2018
رقم العضوية : 3730
المشاركات : 291
رصيد العضو : 0
الجنس :
تاريخ الميلاد : 13-9-1973
الدعوات : 2
قوة السمعة : 2222
الاعجاب : 5
من مواضيع :بكار للأبد
خطأ برمجي والماكرو لا يعم ..
رجاء تحويل جدول وورد الى ..
طلب تعديل في ترحيل بيانات ..
طلب استخراج بيانات متخصصة ..
بحث عن برنامج أرشفة إلكتر ..

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

أعزائي الكرام بعد التحية الحارة والسلام عليكم ورحمة الله وبركاته ... بحاول اعمل برنامج للشغل عندي يختص بحجز قاعات لعمل ندوات او مؤتمرات او أنشطة ثقافية ولكن ينقصني بعض الطلبات في هذا البرنامج حتى يكتمل ويرى النور وكلي ثقة في خبرة ومهارة حضراتكم وكلي أمل في مساعدتي إن أمكن وجزاكم الله عني خير الجزاء .. الطلبات هي:

- في خانة التاريخ يرجى إدخال نتيجة او تقويم ميلادي في كل خلية حتى يدخل المستخدم التاريح من خلالها زي الانترنت حتى أتلاشي اختلاف التنسيق بين مستخدم وآخر .
- يرجى عند اختيار التاريخ أن يتم ترتيبه تلقائيا بمعنى إذا أدخل المستخدم تاريخ نشاط في 1/10/2021 واستمر في الإدخال بترتيب الأيام 2/10/ ، و 3/10 وهكذا فإذا أدخل تاريخ 1/10يذهب بصفه ليترتب تلقائيا بعد تاريخ 1/10/2010 وهكذا .. أرجو أكون قد أوضحت الفكرة
- وهل هناك معادلة او طريقة عندما ادخل التاريخ عن طريق النتيجة أو غيرها ( لو تعذرت ) أن يقوم بكتابة اسم اليوم بالعربي في خانة اليوم يعني مثلا لو كتبت 6/10/2021 يكتب في خانة اليوم (الأربعاء) وهكذا .
- يرجى عدم السماح بتكرار الميعاد مرتين في نفس اليوم ونفس القاعة ويظهر رسالة تقول له أن الميعاد موجود من قبل

مرفق الملف المرجوالتعديل عليه
برنامج حجز قاعات 2021.xlsx

وجزاكم الله كل خير وأطعمكم من الجنة أشهى لحم طير أمين يا رب العالمين
 
 
  برنامج حجز قاعات 2021.xlsx   تحميل xlsx مرات التحميل :(7)
الحجم :(13.078) KB





look/images/icons/i1.gif طلب معادلة في برنامج حجز قاعات
  03-10-2021 09:54 مساءً   [1]
بدون صورة شخصية
soufisamchi
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-07-2018
رقم العضوية : 7354
المشاركات : 29
رصيد العضو : 0
الجنس :
تاريخ الميلاد : 1-1-1980
قوة السمعة : 170
الاعجاب : 0

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

تفضل اتمنى انى فهمت مقصودك
 
 
  برنامج حجز قاعات 2021.xlsx   تحميل xlsx مرات التحميل :(5)
الحجم :(15.876) KB


أثارت هذه المشاركة إعجاب: hassona229، YasserKhalil، بكار للأبد، Eslam Abdullah،



look/images/icons/i1.gif طلب معادلة في برنامج حجز قاعات
  04-10-2021 09:01 صباحاً   [2]
بدون صورة شخصية
بكار للأبد
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-01-2018
رقم العضوية : 3730
المشاركات : 291
رصيد العضو : 0
الجنس :
تاريخ الميلاد : 13-9-1973
الدعوات : 2
قوة السمعة : 2222
الاعجاب : 5
السلام عليكم ورحمة الله وبركاته

جزيل الشكر سيدي الكريم هذا هو المطلوب ولكن هل يمكن معادلة لترتيب التاريخ بمعنى إذا أدخل المستخدم تاريخ نشاط في 1/10/2021 واستمر في الإدخال بترتيب الأيام يعني 2/10 و3/10 و4/10 و5/10 وهكذا فإذا أدخل تاريخ 1/10 مرة أخرى بغرض عمل حجز آخر يذهب التاريخ بصفه ليترتب تلقائيا مع الصف بتاعه بعد تاريخ 1/10/2010 وهكذا .. أرجو أكون قد أوضحت الفكرة




look/images/icons/i1.gif طلب معادلة في برنامج حجز قاعات
  05-10-2021 11:19 مساءً   [3]
بدون صورة شخصية
soufisamchi
عضو مشارك
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 24-07-2018
رقم العضوية : 7354
المشاركات : 29
رصيد العضو : 0
الجنس :
تاريخ الميلاد : 1-1-1980
قوة السمعة : 170
الاعجاب : 0
تفضل بكار للابد هل هذا ما تريد ؟؟
 
 
  برنامج حجز قاعات 2021.xlsx   تحميل xlsx مرات التحميل :(11)
الحجم :(15.685) KB


أثارت هذه المشاركة إعجاب: YasserKhalil، hassona229، بكار للأبد، Eslam Abdullah،



look/images/icons/i1.gif طلب معادلة في برنامج حجز قاعات
  06-10-2021 12:18 مساءً   [4]
بدون صورة شخصية
بكار للأبد
عضو فعال
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 17-01-2018
رقم العضوية : 3730
المشاركات : 291
رصيد العضو : 0
الجنس :
تاريخ الميلاد : 13-9-1973
الدعوات : 2
قوة السمعة : 2222
الاعجاب : 5
تمام حضرتك متشكر جدا ، بس انا كنت عايز معادلة او كود يخلي التاريخ يترتب تلقائيا بمعنى لو كتبت تاريخ نشاط في 1/10/2021 واستمريت في الإدخال بترتيب الأيام يعني 2/10 و3/10 و4/10 و5/10 وهكذا فإذا أدخلت تاريخ 1/10 مرة أخرى علشان اعمل حجز آخر يذهب التاريخ مع صفه بالكامل ليصعد ليترتب تلقائيا مع الصف بتاعه بعد تاريخ 1/10/2010 وهكذا .




look/images/icons/i1.gif طلب معادلة في برنامج حجز قاعات
  03-11-2021 06:24 مساءً   [5]
صورة Eslam Abdullah الشخصية
Eslam Abdullah
مشرف على لغات برمجة آخرى
rating
معلومات الكاتب ▼
تاريخ الإنضمام : 03-10-2017
رقم العضوية : 852
المشاركات : 1580
رصيد العضو : 0
الدولة : مصر
الجنس :
تاريخ الميلاد : 1-9-1995
الدعوات : 5
قوة السمعة : 10861
الاعجاب : 6
موقعي : زيارة موقعي
[قمت بتعديل الكود بتاريخ 04/11/2021]
عشان مشكلة التصفيه لعمود فقط وليس نطاق فى حالة النطاق العادى
ولو ليك فى الأكواد ممكن تستخدم السطر الخاص بفلترة النطاق للجدوال ايضا
لكن انا اتعاملت مع الجدول باسلوبه افضل عشان السرعه والاداء
مرفق ملف عمل بتعديل الكود حيث يعمل مع الـ Table ومع الـ Range بشكل تلقائى
وبنفس الشروط السابقه يوجد سطر لتحديد [رقم بداية الصفوف ورقم العمود الخاص بالفلترة] وهو:
CODE
Dim rw%, col%: rw = 3: col = 2 'rw for title - col for filter

وآلية عمل الكود بتلوين تلك الخلية بلون غير [الأسود] وإلا يتوقف عن العمل

مرفق ملف تطبيق عملى على شيت نوفمبر بما ان سؤالك مركز عليه
(ولقيت باقى الشيتات فاضية فمسحتها عشان يكون ملف عمل بسيط لاى حد)

والكود كامل كالتالى تقدر تضيفه كما هو بأى شيت
CODE
Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
Application.ScreenUpdating = False

Dim rw%, col%: rw = 3: col = 2 'rw for title - col for filter
If Target.Row > rw And Target.Column = col And Cells(rw, col).Font.Color <> 0 Then
If Not Cells(rw, col).ListObject Is Nothing Then
With Cells(rw, col).ListObject
    'Cells(rw, col).Value = .ListColumns(col - .Range.Column + 1).Name
    .Sort.SortFields.Clear
    .Sort.SortFields.Add Key:=Range(.Name & "[[#All],[" & Cells(rw, col).Value & "]]"), Order:=xlAscending
    .Sort.Header = xlYes
    .Sort.Apply
End With
Else
    Cells(rw, col).Sort Key1:=Cells(rw, col), Order1:=xlAscending, Header:=xlYes
End If: End If

Application.ScreenUpdating = True
Application.EnableEvents = True
End Sub
 
 
  ترتيب جدول تلقائى.rar   تحميل rar مرات التحميل :(1)
الحجم :(26.787) KB


أثارت هذه المشاركة إعجاب: hassona229، YasserKhalil، بكار للأبد،





المواضيع المتشابهه
عنوان الموضوع الكاتب الردود الزوار آخر رد
امل المساعدة  في معادلة لا تظهر الجمع تلقائي وهي SUBTOTAL ابوعلي الحبيب
 6 163 ابوعلي الحبيب
امل المساعد في تعديل المعادلة التي تحسب المدة المتبقية على تاريخ معين بحيث يختفي عندما يتم كتابة تم ابوعلي الحبيب
 0 173 ابوعلي الحبيب
خطأ عند تحويل معادلة MAXIFS الى كود VBA EM_ACC
 0 123 EM_ACC
معادلة لحساب عمولة مبيعات بأكثر من شرط حسب النسبة Yasser Albanna
 1 224 Yasser Albanna
كود معادلة الاخلاق حسين الحمادي
 4 1412 حسين الحمادي

الكلمات الدلالية
قاعات ، برنامج ، معادلة ،

« طباعة الصورة من على اليوزرفورم | نقل القيمه الموجوده فى خليه بمجرد تحديدها »








اخلاء مسئولية: يخلى منتدى أكاديمية الصقر للتدريب مسئوليته عن اى مواضيع او مشاركات تندرج داخل الموقع ويحثكم على التواصل معنا ان كانت هناك اى إنتهاكات تتضمن اى انتهاك لحقوق الملكية الفكرية او الادبية لاى جهة - بالتواصل معنا من خلال نموذج مراسلة الإدارة .وسيتم اتخاذ الاجراءات اللازمة.
سياسة النشر: التعليقات المنشورة لا تعبر عن رأي منتدى أكاديمية الصقر للتدريب ولا نتحمل أي مسؤولية قانونية حيال ذلك ويتحمل كاتبها مسؤولية النشر.

الساعة الآن 05:22 PM
سياسة الخصوصية