اذهب الي المحتوي
أوفيسنا
بحث مخصص من جوجل فى أوفيسنا
Custom Search

كيف ادخل بيانات فى شيت وترحل تلقائيا فى شيت اخر


sadouka

الردود الموصى بها

استاذي المبدع ( أبو نصار )

عاجز عن الشكر

واعتذر لأني تعبتك واخذت من وقتك

يوجد ملاحظة

عندما اضيف اسماء جديدة حتى اصل لعدد 20

ثم اذا قمت بالتعديل على اسمين او اكثر يتم التعديل

ولكن يقوم بحذف الاسم الذي قبلة او بعدة

او يترك صف فارغ بين الصفوف الاخيرة

امل التجربة

واكرر شكري واعتذاري

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

السلام عليكم

الاخ الفاضل العام الجديد 2012 حفظك الله

اولا ارجو منك التجربة الكاملة على الملف

على حسب طلباتك وتوضيح جميع النقاط التي لم تتم

بدلا من هدر الوقت والجهد

والسموحه منك على هذا الخطاء

ان شاء الله يكون زبط

جرب المرفق

المطلوب ترحيل _ALI_5.rar

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

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

بارك الله فيك وفي علمك وحفظك ربي استاذي ابا نصار

أبوأنس

رابط هذا التعليق
شارك

الخطأ في اسم الصفحة

فانت تريد القيمة "اردني" واسم الصفحة هو "اردني " مع زياادة فراغ في آخر اسم الصفحة.

لذا لديك هذا الخطأ.

بالتوفيق.

رابط هذا التعليق
شارك

استاذي ( أبو نصار )

اشكرك من أعماق قلبي

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

مع خالص تقديرى لشخصكم الكريم

المطلوب ترحيل _ALI_5.rar

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

الاخ العزيز

apt

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

وتوقعت انه ابونصار اكرر لك اعتذاري وشكري لكما والقائمين على هذا المنتدى

اخي العزبز

Apt

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

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

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

وعندم اريد اصدار الكشف بالظغط على الزر

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

وياخذ رقم بعد السابق ويحتفظ بالسابق

وهاكذا

يعني مقارب لعمل فاتورة

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

السلام عليكم،

الاخ ابو نصار قام بمعالجة الادخال بواسطة فورم.

ويتم الترحيل حسب الجنسية الى الورقة المناسبة.

هل يتم ادخال الكشوفات الرئيسية تحت بعض ثم بواسطة زر اصدار الكشف يتم آليا وضع جدول ملخص الكشف تحت الكشف الرئيسي المناسب مباشرة ؟

ثم لم اقهم جيدا كيف يتم االتصدير حسب المدة ؟

يا ليتك تقوم بارفاق مثال آخر اكثر توضيحا ويضم آخر محاولة للأخ ابو نصار لكي تتضح :

- كيفية الاضافة الى الجدول الرئيسي ؟

- الترحيل الآلي يكون لاي صفحة بالضبط (حسب علمي يكون الى صفحة الجنسية) ؟

- الكشف الملخص (بالاصفر) هل هو موجود اصلا او يتم استحداثه بواسطة زر تصدير الكشف ؟

رابط هذا التعليق
شارك

الاخ العزيز

apt

الجدول الاصفر غير موجود

انما ياتي اذا أردنا طباعة ما تم تسجيلة

فهو مثال لشكل المطلوبة

اما الترحيل نعم قام الاستاذ ابو نصار بعمل ترحيل تلقائي حسب الجنسية

وباقي كود ترحيل تلقائي من الكشف الرئيسي الى كشف الفرز بشكل تلقائي وجميع الجنسيات

ألنقطة المهمة

انه في حالة اضافة جديد تلقائيا

ياتي تحت الجدول الاصفر اي من جديد وكأنها فاتورة أخرى

وهكذا

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

السلام عليكم،

مرفق ملف مع شرح بسيط للفكرة العامة حول كيفية اشتغال ما تطلبه.

هذا ما فهمته من تقديمك.

فان كانت هناك تصحيحات فلتتفضل بها.

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

:)

far(v2).rar

رابط هذا التعليق
شارك

اخي

Apt

اشكرك على مجهودك الرائع وافكارك الجديدة

ولكن تمنيت اكمال نفس العمل السابق

لانه مطابق للمطلوب بشكل كبير جدا

الاستاذ ابونصار قام مشكور بعمل كامل المطلوب

