أكاديمية الصقر للتدريب
FBConnect

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




أهلا وسهلا بك زائرنا الكريم في أكاديمية الصقر للتدريب، لكي تتمكن من المشاركة ومشاهدة جميع أقسام المنتدى وكافة الميزات ، يجب عليك إنشاء حساب جديد بالتسجيل بالضغط هنا أو تسجيل الدخول اضغط هنا إذا كنت عضواً .

Preview

الرئيسية
نتائج البحث


نتائج البحث عن ردود العضو :aljathmai
عدد النتائج (41) نتيجة
30-01-2019 01:41 صباحا
icon كود يحفظ قيمة textbox بعد كل تغير كمرجع اساسي لليوزر والباسورد | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 الف شكر استاذي أبو عيد  الله يوفقك ويرحم والديك ...142
17-01-2019 11:31 صباحا
icon كيف يتم تحديد الشيت المراد التعديل عليه من خلال كود التعديل: تعالوا حليتها | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 السلام عليكم ورجمة وبركاته 
يا ترى يوجد حل بديل افضل !
04-01-2019 10:22 مساء
icon كود تحديث listbox | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 الف شكر لكم اساتذتي الكرام .....تم المطلوب بنجاح
28-12-2018 07:41 مساء
icon كيف يتم تحديد الشيت المراد التعديل عليه من خلال كود التعديل: تعالوا حليتها | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 
المشاركة الأصلية كتبت بواسطة: YasserKhalil
يفضل عدم استخدام التحديد لأوراق العمل والإشارة لأوراق العمل باستخدام متغيرات ..



ما فهمت استاذ ياسر هل طريقتي خطأ احتمال حدوث مشكلة فيما بعد .
26-12-2018 06:13 صباحا
icon كيف يتم تحديد الشيت المراد التعديل عليه من خلال كود التعديل | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 السلام عليكم ورحمة الله وبركاته 

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

هذا هو السطر : 
طلب تحديد الشيت المراد التعديل عليه
Sheets("sheet1").Select

Sheets("sheet1").Select
For i = 3 To 10000
If Cells(i, 1) = TextBox1.Text Then
Cells(i, 1).Select
Exit For
End If
Next i
ActiveCell.Offset(0, 1) = TextBox2.Text
ActiveCell.Offset(0, 2) = TextBox3.Text
ActiveCell.Offset(0, 3) = TextBox4.Text
ActiveCell.Offset(0, 4) = TextBox5.Text
ActiveCell.Offset(0, 5) = TextBox6.Text
ActiveCell.Offset(0, 6) = TextBox7.Text
ActiveCell.Offset(0, 7) = ComboBox1.Text
MsgBox "Êã ÇáÊÚÏíá ÈäÌÇÍ"
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
TextBox5.Text = ""
TextBox6.Text = ""
TextBox7.Text = ""
ComboBox1.Text = ""
CommandButton1.BackColor = &HC000&
CommandButton1.Enabled = True
CommandButton3.BackColor = &HFF&
CommandButton3.Enabled = False

 
25-12-2018 11:12 مساء
icon كيف يتم تحديد الشيت المراد التعديل عليه من خلال كود التعديل | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 بيطلع عندي تحديد لكلمة  Exit for 
أيش المشكلة 
If ws.Cells(i, 1) = TextBox1.Text Then
ws.Cells(i, 1).Select
Exit For
End If
Next i
ws.cell.Offset(0, 1) = TextBox2.Text
ws.cell.Offset(0, 1) = TextBox2.Text
ws.cell.Offset(0, 2) = TextBox3.Text
ws.cell.Offset(0, 3) = TextBox4.Text
ws.cell.Offset(0, 4) = TextBox5.Text
ws.cell.Offset(0, 5) = TextBox6.Text
ws.cell.Offset(0, 6) = TextBox7.Text
ws.cell.Offset(0, 7) = ComboBox1.Text
ws.cell.Offset(0, 8) = ComboBox2.Text
MsgBox "E? C?E?I?? E??C?"
TextBox1.Text = ""
TextBox2.Text = ""
TextBox3.Text = ""
TextBox4.Text = ""
TextBox5.Text = ""
TextBox6.Text = ""
TextBox7.Text = ""
ComboBox1.Text = ""
ComboBox2.Text = ""
CommandButton1.Enabled = True
CommandButton3.Enabled = False
25-12-2018 10:32 مساء
icon فورم بحاجة الى كود تقدم للفورم التالي وعوده للفورم السابق | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 
المشاركة الأصلية كتبت بواسطة: YasserKhalil
يمكن استخدام السطر التالي لإغلاق الفورم
Unload Me

