aboghazi

رائع اخي سليم

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

ما ردت علينا يا ابوعيد عسى المانع خير 

هلا باخي كريم الاخلاق ابوعيد

نعم اخي قمت بتجربته 

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

الخلية 18يساوي المدخل في  يساوي المدخل في B6          و    البيع في ساعة الافتتاح  = المدخل في  B7

وبنفس الطريقة الخلية F19 .

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

و F19 بواقع ثلاثة من المدخلات الطلبات المستعجلة و الطلبات المنتظرة والبيع المتوقع غداُ

وجميع المدخلات في  F18,19  مختلفة وليس لها علاقة بالارقام المدخلة سابقا في الخلاياB6:D19 .

ارجو ان اكون قد وفقت في التوضيح.

عظيم الشكر والتقدير للإهتمامك ومساعدتك وجزاك الله خير 

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

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

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

حياك الله اخي ابوعيد

بالنسبة للسؤال 2 نعم هو كما قلت

 محتوى textbox 1 و  textbox 3 في الخلية F18  

محتوى textbox 2 و  textbox 4  و 5 textbox  في الخلية F19  

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

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

تمت ملاحظة الفرق في السؤال الاول وتم المطلوب فجزاك الله خير.

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

هل استطيع  حاولت ولم استطع عملها لاني محكوم بهذا الجدول . 

ولو كانت هناك طريق اخرى تجدونها افضل  فياليت تدلوني عليها

اما السؤال الثالث  pdf تحويل الصفحة الى PDF للمعاينة ثم استطيع الطباعة

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

واذا ممكن تتكرم وتلقي نظره على الملف المرفق وتساعدني فيه

وسامحني على كثرة الاسئلة 

سوال للاستاذة الفضلاء.rar

الله يعطيك العافية اخي ابوعيد

جاري مذاكرة الدرس 

الله يجزاك خير اخي ابو عيد ويجعل ايامك كلها عيد

ولو تكرمت ممكن توضح المتغيرات وما هي وظيفتها في الكود وخاصة lr1 , u 

  Dim t As Integer, w As Integer, t1 As Integer, t2 As Integer, lr1 As Integer, u As Integer

وكذلك  

 Resize

ولا يسعني الا الدعاء لك
وفقك الله 

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

* اخي ابوعيد  جزاك الله خير 

الكود رائع كتواجدك .

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

وايضا لو اردت تغيير الخلايا المرحلة جميعها او بعضاً منها الى الصفحة اس اف فلن اعرف كيف اعمل ذلك بدون فهمي لعمل الكود 

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

وفقك الله 

* اخي ابوعيد الكود لا يعمل
إذا قمت بمسح خانة التاريخ في صفحة اس اف وادخلت البيانات في التقرير اليومي وحاولت تنفيذ الكود

ولكن عندما  اكتب في خانة التاريخ في صفحة اس اف المعادلة  () today =   وانفذ يعمل ويقوم بالترحيل

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

لانني لو كان التاريخ خطأ ( احياناً يجث بسبب رؤيةالهلال كما تعلم ) استطيع ان اعدلهادخل التاريخ >

ولو تكرمت تشرح الاكود فمنكم نتعلم وتعم الفائدة لجميع الاخوةالاعضاء.

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

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

هذا رابط الملف وفية الاكواد المطلوبة

http://www.officena.net/ib/topic/64107-طلب-مساعدة-في-الاكواد/#comment-416444

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

بعد شكري وتقديري لكل اساتذة المنتدى والقائمين عليه
اود تكرمكم بعمل اكواد للبرنامج المرفق حيث الاسئلة  في صفحة المطلوب    البرنامج1.rar

وجزاكم الله خير

البرنامج1.rar

السلام عليكم هذا الملف كما الذي وفية المطلوب

ه

البرنامج.rar

شكرا جزيلاً اخي الفاضل نبيل عبدالهادي

وجاري التجربة وسافيدك بما توصلت اليه

اخي ياسر خليل أبو البراء

لم يقبل معي ارفاق الملف بسبب حجمه

 
  1- اريد ان انسخ خلايا غير مرتبة من الصفحة"5" الى الصفحة "2"
 نفترض ان  الخلايا  '("B6, E10, D10 ")  الصفحة 5 وننسخها الى الصفحة 2  في خلايا محددة مسبقا 
   ويتم نسخ هذه الخلايا بشكل يومي عند الضغط على الماكرو المخصص لذلك.

2- كود اخر نسخ خلايا غير مرتبة من الصفحة"6" الى الصفحة "3"

2-  نفترض ان  الخلايا  '(" B6,F3,D4,K10") من الصفحة 5 وننسخها الى الصفحة 8  في صف السادس في الخلايا "("G9,B6, F10, C10 ")
  وسويت الكود من  الفيديو الموجود ادناه مع اني مو فاهم اش سوى لاني نقلته  لكن بدون الوصول الى المطلوب 

 مقطع الفيديو
  Automatically copy paste data from non adjacent cells in sheet1 to sheet2 with VBA- YouTube
  إذا ممكني مساعدتي كيف اعمل كود يقوم بذلك