لعملبت ادخال البيانات وتوزيعها

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

رابط هذا التعليق
شارك

السلام عليكم،

1 - هل يتم يتم ترحيل لبيانات الناقصة المدخلة عن طريق الفورم في اوراق الجنسية ؟

2 - في جدول تقرير الكشف هل تريد حساب عدد البيانات غير المكتملة بالنسبة مثلا للاسم على حدى وبالنسبة لرقم القيد على حدى او تريد مجموع البيانات الناقصة بالنسبة لكل الحقول مجتمعة ؟

مثلا :

عدد البيانات الناقصة بالنسبة للاسم هو 3

عدد البيانات الناقصة بالنسبة لرقم القيد هو 2

فمجموع البيانات غير المكتملة هو 5

3 - كيف يتم نقل البيانات الى ورقة التقرير المفصل ؟

اظن من الاحسن اضافة حقل جديد يتم فيه تدوين تاريخ الادخال ليتم نقل البيانات حسب التاريخ يكون احسن.

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

الاخ العزيز

apt

اكرر شكري وتقديري لك

وتوضيح ما طلبت

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

ثانيا الاسماء الناقصة يتم حسب اي اسم ناقص منه اي معلومة سوا رقم القيد اوالاسم او كليهما يحسب من ظمن الاسماء التي لم يكتمل عدد واحد لم يكمل

ثالثا مازال كود نقل البيانات من الشيت الرئيسي الى شيت التقرير المفصل غير موجود وامل ايجادة

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

لم استوعبها ولا اعلم كيف ستعمل

بنتظارك جزاك الله خير

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

السلام عليكم،

عذرا على التاخير وذلك لضيق الوقت لدي.

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

رابط هذا التعليق
شارك

السلام عليكم،

- تم اضافة انشاء ورقة جديدة (حسب الجنسية) في حالة عدم وجودها

- اضافة ترتيب الاوراق حسب الترتيب الابجدي بعد كل ادخال جديد

- اضافة زر استخراج البيانات الناقصة في ورقة "لم يكتمل"

- اضافة زر الحصول على "تقرير مفصل"

جرب ورد لنا خبر

:smile:

2012_3.rar

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

السلام عليكم،

اضف السطر التالي في اول الدالة KH_A


Dim R As Long

هكذا :

Private Sub KH_A()

    Dim RR As Integer, Endrow As Integer

    Dim R As Long

    ComboBox1.Clear

    With Sheets("ÇáßÔÝ ÇáÑÆíÓí")

	    Endrow = .Range("E" & .Rows.Count).End(xlUp).Row

	    For RR = 2 To Endrow

		    ComboBox1.AddItem .Cells(RR, 1).Value

	    Next RR

    End With

    For R = 0 To 10

	    Me.Controls(myCon(R)) = ""

    Next

    ComboBox1.Value = ""

    CommandButton1.Enabled = True

    CommandButton3.Enabled = False

    TextBox1.Value = Endrow

    TextBox2.SetFocus

End Sub

رابط هذا التعليق
شارك

مثل سابقتها

 

Dim i as Long

تظهر هذه الرسائل عندما لا يتم تعريف احد المتغيرات المستعملة في البرنامج. وما يفرض تعريف المتفيرات هو السطر :
Option Explicit  
في اول كل صفحة اكواد. اذا اردت ان تجرب البرنامج بصورة اسرع ضع شرطة امام السطر هكذا :
 

'Option Explicit

رابط هذا التعليق
شارك

استاذي الكريم

apt

اشكرك جزيل الشكر على مساعدتي

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

*******

كذالك

عند تكرار الضغط على تقرير مفصل يقوم بالإضافة للكشف السابق رقم جديد للكشف علمن انه لم يتم اضافة اي اسم بعد السابق ولو امكن ان لا يقبل الا بعد اضافة اسم جديد فقط .

اذا امكن بعد الادخال ان يفتح شيت الكشف الرئيسي بدل شيت التقرير مفصل .

وكذألك تفعيل كود زر الطباعة حيث عند الضغط علية لا تتم الطباعة .

ومره اخره اخي الكريم اكرر شكري لك وامتناني لك

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

زائر
هذا الموضوع مغلق.
  • تصفح هذا الموضوع مؤخراً   0 اعضاء متواجدين الان

    • لايوجد اعضاء مسجلون يتصفحون هذه الصفحه
×
×
  • اضف...

Important Information