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

مطلوب اكواد زر ترحيل عبر فورم لاربعة صفوف اسفل بعض مرة واحدة ؟؟


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

السلام عليكم

اخواني الكريم

المطلوب في المرفق كما يلي :

 

اريد عند الضغط علي زر ترحيل في الفورم وعند الضغط علي زر ترحيل الموجود بالفورم

ان يتم الترحيل الي الجدول الموجود في شيت1 حيث اريد ترحيل الصفوف الاريعة الموجودة

بالفورم في الجدول اسفل بعضم البعض مرة واحدة

وهكذا تتم العملية كل مرة

 

شكرا لكم

Book1.rar

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

السلام عليكم

هذا هو الكود المطلوب

 

Private Sub CommandButton1_Click()
LR = [A1000].End(xlUp).Row + 1
i = 1
For Each cl In Range("A" & LR & ":F" & LR + 3)
Cells(cl.Row, cl.Column) = Me.Controls("textbox" & i)
i = i + 1
Next
For T = 1 To 24
Me.Controls("textbox" & T) = ""
Next
End Sub


 

Book1.rar

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

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

الاستاذ والاخ الحبيب رجب المحترم

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

دمتم في رعاية الله وحفظه

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

السلام عليكم

 

الاستاذ الكريم : رجب جاويش

 

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

مطلوب تعديل بسيط علي الكود المرسل من سيادتكم

حيث ان الخطأ مني انا حيث تغير شكل الفورم واريد اضافة للكود ليمكن الترحيل بنجاح

فهو فورم لفاتورة

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

شكرا لك

 

 

 

Book111.rar

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

الأخت الفاضلة / سما محمد

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

لذا أرجو التوضيح

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

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

اشكر سيادتكم استاذ / رجب جاويش  

علي اهتمامك وسرعة ردك علي وفعلاً الخطأ من عندي في توصيل المعلومة

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

 

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

رقم المسلسل والتاريخ واسم المورد والعميل امام كل صنف في كل صف عند الترحيل

 

وماذا علي ان افعل في حال زيادة الصفوف في الفورم او اضافة اي بيانات في الجزء العلوي للفورم

برجاء مزيد من الشرح او شرح الكود لكي اتمكن من التعديل عليه في حالو الزيادة ام انه لا يمكن عمل زيادة

 

آسفه جداً لكثرة طلباتي ولكني اطمع في كرم سيادتكم وأرغب في التعلم بشكل جيد

 

شكرا لك

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

الاستاذ : رجب جابويش

 

جميل جدا ورائع وهو ما طلبة تماما ولكن

 

ماذا علي ان افعل في حال زيادة الصفوف في الفورم او اضافة اي بيانات في الجزء العلوي للفورم

 

برجاء مزيد من الشرح او شرح الكود لكي اتمكن من التعديل عليه في حالو الزيادة ام انه لا يمكن عمل زيادة


 

آسفه جداً لكثرة طلباتي ولكني اطمع في كرم سيادتكم وأرغب في التعلم بشكل جيد

 

شكرا لك

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

السلام عليكم

الاستاذ / رجب جاويش

الاساتذة الافاضل

حلك السابق جميل ولكن اذا كان هناك صف فارف في التكستات بوكس الموجودة بالاسفل فارغ يقوم الكود بترحيل

التكستات الموجودة بالاعلي ايضاً ولكن المطلوب في المرفق

 

اريد المساعدة ضروري جدا جدا

 

شكرا لكم

 

 

Book111.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