abouelhassan

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

شكر وتقدير واحترام من اخيك

ممكن تجرب الكود Sub CreateFolder() Dim ws As Worksheet Dim lastRow As Long Dim folderPath As String Dim folderName As String Dim fullPath As String Dim i As Long Set ws = ThisWorkbook.Sheets("Sheet1") ' قم بتغيير "Sheet1" إلى اسم ورقة العمل الخاصة بك lastRow = ws.Cells(ws.Rows.Count, "A").End(xlUp).Row ' تحديد آخر صف في العمود A (يمكن تغيير العمود إذا لزم الأمر) For i = 2 To lastRow ' يبدأ من الصف 2 ليتخطى العناوين folderPath = ws.Cells(i, 3).Value ' عمود C folderName = ws.Cells(i, 4).Value ' عمود D If folderPath <> "" And folderName <> "" Then fullPath = folderPath & "\" & folderName If Dir(fullPath, vbDirectory) = "" Then MkDir fullPath MsgBox "Folder created: " & fullPath, vbInformation Else MsgBox "Folder already exists: " & fullPath, vbExclamation End If End If Next i End Sub

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

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

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

للرفع رفع الله قدرك اخى @ابوخليل

نحتاج هذا الموضوع

Up

للرفع

حلو جداااااااااااااااا جداااااااااا تسلم ايدك والله احتاج اضافة النوع والصنف اختيار اخى ليه لو محتاجين بيانات مجموع صنفين من 5 انواع وحسابين اعملها ازى اتمنى يكون كده وصلك ما يطلب منى ملحوظة بسيطة اخى التاريخ لايظهر فى التقرير الجديد تسلم ايدك روائع اخى حبيبى

حلو جدااااا التقرير مش بيعمل كده هذا ما احتاجه

تمام جدا طيب الإشكالية التالية كيف يمكننى حلها اخى فى الله لدى حساب 1 النوع الأول الصنف الأول والصنف الثاني والصنف الثالث والصنف الخامس وده مثلا اريد تقرير لهم خلال 3 شهور كيف احصل على هذا هذا ما تقع فيه حاليا من مشاكل احترامي وتقديري وحبى وخالص دعائي لك اخى استاذى @ابوخليل

شكر من القلب وتقدير واحترام من اخيك

رائع وحل يحتاجه الكثير منا الاستيراد والتصدير الاكسيل من المشاكل التى تواجه الكثير مشكوررر اخى نتمنى برنامج متكامل لكل مشاكل الاكسيل الاستيراد والتصدير

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

اخى فى الله هذا مثال وهكذا للباقى اعزك الله وزادك من فضله test.xlsx

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

استاذى الحبيب@ابوخليل حدث شئ غريب اخى هنا اخترت الحساب1 نوع الحساب الاول والثانى الصنف 1 وصنف2 عند عرض التقرير ظهر حساب 10 لم اكن مختاره والتوع الرابع لم اكن مختاره الشئ الوحيد الصحيح هو اخر اختيار الصنف اعتذر لك اخى مشكورررررررررررر

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

شكر وتقدير وخالص الدعاء من القلب

وحشتني اخى الكريم عودة حميد

السلام عليكم ورحمة الله اخوانى الافاضل السلام عليكم احتاج اضافة تصفية للتقرير بنفس المنهج المتبع فى التقرير بحيث يمكن اختيار متعدد فى التقرير للاصناف مثل اسم الحساب و نوع الحساب احتاج الى الصنف بنفس التقرير او بتقرير جديد مع الشكر اسم المستخدم = Admin كلمة المرور = 1 FinancialPrg6.accdb

شكر وتقدير واحترام من اخيك حفظكم الله وبارك الله فيك اخي الكريم الحبيب

ممكن صورة الكود لاتمكن من اضافته اخى مشكووووووووووووووووووور جداااااااااا