ssbnd

أهلا اخ محمد

في المرفقات ستجد 3 فواتير اسمائهن (1 و 2 و 3)، قمت بوضع 3 فواتير لمقارنة مافي الفاتورة مع كشف الرحلات حتى يُفهم المطلوب

تحياتي

فكرت ان اصمم كشف الرحلات بالاكسل بحيث تكون جميع الملفات المستخدمه بالاكسل و لكن بسبب صعوبة تنسيق الصفحات في الاكسل يجعل من كشوفات الرحلات ليس كمثل التنسيق على شكل صفحة الوورد. و بقيت استخدم الوورد لأنه اقوم بإرسال هذه الكشوفات الى جهات اخرى و اريد ان يكون الكشف بشكل لائق من حيث التنسيق، و ايضا بسبب أن الموظف الآخر معي ليس لديه القدره على التعامل مع ملفات الاكسل.

حياك الله اخ عبدالفتاح

عفوا و لكن ليس المطلوب دمج الفواتير الثلاثه

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

تحياتي

السلام عليكم

الأخوة...

أنا اعمل لدى شركة مقاولة مختصة بنقل موظفين من شركتهم إلى بيوتهم، الروتين اليومي لي أنني أقوم قبل بيوم بكتابة جميع رحلات الموظفين في ملف وورد مثلا (كشف رحلات يوم 1-5-2022) يحتوي على جميع رحلات الموظفين لهذا اليوم و عند انتهاء اليوم أقوم بكتابة فواتير الرحلات في ملفات اكسل. كل فاتورة (و التي هي عبارة عن ملف اكسل خاص برحلة واحدة فقط حصلت في هذا اليوم) تحتوي على اسماء الموظفين الخارجين من شركتهم و اسماء الموظفين الداخلين إلى الشركة و جهة الرحلة من أين إلى أين و نوع الرحلة هل هي اتجاه واحد (سواء ذهاب أو عودة) أو ذهاب و عودة أو رحلة عمل تسمى (يوم كامل) إضافة إلى قيمة الرحلة التي وجدت له كود معين بحيث أنه يفحص على الرحلة من أين إلى أين و نوع الرحلة ليعطيني قيمة الرحلة أتوماتيكيا على حسب اسعار الرحلات في شييت Trips Rate.

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

يعني يقوم الكود بالدخول على ملف الوورد و يحدد الرحلة الأولى ثم يقوم بنسخ اسماء الموظفين الخارجين في الرحلة الأولى و يقوم بإنشاء ملف اكسل (تصميمه نفس تصميم ملف الاكسل المرفق) و يضعها في خانة الموظفين الخارجين في فاتورة الاكسل و التي مثلا ستسمى (1.xlsx و التي تعني فاتورة الرحلة رقم 1) ثم يقوم بتحديد اسماء الموظفين الداخلين في نفس الرحلة و يقوم بوضعها في خانة الموظفين الداخلين في فاتورة الاكسل و يقوم بنسخ تاريخ الرحلة و نوع الرحلة. ثم سيقوم ملف الاكسل بعدها بحساب قيمة الرحلة أتوماتيكيا بواسطة الكود الذي عملته ثم يقوم بحفظ الملف في مجلد بإسم تاريخ اليوم (مجلد اسمه 1-5-2022).

ثم يقوم الكود مرة أخرى بالدخول على ملف الوورد و يحدد الرحلة الثانية و يقوم بنسخ البيانات التي ذكرتها سابقا في في فاتورة الاكسل الثانية (2.xlsx فاتورة الرحلة رقم 2) ... ثم بعد حساب قيمة الرحلة اتوماتيكيا بواسطة الكود الذي عملته سوف يقوم بحفظ الملف في نفس المجلد (1-5-2022 لأنه خاص بفواتير رحلات هذا اليوم). و هكذا حتى نهاية رحلات اليوم.

في اليوم الثاني سوف استخدم (كشف رحلات يوم 2-5-2022) و مرة أخرى يقوم الكود بنسخ بيانات الرحلة الأولى و ترحيلها إلى ملف اكسل سيسمى (1.xlsx و لكنه سوف يحفظ في مجلد بتاريخ هذا اليوم الذي هو 2-5-2022). و هكذا.

في الصورة المرفقة سيبين شكل المجلدات المستخدمة.

