بحث مخصص من جوجل فى أوفيسنا
![]()
Custom Search
|
-
Posts
1046 -
تاريخ الانضمام
-
تاريخ اخر زياره
نوع المحتوي
المنتدى
مكتبة الموقع
معرض الصور
المدونات
الوسائط المتعددة
كل منشورات العضو طاهر اوفيسنا
-
شكرا اخي د.كاف يار
-
السلام عليكم اساتذتي الكرام N1=Nz(DSum("[Loan_Payment]", "[tbl_Loans]", "Year ([Loan_AwardMonth])=" & Me.txtYear), "And [Loan_Type]= 'Cridi'", 0) اين الخطا في هذا
-
شكرا لك استاذ kanory ربي يعوض علينا
-
السلام عليكم اساتذتي الكرام لقد قمت بتصميم برنامج ووقع تجميد للبرنامج اثناء الفتح ومن ثم ظهرت هذه المشكلة كما في الصورة ارجو المساعدة Gestion Courier.rar
-
وهو المطلوب شكرا لك اخي husamwahab
-
-
-
السلام علكيم اساتذتي الكرام صار معي مشكل في الوحدات النمطية فأصبحت فارغة واصبح البرنامج بدون اي حدث فكيف العمل لإسترجاع ما تم حذفه ارجو المساعدة اساتذة في عمل السنين ذهب بسبب مشكل لا اعرف سببه 2021.rar
-
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
صحيح استاذ جعفر ولو انك عدلت على الاستعلام لكانت الفكرة اوضح لي عموما بارك الله فيكم جمبعا دمتم في خدمة الصالح العام -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
شكرا لكم جميعا -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
شكرا لك استاذ أبو إبراهيم الغامدي قلت لديك تحفظ على هذا المقطع من الاستعلام QryCD 1- ماهو هذا التحفظ ؟ او كيف تراه مناسبا بطريقتك 2- من جهة التعديل على المرفق لاحظت ظهور EmployeeID في الاستعلام المطلوب عدم ظهوره واذا شاءت الضرورة ان يظهر في الاستعلام لا يجب ان يظهر في التقرير -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
هل من معين اساتذتي الكرام -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
هل اتضحت الفكرة استاذ جعفر -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
بالنسبة للإستعلام تم تبسيطه لعدة إستعلامات مقارنة بالإستعلام الموحد QueryCD الإستعلام QryCD هو لجلب بيانات الموظفين والممونين ورواتبهم في شهر ما وذلك لإستعمالهم في الدالة المعرفة CD عن طريق الإستعلام CD الإستعلام QryDM هو لجلب رواتب الموظفين والممونين في شهر ما وذلك لإستعمالهم في الدالة المعرفة DM عن طريق الإستعلام DM بالنسبة للإستعلام الموحد Union Dm & CD تم دمج إستعلام CD+DM للحصول على النتائج المطلوبة النتائج تأتي سليمة لكن بقيت مشكلة الترتيب حسب رقم الموظف بالنسبة للدالة DLookup المستعملة في كويري DM دورها جلب رقم الحساب البريدي ومفتاح الحساب البريدي للمؤسسة فقط ملاحظة: هذه الإستعلامات تم دمجها في إستعلام واحد والذي يحمل إسم QueryCD -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
حاولت التقيد بما اشرت ولكن لم افلح انظر الترتيب في الاستعلام QryCD والاستعلام QryDM اما في الاستعلام UNION DM & CD بدون ترتيب اما السطر الاخير *000000000022222222980000000040000BBBB لاتبالي بها فهي تكون دائما في اخر الترتيب والترتيب يكون في الاستعلام UNION DM & CD KRIMO7 الى KRIMO157 هذا من جهة ومن جهة اخري كيف ترى البديل اليك المرفق استاذ Trans CD.rar -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
شكرا استاذ جعفر على الاهتمام تم الحل PARAMETERS StartMonth DateTime = DateSerial(Year(Now),Month(Now),1), EndMonth DateTime = DateSerial(Year(Now),Month(Now)+1,0), Mois Long = Month(Now), Annee Long = Year(Now); SELECT dm(DLookup("[Numéro de compte]","tbl2"),DLookup("[Clé]","tbl2"),Sum(TV),Count(*),Mois,Annee) AS LIGNECD FROM (SELECT EmployeeID, Sum(TheValue) AS TV FROM ( SELECT CompanyID As EmployeeID, [BILL_Value] AS TheValue FROM Bill WHERE Bill_Date BETWEEN StartMonth AND EndMonth UNION ALL SELECT EmployeeID,[Cridi_Value] AS TheValue FROM Cridi WHERE Cridi_Date BETWEEN StartMonth AND EndMonth UNION ALL SELECT EmployeeID,[Menha_Value] AS TheValue FROM Mena7 WHERE Menha_Date BETWEEN StartMonth AND EndMonth UNION ALL SELECT EmployeeID,[NesbaValue] AS TheValue FROM Sanitaire WHERE Sanitaire_Date BETWEEN StartMonth AND EndMonth UNION ALL SELECT EmployeeID,[Moss_Value] AS TheValue FROM Mossada WHERE Moss_Date BETWEEN StartMonth AND EndMonth UNION ALL SELECT EmployeeID,[Scolaire_Value] AS TheValue FROM Scolaire WHERE Scolaire_Date BETWEEN StartMonth AND EndMonth ) GROUP BY EmployeeID); UNION ALL SELECT LIGNECD FROM ( SELECT cd([N° compt CCP],[Cle CCP],[TheValue],[Nom &Prénom &fr]) AS LIGNECD FROM ( SELECT EmployeeID, [N° compt CCP], [Cle CCP], [Nom &Prénom &fr], Sum(TheValueT) AS TheValue FROM ( SELECT Company.CompanyID AS EmployeeID, Company.[N° compt CCP], Company.[Cle CCP],Company.[Nom &Prénom &fr], -1 AS TheType, Bill.Bill_Value AS TheValueT, -1 AS M,Bill.Bill_Date FROM Company INNER JOIN Bill ON Company.CompanyID = Bill.CompanyID WHERE Bill.Bill_Date Between [StartMonth] And [EndMonth] UNION ALL SELECT Employee.EmployeeID, Employee.[N° compt CCP], Employee.[Cle CCP], Employee.[Nom &Prénom &fr], +1 AS TheType, Cridi.Cridi_Value AS TheValueT, -1 AS M, Cridi.Cridi_Date FROM Employee INNER JOIN Cridi ON Employee.EmployeeID = Cridi.EmployeeID WHERE Cridi.Cridi_Date Between [StartMonth] And [EndMonth] UNION ALL SELECT Employee.EmployeeID,Employee.[N° compt CCP],Employee.[Cle CCP], Employee.[Nom &Prénom &fr], +1 AS TheType, Mena7.Menha_Value AS TheValueT, -1 AS M , Mena7.Menha_Date FROM Employee INNER JOIN Mena7 ON Employee.EmployeeID = Mena7.EmployeeID WHERE Mena7.Menha_Date Between [StartMonth] And [EndMonth] UNION ALL SELECT Employee.EmployeeID, Employee.[N° compt CCP],Employee.[Cle CCP], Employee.[Nom &Prénom &fr], +1 AS TheType, Sanitaire.NesbaValue AS TheValueT, -1 AS M , Sanitaire.Sanitaire_Date FROM Employee INNER JOIN Sanitaire ON Employee.EmployeeID = Sanitaire.EmployeeID WHERE Sanitaire.Sanitaire_Date Between [StartMonth] And [EndMonth] UNION ALL SELECT Employee.EmployeeID,Employee.[N° compt CCP],Employee.[Cle CCP], Employee.[Nom &Prénom &fr], +1 AS TheType, Scolaire.Scolaire_Value AS TheValueT, -1 AS M , Scolaire.Scolaire_Date FROM Employee INNER JOIN Scolaire ON Employee.EmployeeID = Scolaire.EmployeeID WHERE Scolaire.Scolaire_Date Between [StartMonth] And [EndMonth] UNION ALL SELECT Employee.EmployeeID,Employee.[N° compt CCP],Employee.[Cle CCP], Employee.[Nom &Prénom &fr], +1 AS TheType, Mossada.Moss_Value AS TheValueT, -1 AS M , Mossada.Moss_Date FROM Employee INNER JOIN Mossada ON Employee.EmployeeID = Mossada.EmployeeID WHERE Mossada.Moss_Date Between [StartMonth] And [EndMonth] ) GROUP BY EmployeeID, [N° compt CCP], [Cle CCP], [Nom &Prénom &fr] ORDER BY Val (EmployeeID) ))WHERE LIGNECD <> ""; ولكن بقيت مشكلة ترتيب العمال حسب EmployeeID ولكن لقيت صعوبة كبيرة في الترتيب فهل من فكرة ؟ -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
لقد حاولت التعديل وفلح الا انني وجدت مشكلة في [nombre de bénificiaires] هي عدد المستفيدين [montant global] المجموع الكلي لـ [montant global] =Sum(Bill.Bill_Value) + Sum(Cridi.Cridi_Value) +Sum(Mena7.Menha_Value)+Sanitaire.NesbaValue+Mossada.Moss_Value+Scolaire.Scolaire_Value+ ارجو التعديل وشكرا PARAMETERS [Forms]![FrmTransfer]![txtMonth] DateTime = Now(); SELECT dm([Numéro de compte],[Clé],[montant global],[nombre de bénificiaires],[Mois],[Année]) AS LIGNECD FROM tbl2; UNION ALL SELECT cd([N° compt CCP],[Cle CCP],[TheValue],[Nom &Prénom &fr]) AS LIGNECD FROM (SELECT Company.[N° compt CCP], Company.[Cle CCP],Company.[Nom &Prénom &fr], -1 AS TheType, Sum(Bill.Bill_Value) AS TheValue, -1 AS M FROM Company INNER JOIN Bill ON Company.CompanyID = Bill.CompanyID GROUP BY Bill.CompanyID, Company.[Nom &Prénom &fr], Company.[N° compt CCP], Company.[Cle CCP], -1, "Bill", Month([Bill_Date]), Year([Bill_Date]) HAVING (((Month([Bill_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Bill_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Employee.[N° compt CCP],Employee.[Cle CCP],Employee.[Nom &Prénom &fr], +1 AS TheType, Sum(Cridi.Cridi_Value) AS SumOfCridi_Value, -1 AS M FROM Employee INNER JOIN Cridi ON Employee.EmployeeID = Cridi.EmployeeID GROUP BY Cridi.EmployeeID, Employee.[Nom &Prénom &fr], Employee.[N° compt CCP],Employee.[Cle CCP], +1, "Cridi", Month([Cridi_Date]), Year([Cridi_Date]) HAVING (((Month([Cridi_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Cridi_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Employee.[N° compt CCP],Employee.[Cle CCP], Employee.[Nom &Prénom &fr], +1 AS TheType, Sum(Mena7.Menha_Value) AS SumOfMenha_Value, -1 AS M FROM Employee INNER JOIN Mena7 ON Employee.EmployeeID = Mena7.EmployeeID GROUP BY Mena7.EmployeeID, Employee.[Nom &Prénom &fr], Employee.[N° compt CCP],Employee.[Cle CCP], +1, "Mena7", Month([Menha_Date]), Year([Menha_Date]) HAVING (((Month([Menha_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Menha_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Employee.[N° compt CCP],Employee.[Cle CCP],Employee.[Nom &Prénom &fr], +1 AS TheType, Sanitaire.NesbaValue, -1 AS M FROM Employee INNER JOIN Sanitaire ON Employee.EmployeeID = Sanitaire.EmployeeID GROUP BY Sanitaire.EmployeeID, Employee.[Nom &Prénom &fr], Employee.[N° compt CCP],Employee.[Cle CCP], +1, Sanitaire.NesbaValue, "Sanitaire", Month([Sanitaire_Date]), Year([Sanitaire_Date]) HAVING (((Month([Sanitaire_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Sanitaire_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Employee.[N° compt CCP],Employee.[Cle CCP],Employee.[Nom &Prénom &fr], +1 AS TheType, Mossada.Moss_Value, -1 AS M FROM Employee INNER JOIN Mossada ON Employee.EmployeeID = Mossada.EmployeeID GROUP BY Mossada.EmployeeID, Employee.[Nom &Prénom &fr], Employee.[N° compt CCP],Employee.[Cle CCP], +1, Mossada.Moss_Value, Add_Observations([Mossada].[EmployeeID],"Mossada"), Mossada.Moss_Ver, Month([Moss_Date]), Year([Moss_Date]) HAVING (((Month([Moss_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Moss_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Employee.[N° compt CCP],Employee.[Cle CCP],Employee.[Nom &Prénom &fr], +1 AS TheType, Scolaire.Scolaire_Value, -1 AS M FROM Employee INNER JOIN Scolaire ON Employee.EmployeeID = Scolaire.EmployeeID GROUP BY Scolaire.EmployeeID, Employee.[Nom &Prénom &fr], Employee.[N° compt CCP],Employee.[Cle CCP], +1, Scolaire.Scolaire_Value,"Scolaire", Month([Scolaire_Date]), Year([Scolaire_Date]) HAVING (((Month([Scolaire_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Scolaire_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth]))))); -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
للتوضيح أكثر توحيد الصف الاول الى غاية tbl2 SELECT dm([Numéro de compte],[Clé],[montant global],[nombre de bénificiaires],[Mois],[Année]) AS LIGNECD FROM tbl2; UNION ALL SELECT cd([N° compt CCP],[Cle CCP],[Montant],[Nom &Prénom &fr]) AS LIGNECD FROM tbl1; مع استبدال UNION ALL SELECT cd([N° compt CCP],[Cle CCP],[Montant],[Nom &Prénom &fr]) AS LIGNECD FROM tbl1; بهذا SELECT Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],+1 AS TheType, Sum(Cridi.Cridi_Value) AS SumOfCridi_Value,Add_Observations([Cridi].[EmployeeID],"Cridi") AS Obsérvation,-1 AS M FROM Employee INNER JOIN Cridi ON Employee.EmployeeID = Cridi.EmployeeID GROUP BY Cridi.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],[adress],+1, Add_Observations([Cridi].[EmployeeID],"Cridi"), Month([Cridi_Date]), Year([Cridi_Date]) HAVING (((Month([Cridi_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Cridi_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) مع الاحتفاط ب : [N° compt CCP] [Cle CCP] [Montant]=Sum(Cridi.Cridi_Value) [Nom &Prénom &fr] tbl1= Cridi المعيار -
توحيد استعلام بعدة استعلامات بمعايير
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
هل من فكرة اساتذة -
السلام عليكم اساتذتي الكرام لديا استعلام موحد SELECT dm([Numéro de compte],[Clé],[montant global],[nombre de bénificiaires],[Mois],[Année]) AS LIGNECD FROM tbl2; UNION ALL SELECT cd([N° compt CCP],[Cle CCP],[Montant],[Nom &Prénom &fr]) AS LIGNECD FROM tbl1; نتيجته اردت ان استبدل هذا الاستلام UNION ALL SELECT cd([N° compt CCP],[Cle CCP],[Montant],[Nom &Prénom &fr]) AS LIGNECD FROM tbl1; بمجموعة من الاستعلامات وهي SELECT Bill.CompanyID, Company.[Nom &Prénom &fr],Company.[N° compt CCP], Company.[Cle CCP],-1 AS TheType, Sum(Bill.Bill_Value) AS TheValue, Add_Observations([Bill].[CompanyID],"Bill") AS Obsérvation, -1 AS M FROM Company INNER JOIN Bill ON Company.CompanyID = Bill.CompanyID GROUP BY Bill.CompanyID, Company.[Nom &Prénom &fr],Company.[N° compt CCP], Company.[Cle CCP],-1, Add_Observations([Bill].[CompanyID],"Bill"), Month([Bill_Date]), Year([Bill_Date]) HAVING (((Month([Bill_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Bill_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Cridi.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],+1 AS TheType, Sum(Cridi.Cridi_Value) AS SumOfCridi_Value,Add_Observations([Cridi].[EmployeeID],"Cridi") AS Obsérvation,-1 AS M FROM Employee INNER JOIN Cridi ON Employee.EmployeeID = Cridi.EmployeeID GROUP BY Cridi.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],[adress],+1, Add_Observations([Cridi].[EmployeeID],"Cridi"), Month([Cridi_Date]), Year([Cridi_Date]) HAVING (((Month([Cridi_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Cridi_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Mena7.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],+1 AS TheType, Sum(Mena7.Menha_Value) AS SumOfMenha_Value,Add_Observations([Mena7].[EmployeeID],"Mena7") AS Obsérvation ,-1 AS M FROM Employee INNER JOIN Mena7 ON Employee.EmployeeID = Mena7.EmployeeID GROUP BY Mena7.EmployeeID, Employee.[Nom &Prénom &fr], Employee.[N° compt CCP],Employee.[Cle CCP],+1, Add_Observations([Mena7].[EmployeeID],"Mena7"), Month([Menha_Date]), Year([Menha_Date]) HAVING (((Month([Menha_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Menha_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Sanitaire.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],+1 AS TheType, Sanitaire.NesbaValue,Add_Observations([Sanitaire].[EmployeeID],"Sanitaire") AS Obsérvation, -1 AS M FROM Employee INNER JOIN Sanitaire ON Employee.EmployeeID = Sanitaire.EmployeeID GROUP BY Sanitaire.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],+1, Sanitaire.NesbaValue, Add_Observations([Sanitaire].[EmployeeID],"Sanitaire"), Month([Sanitaire_Date]), Year([Sanitaire_Date]) HAVING (((Month([Sanitaire_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Sanitaire_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Mossada.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],+1 AS TheType, Mossada.Moss_Value, Add_Observations([Mossada].[EmployeeID],"Mossada") AS Obsérvation, Moss_Ver FROM Employee INNER JOIN Mossada ON Employee.EmployeeID = Mossada.EmployeeID GROUP BY Mossada.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],+1, Mossada.Moss_Value, Add_Observations([Mossada].[EmployeeID],"Mossada"), Mossada.Moss_Ver, Month([Moss_Date]), Year([Moss_Date]) HAVING (((Month([Moss_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Moss_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) UNION ALL SELECT Scolaire.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],+1 AS TheType, Scolaire.Scolaire_Value,Add_Observations([Scolaire].[EmployeeID],"Scolaire") AS Obsérvation, -1 AS M FROM Employee INNER JOIN Scolaire ON Employee.EmployeeID = Scolaire.EmployeeID GROUP BY Scolaire.EmployeeID, Employee.[Nom &Prénom &fr],Employee.[N° compt CCP],Employee.[Cle CCP],[adress],+1, Scolaire.Scolaire_Value,Add_Observations([Scolaire].[EmployeeID],"Scolaire"), Month([Scolaire_Date]), Year([Scolaire_Date]) HAVING (((Month([Scolaire_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Scolaire_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))); مع العلم ان montant global هو مجموع Bill_Value و Cridi_Valueو ........... الى اخر استعلام Scolaire_Value و [nombre de bénificiaires] هو عدد المستفيدين و [Mois],[Année] هو شهر وسنة هذا المعيار (((Month([Bill_Date]))=Month(CDate([Forms]![FrmTransfer]![txtMonth]))) AND ((Year([Bill_Date]))=Year(CDate([Forms]![FrmTransfer]![txtMonth])))) ارحوا ان يتم التوحيد وشكرا
-
اضافة كود في ترتيب الرقم في استعلام موحد
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
وهو كذلك نعم الراحة النفسية تلعب دورا كبير في التفكير الجيد والسليم لإستخراج المعلومات عموما شكرا لك استاذ جعفر -
اضافة كود في ترتيب الرقم في استعلام موحد
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
تمت العملية بنجاح استاذ جعفر بعدما ركزت مليح في الخطوات استخدمت الدالة CompanyID1: Val(Nz([CompanyID];"9999999999")) SELECT [qry_1-5].CompanyID, Val(Nz([CompanyID],"9999999999")) AS CompanyID1, [qry_1-5].N_Entrep, [qry_1-5].[Nom &Prénom &fr], [qry_1-5].[N° CompteRib], [qry_1-5].TheType, Sum([qry_1-5].TheValue) AS SumOfTheValue, [qry_1-5].[Centre de chéques Postaux], [qry_1-5].adress, [qry_1-5].Obsérvation, [qry_1-5].M FROM [qry_1-5] GROUP BY [qry_1-5].CompanyID, Val(Nz([CompanyID],"9999999999")), [qry_1-5].N_Entrep, [qry_1-5].[Nom &Prénom &fr], [qry_1-5].[N° CompteRib], [qry_1-5].TheType, [qry_1-5].[Centre de chéques Postaux], [qry_1-5].adress, [qry_1-5].Obsérvation, [qry_1-5].M HAVING ((([qry_1-5].M)=-1)) ORDER BY Val(Nz([CompanyID],"9999999999")); -
اضافة كود في ترتيب الرقم في استعلام موحد
طاهر اوفيسنا replied to طاهر اوفيسنا's topic in قسم الأكسيس Access
استاذي العزيز جعفر حياك الله دائما في الخدمة ربي يثبت اجرك ويحفظك حاولت فتح الملفات المعدل عليها من الرابط المرسل من طرفكم بعد التحميل ولا ملف واحد فتح معي فأرتيت ان اضع بين ايديكم ملفي للتعديل عليه 202012.rar -
السلام عليكم هل يمكن فرز ترتيب CompanyID ترتيبا تصاعديا مثلا 1 - 2 - 3 .......الخ لأني عملت فرز تصاعدي في الإستعلام وحاولت عمل ترتيب حسب CompanyID في التقرير فلم يعطي النتيجة صحيحة مع العلم أن qry_1-5 هو استعلام موحد SELECT [qry_1-5].CompanyID, [qry_1-5].[Nom &Prénom &fr], [qry_1-5].[N° CompteRib], [qry_1-5].adress, [qry_1-5].TheType, Sum([qry_1-5].TheValue) AS SumOfTheValue, [qry_1-5].[Centre de chéques Postaux], [qry_1-5].Obsérvation, [qry_1-5].M FROM [qry_1-5] GROUP BY [qry_1-5].CompanyID, [qry_1-5].[Nom &Prénom &fr], [qry_1-5].[N° CompteRib], [qry_1-5].adress, [qry_1-5].TheType, [qry_1-5].[Centre de chéques Postaux], [qry_1-5].Obsérvation, [qry_1-5].M HAVING ((([qry_1-5].M)=-1));
-
تمت العملية استاذي العزيز رجاء قراءة موضوع الرابط ، والروابط الموجودة هناك ، واذا عندك سؤال محدد ، فلا مانع 🙂 لقد حملت الاداة ونصبتها ولم تظهر لي اثناء فتح ملف الاكسس فكيف السبيل لذلك ؟ V-Tools 1.83 for Access 2010-2016.accdb