Saleh89

جزاك الله خير

السلام عليكم

دالة Filter هل هي متوفرة في نسخة أوفيس 2019؟ أم في نسخة 365؟

السلام عليكم

عندي هذا الملف المرفق فيه صفحة للعملاء وصفحة للحركة ومسوي فورم ترحيل اللبيانات لصفحة الحركة،

أريد كود في حالة لم يكن اسم العميل موجود في صفحة العملاء يتم اضافته تلقائياً من خلال الليست اللي في الفورم

إن شاء الله الصورة واضحة

Customer test.xlsm

لم أنسى الإعجاب يا صديقي، ولكن بسبب انشغالي وعدم تجربة الكود لم أرد على أستاذنا القدير سليم

جزاك الله خير، وبارك فيك

لكن هل يمكن الحصول على طريقة أسهل وكود أصغر 😁

السلام عليكم ، حياكم الله جميعاً

عندي ملف اكسل فيه صفحتان وهما: (DatabaseShe , AddShe ) أريد فرز البيانات الموجودة في DatabaseShe من صفحة AddShe!

كود الفرز موجود لكن المشكلة أني لازم استخدم تفعيل الصفحة: DatabaseShe.Activate حتى يعمل فرز!!

هل من طريقة لعمل فرز أو حتى حذف مع الاستغناء عن Activate؟

Database_1.xlsm

السلام عليكم

حياكم الله جميعاً.

سؤال: ماهي الأفضلية في عملية كشف حساب عميل؟

1- طريقة استخدام الأكواد مثل ماشرحها الأستاذ (عصام الصياد).

2- طريقة الفلترة المتقدمة (Advanced Fillter).

أي الطريقتين أفضل وأكثر دقة؟؟

شكراً للجميع ⚘

شكراً لك 🌷

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

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

حياكم الله

عندي هذا الملف يحتوي على: الفئة، الحالة، المستشفى

الفئة تتكرر ولنفس الفئة تكون نتيجتين (سليم؛ غير سليم)

كيف أستطيع جلب النتيجتين لنفس الفئة!

استخدمت دالة Index + Match ولكنه يجلب النتيجة الأولى للفئة؛ الثانية لا يقرأها؟!

شاكر لكم بكل حرف تخطه أناملكم هُنا 🙂

Test.xlsx

1 ساعه مضت, عبدالاله الابي said:

السلام عليكم لو سمحتوا اريد حساب عدد الخلايا التي تحتوي على قيمة"positive" في عمود نتيجة الفحص السريع  إذا كانت قيمة الخليه المقابلة لها في عمود أخر اسم المرفق الصحي على سبيل المثال هو "مركز المخادر الصحي"  ولكم جزيل الشكر

 

محافظة اب كوليرا 2019-7-3.xlsx 749.84 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 1 download

أعتقد هذ الكود يفي بالغرض

=SUMPRODUCT((L2:L185="مركز المخادر الصحي")*(U2:U185="Positive"))

8 ساعات مضت, سليم حاصبيا said:

اذا اردت ان تكون الاسماء في خلية واحدة (صفحة Salim من هذا الملف)

هذا الكود

Option Explicit

Sub max_min()
Dim mY_rg As Range
Dim last_row%, i%, J%
Dim M%: M = 12
last_row = Cells(Rows.Count, 1).End(3).Row
Dim st_max$, st_min$
Range("l2").CurrentRegion.Offset(1).ClearContents
For i = 3 To last_row
 For J = 2 To 5
  If Cells(i, J) = _
    Application.Min(Cells(i, 2).Resize(, 4)) Then
    st_min = st_min & Cells(2, J) & ","
  ElseIf Cells(i, J) = _
    Application.Max(Cells(i, 2).Resize(, 4)) Then
    st_max = st_max & Cells(2, J) & ","
  End If
 
 Next
  Cells(i, M) = Mid(st_min, 1, Len(st_min) - 1)
  Cells(i, M + 1) = Mid(st_max, 1, Len(st_max) - 1)
 st_min = "": st_max = ""
Next
End Sub

الملف مرفق

 

Tahsil_Macro.xlsm 26.69 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 2 downloads

جزاك الله خير أستاذي 🌻

فكرة أن يكون كل سائق في خلية بمفردة فكرة جميلة وراقت لي

للخصوصية: أحاول ارسل لك ملف العمل، لكن المشكلة أن هذه الرسالة لم تسمح لي بإرسال الرسالة: " مسموح لك بارسال 0 رسائل في اليوم . حا،ول مره اخري بعد انتهاء اليوم. "

6 دقائق مضت, سليم حاصبيا said:

هذه المعادلة في  G3  واسحب نزولاً

=INDEX($B$2:$E$2,MATCH(MAX($B3:$E3),$B3:$E3,0))

لكن المشكلة اذا تساوى رقمان أو أكثر و كانا ( Max أو Min )  تحصل  على أول اسم فقط 

كما في الصف الخامس او السادس من هذا الملف 

Tahsil.xlsx 10.35 \u0643\u064a\u0644\u0648 \u0628\u0627\u064a\u062a · 0 downloads

جميل جداً

هل يمكن مثلاً وذع الاسمين معاً إذا تساوت نسبة تحصيلهما؟

----------------------

بقي السؤال الثاني: كيف أعرف أن السائق أحمد هو من تكرر اسمه أكثر من غيره حتى يتم منحه المكافئة؟

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

حياكم الله.

سؤالي الأول: أريد أخذ بيانات خلية الصف 1 بالاعتماد على أكبر نسبة تحصيل في الصف 2؟

سؤالي الثاني: خلال شهر 6 - مثلاً - أريد أعرف من هو السائق الأكثر تحصيلاً بالاعتماد على مجموع تكرار اسمه؟