واستدعاء الفورم السابق باسمه
UserForm2.Show


إذا لم يفي ذلك بالغرض يرجى ذكر التفاصيل بالضبط مع وضع صور للتوضيح مع وضع اسم الفورم المطلوب العمل عليه ..


ألف  الف شكر استاذي الفاضل أبو خليل الله يرحم والديك ويزيدك علم ونور وتقوى .8158 
24-12-2018 08:00 مساء
icon علموني لا تتركوني لا مقيد ولامفكوك بين الفورم s | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 
المشاركة الأصلية كتبت بواسطة: أحمد يوسف
أخى الكريم هناك مخالفتين لمبادىء المنتدى فى رفعك لهذه المشاركة

أولا: لابد ان يكون العنوان دليل على المطلوب ويعنيه بالضبط -وليس كما كتبت حضرتك علمونى او كأرجو المساعدة الى ما شابه هذا
ثانيا :لابد من رفعك لملف للعمل عليه-فلا تتم المساعدة بدون ملف
بارك الله فيك
 


شكراً استاذي الكريم احمد على الإنذار بالنسبة للموضوع من باب المداعبة والمزح ومواضيعي كلها حق اولى ابتدائي ما اظن احد بيستفيد منها لأن كل الاعضاء والزوار ما شاء الله قد وصلوا 
الى الدوال وعدو منه انا باقي اسأل كيف اكتب في عدد والا كلمة في الخلية ...laugh.....على العموم انذارك عتاب لا يفسد الود قضية وعلى خشمي استاذي العزيز وكلام حضرتك على راسي 
من فوق استاذي وبالعافية اسمع كلامك لقول المثل (من علمني حرفاً صرت له عبداً). ولك خالص تحياتي . ابنكم البار الجذمي 8158
20-12-2018 02:31 صباحا
icon شروحات الترحيل حصريا ترحيل البيانات الى داخل الجداول الجاهزة فى الاكسل من خلال اليوزرفورم | الكاتب :aljathmai |المنتدى: اكسيل شروحات فيديو
 اشكرك استاذ عماد والله يوفقك ويرفع درجتك ويرحم والديك
19-12-2018 01:36 صباحا
icon كيف يتم تحديد الشيت المراد التعديل عليه من خلال كود التعديل | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 لانى مش فاهم طلبك قوى يفضل وضع ملف مصغر لعمل وبه كود اعدل عليه في حالة لم تفهمنى من المشاركة السابقة وبعدها لاحظ الفرق وانته تفهم قصدى

تقبل تحياتى وتقديرىي.


الله يرفع قدرك تفضل  لمشاهدة الروابط يلزمك التسجيل في أكاديمية الصقر للتدريب
18-12-2018 03:05 صباحا
icon شيت كنترول ابتدائى 2019 ـ برنامج كنوز | الكاتب :aljathmai |المنتدى: اكسيل مشاريع جاهزه
 بارك الله  فيك واطال المولى بعمرك على طاعته وبر والديك وزادك علماً وتقوى .142
18-12-2018 02:57 صباحا
icon كيف يتم تحديد الشيت المراد التعديل عليه من خلال كود التعديل | الكاتب :aljathmai |المنتدى: اكسيل اسئله واجابات
 استاتذتي الكرام بارك الله فيكم حاولت بشتى الطرق ما نفعت معي الا يكون الشيت التابع للفورم هو اللي مفتوح . اذا كنت مثلاً باعدل من الفورم 1 علي ورقة 1 وفاتح ورقة 3 قبل الدخول على اليوزر فورم يعدل لي بالفورم 1 على ورقة 3 .. اظن أنني بحاجة الا اربعين دقيقة يومياً مكثفة كي افهم .g

ثانياً استاذي الفاضل محمود اطال المولى بعمرك على طاعته وبر والديك هذا السؤال الثاني لك 
Dim ws      As Worksheet

Set ws = Worksheets("sheet1")
ws.Range("a1").Value = Me.textbox1.Value


اضنك تقصد بـ A1هو المكان الذي كتبنا فيه اسم الشيت . صح
وهل ينفع اضيفه لاي كود تعديل مثل الكود الذي اضفته 
والا لازم كود يصاغ على اسم المتغير

الصفحة 1 من 4 < 1 2 3 4 > الأخيرة »





الساعة الآن 09:22 صباحا

أعلن هنا
أعلن هنا
أعلن هنا