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

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

قام بنشر

السلام عليكم

الاخ الكريم / عبد الغني1

بارك الله فيك

بعد اذن اخي الحبيب /  إبراهيم ابوليله  ... جزاه الله خيرا

 

شاهد المرفق التالي

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

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

وان كان غير ذلك فبرجاء مزيد من التوضيح

او كما اخبرك اخي / ابراهيم ... قم بتصميم الفورم الذي تريده ليتم وضع اكوادة حسب طلبك

تقبلوا خالص تحياتي

 

 

ترحيل لاعمدة متفرقة من خلال فورم.rar

  • Like 2
قام بنشر

شكرا على الإهتمام كما قال أخي إبراهيم أبوليلة لقد صممت فورم في المشاركة رقم 03

بالنسبة لأخي حمادة عمر بالنسبة لردك إذا كانت أكثر من ثلاثة عمليات قد تصل إلى 30 أو 40 عملية 

ولكن حاول أن تنظر إلى مشاركتي رقم 03 وسوف تفهم بعض الشيئ  ماذا أقصد

قام بنشر

أخى فى الله

استاذى القدير // حماده عمر

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

والشكر موصول للأستاذ الكبير / ابراهيم ابوليله

 

أخى الكريم

الأستاذ / عبد الغنى

الملف المرفق من قبلكم بالمشاركه رقم 3 ليس به اى فورم

وما قام به الأستاذ القدير // حماده عمر

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

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

 

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

أم أنكم تقصد ادخال حوالى 30 او 40 بيان فى العملية الواحده

 

فيرجى منكم مزيد من التوضيح

وتقبل منى وافر الاحترام والتقدير

  • Like 1
قام بنشر

أخي محمود الشريف شكرا لك في البداية سأشرح لك ماذا أقصد بالتمام والكمال

1- بالنسبة للعمود إسم الباب فهو مرقم بأسماء الأبواب من الباب "01" إلى الباب "ن" عموديا لكل سطر من هذه الأبواب  يحتمل أن تجرى عليه 30 أو 40 عملية

02- أما بالنسبة لمشاركتي رقم03 أنها ليست فيها فورم فإنني وصعت فيها فورم لكني لم أفلح في طريقة الحفظ لما أضع الفورم المطلوب وأفوم بالحفظ يخرج لي مسج أن الفورم غير مرتبط بماكرو ولايحفظ الفورم

 

Book2.rar

قام بنشر

شاهد اخي الكريم

الرابط التالي للتعرف علي امتدادات الحفظ لملفات الاكسيل

ليمكنك الحفظ بالطريقة المطلوبة لحفظ الملف بالفورم والاكواد

 

http://www.officena.net/ib/index.php?showtopic=50458&hl=

  • Like 1
قام بنشر (معدل)

بالنسبة لحل أخي حمادة عمر إذا كانت أكثر من ثلاث عمليات قد تصل العمليات إلى 30 أو 40 عملية خلال السنة  فكيف تكون شكل الفورم

تم تعديل بواسطه عبد الغني1
قام بنشر (معدل)

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

ترحيل لاعمدة متفرقة من خلال فورم.rar

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

السلام عليكم

الاخ الكريم / عبد الغني1

بارك الله فيك

 

شاهد المرفق التالي به طريقة اخري جديدة لتنفيذ طلبك

 

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

ثم قم بوضع بياناتك في التكست بوكس 1 ، 2 ثم اضغط ترحيل

سيتم ترحيل البيانات في الاعمدة المطلوبة في العملية المحددة

 

** ملحوظة : قم باضافة اي عدد من العمليات كما هو بالمرفق وسيتم اضافته تلقائيا للكومبوبكس ليتم اختيارة

ويتم الترحيل اليها ... وتم الاكتفاء بعدد 5 عمليات في المرفق علي سبيل المثال

 

ارجو ان يفي بطلبك

تقبل خالص تحياتي

 

 