في المرفقات أيضا كشف الرحلات اليومية الذي يوضح بيانات الموظفين الخارجين و الداخلين و المناطق و نوع الرحلة.

و ايضا في المرفقات عدد من فواتير الاكسل التي استخدمها.

1.xlsm 2.xlsm 3.xlsm كشف الرحلات اليوم تاريخ 1-5-2022.docx

2 ساعات مضت, hassona229 said:

تفضل اخى وعذرا لانى اعمل على الهاتف 

With WS.AutoFilter.Sort
.SortFields.Clear
.SortFields.Add Key:=Range("b3"), Order:=xlAscending
.Apply
End with
Application.ScreenUpdating = True

 

أخ hassona229

ياخي ايش اقول، ربي يجزاك خير

كل شيء تمام و الكود شغال

ربي يحفطك أن شاء الله ما قصرت

7 ساعات مضت, hassona229 said:

اخى 

اذهب للسطر الثالث في صفحه ( ورقه١)

رقم تاريخ رقم العملية رقم العميل الإجمالي

وعلم من اول الكلمه رقم 

الى الكلمه اجمالي

ثم اضغط فلتر 

كما بالصورة

 ثم شغل الكود اخى الكريم

اخ hassona229

ما زال الكود يعطي خطأ

12 دقائق مضت, hassona229 said:

قبل هذا السطر في الكود ( الكود في مشاركتى )

Application.ScreenUpdating = True

ضع هذه السطور

WS.AutoFilter.Sort.SortFields.Clear: .SortFields.Add Key:=Range("b3"), Order:=xlAscending: .Apply

ليصبح لكود هكذا 

WS.AutoFilter.Sort.SortFields.Clear: .SortFields.Add Key:=Range("b3"), Order:=xlAscending: .Apply
Application.ScreenUpdating = True

 

اخ hassona229

هل انت متأكد من الكود لانه اعطى خطأ هنا

.SortFields

compile error

Invalid or unqualified reference

1 دقيقه مضت, عبدالفتاح في بي اكسيل said:

هل  الكود  اشتغل  معاك  

اما  موضوع  ترتيب  التواريخ  ليس  هذا  ما  طلبته وهذا  موضوع  مختلف تماما 

الرجاء  اغلاق  الموضوع  اذا  كان  الكود  يعمل  وفق سؤالك  الاصلي   ولا داعي  لفتح  اسئلة  جديدة 

ابدا  موضوع  جديد   وقد  يساعدك  احد  الاعضاء  بتزويد  كود اخر  يقوم  بالفلترة وترتيب  التواريخ  بدلا  من  الخروج  عن  الموضوع  الاصلي 

تحياتي 

اخ عبدالفتاح

نعم الكود الذي وضعته اشتغل و ايضا الكود الذي وضعه الاخ hassona229 سابقا اشتغل ما قصرتو على المساعده يعطيكم الف عافيه.

و لكني كنت أسأل الأخ hassona229 عن موضوع ترتيب الفواتير عندما قمت انت بوضع الكود الذي أنشأته وهو بشكل مختلف فأعتقدت انه يحل موضوع الترتيب.

شكرا كثيرا على المساعده

موضوع الترتيب يخص العمل الذي اريده فلا أريد ان تكون المشكلة في منقسمه في موضوعين

33 دقائق مضت, عبدالفتاح في بي اكسيل said:

استغرق  مني  الكثير  من  الوقت   حتى  يعمل  نتيجة تعديلات وتصحيحات   بناء  على متطلباتك 

اولا  الغي  جميع  الخلايا  المدمجة  والا  الكود  لن  يعمل  بشكل  جيد  

ثانيا قم بتسمية  الورقة Summary  في  الملف  الذي  سيتم   تشغيل  الماكرو منه

ثالثا  ضع جميع  الملفات في  مجلد واحد  ما عدا  الملف  الذي  سيتم  من تشغيل  الماكرو تجنبا  لاي  مشاكل 

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

خامسا  انسخ  مسار   المجلد  الذي  به الملفات وقم بوضعه  في  الكود  كما  موجود بالضبط (قم بتغيير هذا فقط C:\Users\PC WORLD\Desktop\path)

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