الملف المرفق يوضح الفكرة أكثر..

نسبة التحصيل.xlsx

6 ساعات مضت, ali mohamed ali said:

تفضل اخى الكريم المشكلة من عندك

تم تطبيق المعادلة بملفك

بارك الله فيك

 

مديونية.xlsx

شكراً لك لم انتبه للمشكلة...

قمت بتعديل الكود لقراءة القيمة الصغرى والقيمة الكبرى لأني ربما أقوم بفرز الجدول حسب الأسم ...

=IF( A2="",""," مديونية من تاريخ " & TEXT(MIN($A$2:$A$900),"dd/mm/yyyy") & " حتى تاريخ "&TEXT(MAX($A$2:$A$900),"dd/mm/yyyy"))

جزاك الله خير

.:: تمت تلبية الطلب ::.

6 ساعات مضت, سليم حاصبيا said:

هذه المعادلة

=IF( A2="",""," مديونية من تاريخ " & TEXT(A2,"dd/mm/yyyy") & " حتى تاريخ ")

  

الكود هو المطلوب لكن ينقصه الجزء الثاني وهو إلتقاط آخر خلية في العمود A لكي يتم كتابة التاريخ تبعها...

3 ساعات مضت, ali mohamed ali said:

بارك الله فيك استاذ سليم معادلة ممتازة

ولكن الأستاذ صالح اذا كان محتاج ان يكون الى اخر تاريخ بالعمود

 فيمكن استخدام المعادلة بهذه الطريقة

  

=IF( A2="",""," مديونية من تاريخ " & TEXT(A2,"dd/mm/yyyy") & " حتى تاريخ "&TEXT(MAX($A$2:$A$900),"dd/mm/yyyy"))

  

هو المطلوب بعينه أستاذي محمد، لكن بعد كتابتي له في الخلية لا يظهر أي شيء وكأن الخلية فارغة من البيانات...!!

بسم الله

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

عندي ملف المديونية الشهرية للموظفين عمود A يحمل التاريخ قمت بإضافة صف في أعلى الورقة وأدرجت فيه الدالة التالي:

=" مديونية من تاريخ " & A2 & " حتى تاريخ "

لكن بدلاً من إظهار التاريخ أظهر لي رقم التاريخ في أكسل ؟؟

أيضاً كيف أجعل الدالة تقوم بالتقاط آخر خلية في العمود A لكتى تكتمل الدالة: ( حتى تاريخ )..

شاكر لكم أساتذتي الأحبة

مديونية.rar

شاكر لك أخي ..

لكن هل أثناء قيامي بالكتابة سيقوم بالبحث وفرز نتيجة البحث تلقائي ؟؟؟

سأجرب ذلك الليلة إن شاء الله

السلام عليكم

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

شاكر لكم أحبتي 

في ٢٨‏/١‏/٢٠١٩ at 21:37, ابو العلاء said:

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

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

اود عمل فلتر لهذه البيانات بحيث تظهر البيانات المظلله بلون فقط مع احفاء الباقي 

مع جزيل الشكر

new.xlsx

كيف قمت بعمل خيار البحث بحيث تكتب جزء ويقوم بالبحث تلقائي!!

هل هو InputBox ؟؟ 

جزاك الله خير

تمت الإفادة

3 دقائق مضت, ali mohamed ali said:

يمكنك التغيير كما تشاء فى المعادلة الى اى تاريخ تريد

وبالنسبة لعلامة السالب يمكنك حلها ببساطة بضرب الناتج فى *-1

ممكن تكتب لي الكود لو تسمح لأرى طريقة صياغته...

32 دقائق مضت, ali mohamed ali said:

وعليكم السلام

اهلا بك فى المنتدى-تفضل

 

Tab_Ali.xlsx

يعني باستخدام الدالى SumProduct ... جزاك الله خير

لكن كيف الجمع حسب التاريخ ؟؟

سؤال أخير لو تسمح!

كيف يمكنني تجاهل إشارة السالب؟ مثلاً: A=2 و B=1 حيث أن: B-A=-1 ..

السلام عليكم

حياكم الله وبياكم أساتذتي ..

طلب بسيط إن شاء الله  يكون سهل عليكم.

عندي ملف وأريد مثلاً جمع المبالغ حسب شرط معين في عمود آخر والشرط يكون كالتالي:

جمع القيم في العمود F وإنقاص منها القيم في العمود G بشرط أن يكون الصف يحوي ثلاث نقاط (...)

الملف المرفق يشرح الفكرة أكثر..

أيضاً نفس الفكرة ولكن جمع القيم حسب التاريخ؛ مثلاً:

جمع القيم في العمود F وإنقاص منها القيم في العمود G بشرط أن تكون بتاريخ 2019 < هذا إذا فرضنا أن لدينا حساب أكثر من سنة..

Tab_Ali.rar

السلام عليكم

أول مشاركة وأول موضوع ^_^

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

مقاس الكرت تقريباً = (الطول: 2.5 سم) و (العرض: 4.2 سم).

الفكرة كالتالي:

لدي عدة أصناف (1, 2, 3, الخ...) وأريد كتابة أكواد لكل صنف يبدأ الترقيم من (100,000)

حيث أن الصنف (1) سيحمل الرقم (100,000) وأريد منه (200) كرت كلهم يحمل الرقم (100,000)

الصنف (2) سيحمل الرقم (100,001) وأريد منه (577) كرت كلهم يحمل الرقم (100,001).

وهكذا...

قمت بالفصل بين الخلايا بخلايا لاجل عندما أقوم بتقطيع الكروت.. هل ملفي أعلاه صالح للفكرة؟

هل لديكم أي اقتراح؟؟

شاكر تعاونكم