محمود الحربي

بارك الله فيكم جميعاً الطريقة الاولي للمهندس علي مشيت معاي تمام 

الف شكر استاذ محمد صالح

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

لدي مشكلة اني اطبق عملية VLOOKUP على خليه فيها صيغة ولا تقبل معاي 

=VLOOKUP(C2;$Q$5:$R$16;2;0)

C2 عبارة عن A2&B2 .. ماهو الحل ؟ .. مرفق مثال رحم الله  والديكم

TEST.xlsx

احتاج دالة مثل VLOOKUP  بس هنا الكود لدي ياخذ رقم متسلسل يعني ما يعطيني اسم الادارة

بالتفصيل :

احتاج اذا الكود يحتوي على  EAS  يعطيني في الخلية B2  ( الادارة المالية ) مثلاً

codeid.xlsx

للرفع

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

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

الخلية المحددة 

المجلد موجود على نفس الكمبيوتر وليس على الدرايف 

اسم الملف موجود هنا في الخلية F10

=HYPERLINK("C:\Users\MAHMOUD\Desktop\1441\"&F10&".pdf";"فتح المعاملة")

تقبلو تحياتي 

اسعدك الله اخي ( لاكن هذا الجمل متغيرة وليس ثابته ) و الدالة الي وضعتها ثابته بحث عن هذه الجملة ونسخها في الخلية
الذي اريدة اي جملة تاتي في "    "  تاخذ في الخلية 

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

اسعد الله اوقاتكم بكل خير 

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

كل ما احتاجة مفصل في الملف وهو نقل ( لا يوجد ترخيص ) في عامود و المبلغ 3000 في عامود 

{"ViolationDescription":"لا يوجد ترخيص","SubjectNumber":"مادة (5-5)","ReferenceSystemPaper":"التراخيص .","ViolationPunishment":"3000","ViolationRepitetion":1,"$$hashKey":"object:6995"}

رحم الله والدينكم وجزاكم الله حير 

بياناتي.xlsx

شاكر على حسن اهتمامك لاكن هذا غير المطلوب

اريد طريقة اتصال فعاله عند التسجيل على قوقل شيت في خلية يتم نقلها 

في الاكسل 

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

لدي شيت في قوقل واريد ربطه في شيت في الاكسل بنقل كامل البيانات التي في الصفحة

هل الطريقة ممكن وهل احد جربها يفيدنا في ذلك 

رحم الله والدينا والدينكم جميعاً

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

اريد استرجاع بيانات في ملف اكسل تالف هل احد يقدر يساعدني 

الملف مرفق

رحم الله والدينا والديكم

123.rar

الف شكر م. مجدي يونس

لاكن اذا وضعت Textbox اضيف فيه اسم الملف وزر فتح كيف يكون الكود

رحم الله والدينا والديكم 

رحم الله والدينا والديكم 

لدى مشكلة في خطا مرفق لكم الخطأ 

اتمني من الله ثم من اساتذتنا المساعدة 

Private Sub ButtonSerach_Click()
Dim tb1 As Boolean, ib As Boolean
Dim R As Long, RR As Long
Dim C As Integer
Dim MyFind, MySrch, MyVelue
''''''''''''''''''''''
Me.ListFind.Clear
If Len(Trim(Me.TextFind)) = 0 Then Exit Sub
'''''''''''''''''''''
C = Me.BoxFind.ListIndex + 1
tb1 = CBool(Me.CheckFindDate.Value = True)
If tb1 Then
    If Not IsDate(Me.TextFind) Then kh_SetDate Me.TextFind
    MyFind = CDbl(CDate(Me.TextFind))
    
Else
    MyFind = Me.TextFind.Value
End If
'''''''''''''''''''''''
With MyRngdate.Cells(2, Ar(C))
    For R = 1 To ContRow
        If Len(Trim(.Cells(R, 1))) Then
            If tb1 Then MySrch = .Cells(R, 1).Value2 Else MySrch = .Cells(R, 1).Value
            ib = IIf(Me.CheckFind.Value, InStr(1, MySrch, MyFind, vbTextCompare) = 1, InStr(1, MySrch, MyFind, vbTextCompare))
            If ib Then
                MyVelue = .Cells(R, 1).Value
                If IsDate(MyVelue) Then MyVelue = Format(MyVelue, DtF)
                Me.ListFind.AddItem MyVelue
                Me.ListFind.List(RR, 1) = R
                RR = RR + 1
            End If
        End If
    Next
End With

Me.LblFindCount = Me.ListFind.ListCount
If RR = 0 Then MsgBox " لا توجد نتائج لبحثك هذا  ", mBox, "تنبيه"

'''''''''''''''''''''''''
End Sub
 

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

هل هناك حل في الكود لعملية البحث في ناتج المعادلة

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

اخواني واساتذتي الاعزاء وجدت في احد المواضيع الجميلة جداً والذي سوف استفيد منه جداً

وعند التعديل عليه لا يعمل الفورم هل من شخص يستطيع مساعدتي المف مرفق

رحم الله والدينا والديكم

اضافة بحث تعديل.rar

نعم يوجد صفوف مخفيه 

المفروض عند الاخفاء يتم انزال العدد 

شكراً لك الاساتذه الى قدموا لى المعادلات السابقة لاكن توجد مشكلة في حالة تصفية البيانات لا تنقص الاعداد مثل المعادلة السابقة هذا مثال تم تصفية العامود الثاني باسم احمد تنقص الاعداد حسب التصفية

في المعادلة المعطاه لا تنقص الاعداد وهي مجربة باسم ( محمد )

البحث بجزء من الاسم.xlsx

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

اخواني واساتذي الاعزاء لدي معادلة للبحث في عامودين في حالة تطابق الاسماء تمام

هل استطيع التعديل عليها للبحث بجزء من الاسم في الخلية

اقتباس

=SUMPRODUCT(($B$1:$B$997=$A1018)*(SUBTOTAL(103;OFFSET($B$1;ROW($B$1:$B$997)-ROW(B$1);0))))+SUMPRODUCT(($C$1:$C$997=$A1018)*(SUBTOTAL(103;OFFSET($C$1;ROW($C$1:$C$997)-ROW($C$1);0))))

البحث بجزء من الاسم.xlsx

للرفع 

اللهم ارحم  والدينا والدينكم

استغفر الله و الله اكبر ز الحمدلله

اللهم صلى وسلم وسلم على سيدنا وحبيبنا محمد

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

ارفق لكم صيغة تاريخ بالعربي واريد تحويلها الى الميلادي

رحم الله والدينا والديكم

تغير التاريخ.xlsx

عامود ( الموافقة )

لو طريقة نقل البيانات تتم عن طريق كود 

تكون اجمل اذا كانت تأتي في الاعلي 

يكون عملية الفرز لا حاجه لها

لم تضبط معي وهذا الجدول الأساسي الي اشتغل عليه لان الملف حجمه كبير الان رفعته على موقع اخر

الملف السابق ( مثال ) المطلوب :

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

اريد فقط ترتيبه ترتيب ثابت الصفوف الفارغة تحت والتي يوجد بها بيانات في الأعلى 

ترتيب الالي لا يتم التدخل به مثل الفرز

https://up.top4top.net/downloadf-782eix3y1-rar.html

واذا حاب الغي صف وليس عامود

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

اخواني الاعزاء احتاج مساعدة في ترتيب طلبات من كل مؤظف حسب اولوية الطلب في نفس الملف ( نفس نظام الفرز بس يعمل تلقائي ) بدون ما اعمل فرز كل ما ادخل الملف

مرفق لكم مثال 

رحم الله والدينا والدينكم

الترتيب حسب اولوية الطلب.xlsx