Public Sub Copy_Values_From_Workbooks()

    Dim matchWorkbooks As String
    Dim destSheet As Worksheet, r As Long
    Dim folderPath As String
    Dim wbFileName As String
    Dim fromWorkbook As Workbook
 
    
 
    matchWorkbooks = "C:\Users\PC WORLD\Desktop\path\*.xlsx"
 
    'Define destination sheet
 
    Set destSheet = ActiveWorkbook.Worksheets("Summary")
 
            destSheet.Cells.ClearContents

    r = 0
 
    Application.ScreenUpdating = False
         
    folderPath = Left(matchWorkbooks, InStrRev(matchWorkbooks, "\"))
    wbFileName = Dir(matchWorkbooks)
    While wbFileName <> vbNullString
        Set fromWorkbook = Workbooks.Open(folderPath & wbFileName)
        With fromWorkbook.Worksheets(1)
        destSheet.Range("A3").Value = .Range("A6").Value
            destSheet.Range("B3").Value = .Range("A4").Value
            destSheet.Range("C3").Value = .Range("G5").Value
           destSheet.Range("D3").Value = .Range("G4").Value
           destSheet.Range("E3").Value = .Range("A19").Value
            destSheet.Range("B4").Offset(r).Value = .Range("B4").Value
            destSheet.Range("C4").Offset(r).Value = .Range("H5").Value
            destSheet.Range("D4").Offset(r).Value = .Range("H4").Value
            destSheet.Range("E4").Offset(r).Value = .Range("H19").Value
            
            r = r + 1
        End With
        fromWorkbook.Close savechanges:=False
        DoEvents
        wbFileName = Dir
    Wend
 Call test2
    Application.ScreenUpdating = True
 
    MsgBox "Finished"
    
 
End Sub
Sub test2()
With Range("b4", Range("b" & Rows.Count).End(xlUp)).Offset(, -1)
 .Formula = "=row()-3"
 .Value = .Value
End With
End Sub

 

شكرا اخ عبدالفتاح على وقتك ربي يحفظك

و لكن قمت باضافة عدة فواتير بتواريخ تاليه ثم قمت بعمل فاتورة بتاريخ سابق و لم يتم الترتيب وضع الملخص اخر فاتورة مضافه في اخر سطر و ان كان تاريخها سابق لآخر فاتورة مضافه

كنت اريد ادرج صورة و لكن تظهر لي رسالة خطأ error 200 ما اعرف ليش

32 دقائق مضت, hassona229 said:

اخى الكريم من الذي تحدث عن ترتيب الفواتير

هو احنا اتفقنا على كده

من بدايه موضوعك لم تتحدث عن اي ترتيب

كده هنزعل من بعض ولا ايه

وكمان اين هى هذه التواريخ

 

اخي hassona229

ماذا اذا وضعت فواتير كل يوم في مجلد يعني فواتير يوم 1 نوفمبر اضعها في مجلد اسميه 1 و فواتير ثاني يوم اضعها في مجلد 2 و هكذا و كل هذه المجلدات في مجلد الفواتير

ثم يكون هناك في الكود لووب تقوم بدخول لكل مجلد في مجلد الفواتير يبدأ من المجلد رقم 1 و حتى اخر يوم وهو سيكون المجلد 30 او 31 و عند دخوله في كل مجلد يأخد اي اضافات او تعديل حصلت في فواتير هذا اليوم؟

1 دقيقه مضت, hassona229 said:

اخى الكريم 

 التواريخ في ملفك 

ليست صيغه تواربخ

1\11\2021

لابد ان بكون صبغه تاريخ صحيحه 

01/11/2021

اخي hassona229

فعلا اخي هذا صحيح

4 دقائق مضت, hassona229 said:

اخى الكريم من الذي تحدث عن ترتيب الفواتير

هو احنا اتفقنا على كده

من بدايه موضوعك لم تتحدث عن اي ترتيب

كده هنزعل من بعض ولا ايه

وكمان اين هى هذه التواريخ

 

فعلا اخي لم اتحدث عن ترتيب

و حاشا اذا اردت زعلك ^_^

لكن بحكم كمية الفواتير فعند مراجعه الشركة الأم للفواتيرنا فأنها تقوم بمراجعة الفواتير بحسب ما قدمته لها من اعمال قمنا بعملها لها في كل يوم من ايام الشهر فأذا قمت باضافه فاتورة في الملخص من يوم سابق في نهاية يوم آخر سوف يكون متعب للمراجعه.

يعني هل هناك طريقه لجعل الكود مثلا يبحث عن طريق تاريخ الفاتورة و رقمها (وهو مثلا سيكون اسم ملف الفاتورة يعني فاتورة رقم 3 تاريخ 15 نوفمبر 2021- فأقوم بعمل اسم الفاتورة مثلا (3-15-11-2021)) و يقوم الكود بترتيب بيانات الفواتير بحسب اسمها في الملخص. او انك ترى طريقه اخرى اسهل.

 و شكرا جزيلا

7 دقائق مضت, hassona229 said:

ملف الاكسل سوف يكون به ٣ شيتات فقط

 

كل هذه ال ٦٠٠٠ فاتورة نكون في شيت واحد

هذا الشيت الواحد اسمه (data)

يكون السطر البيان الاول من ببانات الفاتورة

والسطر الثاني يكون البيان الثانى من الفاتورة

وهكذا الى انتهاء الفاتورة

ثم الفاتورة التاليه في السطر الذي يليه

وهكذا الى انتهاء الفواتير

ويكون شيت ثانى باسم search

يكون به شكل الفاتورة التى صممتها وهذا التصميم ياخذ بيانته من صفحه (data) اوتوماتيكى

وشيت ثالث يكون به ملخص الفواتير

 

أخ hassona229

هل تقصد ان جميع بيانات الفاتورة رقم 1 في 1 نوفمبر 2021 سوف تكون في السطر الأول للشيت data

ثم الفاتوره رقم 2 في 1 نوفمبر 2021 سوف تكون في السطر الثاني للشيت data

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

أو اني لم افهم قصدك

و لكن الفكره ممتازه

و لكن بالنسبه للشيت search سوف يكون فيه كود لسحب بيانات فاتورة معينة اقوم انا بأختيارها صحيح.

4 دقائق مضت, hassona229 said:

اخى الكريم لتشغيل الكود

اضغط 

Alt+F11

ستجد modules

ستجد module1

اضغط في اي سطر بها 

ثم اضغط

F5

او يمكنك عمل ذر وربطه بالكود

اخ hassona229 ربي لا أراك هما

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

لكن اسمح لي ان اتعبك

ما هي الآليه في ترتيب معلومات الفواتير بداخل الملخص يعني ربما أكون نسيت فاتورة مثلا في تاريخ 4 نوفمبر 2021  و انا حاليا قد اضفت فواتير حتى تاريخ 20 نوفمبر 2021 يعني أن هناك عشرات الفواتير بعد هذا التاريخ تمت اضافتها. كيف اجعل هذه الفاتورة التي نسيتها و التي قمت بعملها متأخرا ان تندرج تحت الفواتير التي في نفس اليوم.

و شكرا جزيلا

الان, hassona229 said:

ما هو طبيعه العمل

هل هذه الفواتير موجوده في شيتات اكسل ولا لا

ان كانت غير موجوده وانت تكتبها فاتورة فاتورة

فنصيحه منى

كل الفواتير تكون في شيت واحد (فقط)

ويكون يوجد شيت لشكل الفاتورة

ويكون شيت لملخص الفواتير

طبيعه العمل اني استلم اوراق تأكيد لعمل من شركه ام تعمل لديها شركتنا

لكل ورقه تأكيد اقوم بعمل فاتورة كفر فيها معلومات العمل هذا مع سعر هذا العمل و اقوم بإرفاق الفاتورة بورقه تأكيد العمل

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

و في نهاية الشهر اقوم بتسليمهم كل الأوراق (كل فاتورة مضافه لها ورقه تأكيد العمل) أضافه للفاتورة النهائية تشمل مبلغ كل الفواتير للشركه الأم لتأكد من الاسعار التي وضعناها و التأكد من صحتها و لكنهم ايضا يطلبون ملخص لجميع الفواتير وهو شي مرهق بالنسبه لي بالنسبه لهم يأخذون صورة من الفاتورة و الملخص لحفظها في السجلات لديهم.

الان, hassona229 said:

تمام كده مظبوط

هل وضعت هذه الفاتورة الثالثه في نفس الفولدر الذي ارسلته لك في الملف المضغوط أم ماذا صنعت

 

هل هذه الفاتورة ضمن الفولدر الذي في ملف المضغوط ام في مكان اخر

 

اخى الكريم 

الكود به اسم الفولدر هو ( فواتير )

كما بالصورة التاليه

كل ما هو بفولدر فواتير بمجرد تشغيل الكود سوف يجلبه لك اخى الكريم

نعم قمت بتنزيل الملف المضغوط و قمت بعمل استخراج إلى Monthly summery

الفاتورة الثالثه قمت بفتح الفاتورة الأولى و قمت بعمل التعديل عليها و قمت بعمل حفظ بإسم لأنشاء الفاتورة الثالثه في نفس مجلد الفواتير

سؤال متى يتفعل الكود هل عند فتح الملف Monthly Summery.xlsb ؟

6 ساعات مضت, alliiia said:

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

لماذا لا تجعلهم جميعم في ملف واحد؟؟ 

شيت لكل عميل 

وفي النهاية شيت ملخص للفواتير.

 

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

قد قمت بعمل كثير من الاضافات لتسهيل العمل و لكن ما زال العمل يحتاج إلى كثير من الجهد

و الشركة تبحث في موضوع عمل هذا من خلال برنامج و لكني احتاج إلى هذا حاليا.

شكرا على ملاحظتك

شكرا اخ hassona229 على جهدك

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

قمت بعمل فاتورة ثالثه و لكن لم تتم اضافتها في ملف الملخص، يعني هل فقط بأنشاء ملف جديد وهو يقوم آليا بأضافته إلى الملخص، عادتي انني اقوم بفتح أخر ملف فاتورة ثم اقوم بالتعديل على بياناتها ثم اقوم بعمل حفظ بإسم لإنشاء فاتورة جديدة.

و ايضا قمت بتعديل على الفاتورة الأولى و لكن لم يتم التعديل.

هل بأمكانك ايضاح كيف تتم الآلية الأضافه و التعديل او انني لم اقم بشيء كما يجب

شكرا جزيلا

السلام عليكم

لدي مجموعه كبيره من فواتير يتم انشاءها بشكل يومي ببرنامج الاكسل و الوورد تصل إلى 40 فاتورة كل فاتورة تحتوي على بيانات مفصله للعملية (اسم العميل, بيانات القطع المبعاه, عددها و قيمتها ثم القيمة الإجمالية) هذه الفواتير عباره عن ملف اكسل او وورد منفصل لكل فاتورة (يعني اذا عملت 40 عملية يعني 40 فاتورة يعني 40 ملف اكسل او وورد) و على نهاية الشهر اقوم بعمل ملخص لجميع هذه الفواتير في ملف واحد اكسل يحتوي على جزء من بيانات هذه الفواتير (يحتوي فقط على اسم العميل, تاريخ الفاتورة, منطقه العميل, دائن او مدين) في سطر واحد في ملف ملخص عمليات البيع.

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

هل هذا ممكن

Invoice-et1232098-1-11-2021.xlsx Monthly Summery.xlsx Invoice-et1232099-1-11-2021.xlsx

السلام عليكم

لدي إيميل خاص للشركة التي اعمل فيها مركب على برنامج الأوتلوك و لا اعلم ما الذي حدث و لكن فجأة اختفت الرسائل و آخر نسخة احتياطية قمت بعملها للرسائل كانت في 7 \ 7  \ 2021.

قمت بإستيراد هذه النسخة على أمل ان يقوم الاوتلوك بسحب الرسائل التي ما بعد تاريخ 7 \ 7 \ 2021 و لكني تفاجأت بأن برنامج الأوتلوك عند ربطه بأيميلي الخاص للشركة يقوم بسحب جميع الرسائل الموجودة في ايميلي الخاص بالشركة و يتم تكرار الرسائل الموجودة قبل 7 \ 7 \ 2021 و حتى بداية انشاء هذا الإيميل و هو في عام 2016.

عند اتصال الأوتلوك بالأنترنت يقوم بتنزيل اكثر من 7000 رسائله منذ 2016 حاليا و حجمها يتجاوز 2 قيقابايت.

هل هناك طريقة لجعل الأوتلوك يقوم بسحب الرسائل الغير موجوده في علبة الوارد للأوتلوك فقط دون سحب الرسائل الموجودة فيه مسبقا أي ما بعد 7 \ 7 \ 2021.

الله يكرمك و يكثر خيرك اخ سليم

هذا هو الذي اريد فعلا ما قصرت و ربي يكثر من امثالك

عندي فقط استفسار صغير؟

نطاقا الاسماء الذي عملتهم (المنطقة، و المركبة_نوع) كيف قمت بعملهم؟؟

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

هل قمت بعمل تحديد لجميع الاعمدة الأربعه التي تحتوي على اسعار كل انواع المركبات و قمت بتسميتها (المركبة_نوع) !!! 🤨

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

لكن سؤالي هو كيف قمت بعمل نطاقي الاسماء (المنطقة، المركبة_نوع) الذين ظاهرين في المرفق ؟

و أيضا المصنف انواع المركبات أين هذا المصنف ؟ 🤨

و شكرا جزييييلا اخ سليم و يبارك فيك يا رب

حياك الله يا اخ سليم

نعم هي نفسها من الرياض إلى جده ب 300 و من جده إلى الرياض ب 300

الأخ سليم شكرا جزيييييييلا لك

هو فعلا ما أريد اللهم انه هناك جزئية بسيطه لم تعملها و هي

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

يعني مثلا:

من       |        إلى

تبوك     |      الرياض

جده     |      الرياض

و هكذا

فهذا يعني أن كلا العمودين (من) و (إلى) لابد أن يكونا على شكل قائمة و لا يكون العمود (من) خاص فقط بمنطقة الرياض

مثل ما يوجد في المرفق

ارجو انني وضحت الصوره

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

اما بالنسبة لتعليقك يجب ان تكون الجداول من و الى مكتملة كي تظهر كل النتائج. انا لم افهم ما تقصد؟ هل تقصد ان اضع كل اسماء المناطق! انا وضعت هذه المناطق فقط كمثال فقط حتى أعرف كيف ستتم الصيغة و سأقوم انا بأكمال باقي المناطق.

اذا كنت تقصد شيء آخر فالمعذره لم افهم ما تقصده

شكرا جزيلا مره أخرى اخ سليم على مساعدتك وفقك الله دينا و آخره و أرجو ان تكمل الجزئية المتبقية

و شكرا،،،

Prices1.xlsx

السلام عليكم

عندي مشكلة و ارجو منكم المساعدة

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

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

لذا أريد ان يتكفل برنامج الاكسل بهذا عن طريق تدوين جميع المناطق التي تذهب إليها مركباتنا و هي كثيره جدا تصل إلى 20 منطقه حاليا و اختيارها المناطق من قائمة و كذلك اسعار الرحلات من منطقة الرياض إلى المناطق الأخرى (حيث ان منطقة الرياض هي دوما تتجه منها الرحلة او تتجه اليها الرحلة) يعني منطقة الرياض غالبا احد طرفي المعادلة، مالم يتم أستأجار مركبة للعمل بشكل متواصل في منطقة معينه عندها لا تكون منطقة الرياض احد طرفي الرحلة

مثلا:

رحلة من الرياض إلى جده

رحلة من الرياض إلى مكه

رحلة من عرعر إلى الرياض

رحلة من جيزان إلى الرياض

رحلة من الرياض إلى الدمام

و كل منطقة لها سعر معين كما يظهر في الجدول المرفق، و لكن أيضا يختلف سعر الرحلة الواحده من الرياض إلى جده بحسب نوع المركبة المستخدمه

يعني

رحلة من الرياض إلى جده بواسطه لاندكروزر            قيمتها 900 ريال

و نفس الرحلة من الرياض إلى جده بواسطه كرولا     قيمتها 800 ريال

و نفس الرحلة من الرياض إلى جده بواسطه هايلكس     قيمتها 650 ريال

و نفس الرحلة من الرياض إلى جده بواسطه باص        قيمتها 500 ريال

و نفس شيء إلى جميع المناطق الأخرى

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

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

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

https://www.officena.net/ib/topic/84027-تحديد-قيم-من-قائمتين-في-عمودين-و-وضع-قيمة-معينة-في-العمود-الثالث-بناء-عليها/?tab=comments#comment-533926

و شكرا لكم مقدما ،،،

المصنف1.xlsx

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