ترحيل لاعمدة متفرقة من خلال فورم-sama.rar

قام بنشر

السلام عليكم

الاخ الكريم / عبد الغني1

بارك الله فيك

 

شاهد المرفق التالي به طريقة اخري جديدة لتنفيذ طلبك

 

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

ثم قم بوضع بياناتك في التكست بوكس 1 ، 2 ثم اضغط ترحيل

سيتم ترحيل البيانات في الاعمدة المطلوبة في العملية المحددة

 

** ملحوظة : قم باضافة اي عدد من العمليات كما هو بالمرفق وسيتم اضافته تلقائيا للكومبوبكس ليتم اختيارة

ويتم الترحيل اليها ... وتم الاكتفاء بعدد 5 عمليات في المرفق علي سبيل المثال

 

ارجو ان يفي بطلبك

تقبل خالص تحياتي

 

 

ترحيل لاعمدة متفرقة من خلال فورم-sama.rar

قام بنشر

السلام عليكم 

بعد اذن اخي حمادة

فكرة اخرى على نفس كود اخي حمادة

Private Sub CommandButton2_Click()
Dim iRow As Long
Dim ws As Worksheet
Set ws = Worksheets("ورقة1")
'==============
SAMA1 = MsgBox("سيتم تسجيل البيانات الموجودة؟..هل انت متأكد من اجراء هذه العملية", vbYesNo)
      If SAMA1 = vbYes Then

If Me.TextBox1 = "" Or Me.TextBox2 = "" Or Me.ComboBox1 = "" Then     'Exit Sub
  MsgBox "اكمل البيانات الغير مسجلة اولا", vbMsgBoxRight, "نقص في البيانات !!!"
Exit Sub
Else
'=========
SAMA = (ComboBox1.ListIndex + 1) * 4
iRow = ws.Cells(Rows.Count, SAMA).End(xlUp).Offset(1, 0).Row
ws.Cells(iRow, SAMA).Value = Me.TextBox1.Value
ws.Cells(iRow, SAMA + 2).Value = Me.TextBox2.Value

Me.TextBox1.Value = ""
Me.TextBox2.Value = ""

End If
      MsgBox "!!  تم تسجيل البيانات .. بنجاح "
       
 Else
      MsgBox "!! لم يتم تسجيل البيانات"
End If
End Sub
قام بنشر (معدل)

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

- سحب

- فتح

-إلغاء

- إلتزام

- أخذ بالحساب

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

                                                                       والله ولي التوفيق

تم تعديل بواسطه عبد الغني1
  • 3 years later...
قام بنشر (معدل)

الاستاذ الفاضل / حمادة عمر 

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

اولا شكرا لكم جميعا

ثانيا لى استفسار بسيط لماذا لا نزيد هذا الفورم اثراءا كما اتصور

1 - ممكن ان نسحب كود العميل و كود الصنف فى راس الفورم

2- الافضل ان يكون تسجيل البيانات فى الجزء الاسفل من الفورم بشكل متكرر من (حقل المبلغ ) و (حقل التاريخ)بشرط ان يضيف الفورم الاحقول اتوماتيكيا بمفتاح تاب او انتر ( كما فة الفاتورة ) وبذلك تكون عملية الاستفادة من الفورم اكبر 

ولكم جميعا الشكر و التقدير

 

حمادة عمرالاستاذ.rar

تم تعديل بواسطه hossin2525
اضافة مرفقات
قام بنشر

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

حمادة عمرالاستاذ.rar

Join the conversation

You can post now and register later. If you have an account, sign in now to post with your account.

زائر
اضف رد علي هذا الموضوع....

×   Pasted as rich text.   Paste as plain text instead

  Only 75 emoji are allowed.

×   Your link has been automatically embedded.   Display as a link instead

×   Your previous content has been restored.   Clear editor

×   You cannot paste images directly. Upload or insert images from URL.

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

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

Important Information