Almohajeer_2004

المعذره اخ خالد في البدايه رفعت الملف مره + مره "بالخطى" اما الثالثه بناء على طلبك عندما ذكرة لعدم قدرتك على فتح الملف وعدم خبرتي بالتعامل مع هذا المنتدى الراقي والمفيد على اي حال : ما ارسلته لي قريب مما اريد فعله بنسبة 80% واكن مطلوب بعض التعديلات اذا تكرمت على مساعدتي لارسل لك الملف من جديد مع المطلوب واذا لم يكن لديك الوقت اشكرك على قمت به وانا لك من الشاكرين .

1- عندما اكتب id الصنف في اعامود d يظهر اسم الصنف في عامود E وذلك صفحة solid وذلك ماخوذ من صفحة Id ................................................................. 2- ترحيل اعداد الاصناف من صفحة solid من العامود F الى صفحة DB الى عامود يساوي Id الصنف مثل Id = 10 عامود = 10في صفحة DB ولذلك ابعث الملف للمساعده ولكم منا الف شكر والسلام عليكم Grebna Baza1.rar

الرفع للاهميه >>>>>>>>

1-اريد وضع تلقاىي تسلسلي في خليه H2 في صفحة Solid ماخوذ من صفحة DB من اخر رقم في العامود B +1 2- عندما اكتب id الصنف في ااعامود d يظهر اسم الصنف في عامود E وذلك صفحة solid وذلك ماخوذ من صفحة Id 3- ترحيل اعداد الاصناف من صفحة solid من العامود F الى صفحة DB الى عامود يساوي Id الصنف مثل Id = 10 عامود 10في صفحة DB ولذلك ابعث الملف للمساعده ولكم منا الف شكر والسلام عليكم Grebna Baza1.rar

1-اريد وضع تلقاىي تسلسلي في خليه H2 في صفحة Solid ماخوذ من صفحة DB من اخر رقم في العامود B +1 2- عندما اكتب id الصنف في ااعامود d يظهر اسم الصنف في عامود E وذلك صفحة solid وذلك ماخوذ من صفحة Id 3- ترحيل اعداد الاصناف من صفحة solid من العامود F الى صفحة DB الى عامود يساوي Id الصنف مثل Id = 10 عامود 10في صفحة DB ولذلك ابعث الملف للمساعده ولكم منا الف شكر والسلام عليكم Grebna Baza1.rar

TC = Target.Column TR = Target.Row If TC = 2 Or TC = 3 And TR > 2 And TR < 10 Then السلام عليكم ورحمة الله اشكرك اخ علي ((واتمني لك الصحه والعافيه)) على جهدك المتواصل ولخدماتك اللتي افدت بها كل اعضاء هذا المنتدي ولي طلب بسيط اذا تكرمت ان تشرح هذان السطران في الاعلى .لاستعملهم بالفهم وليس بالنقل واعود واكرر شكري وامتناني لك ولجميع الاخو ه اللذين يساهمون في اثراء هذا المنتدى الرائع

شكرا اخ علي علي على مرورك وجزاكم الله كل خير

السلام عليكم ورحمة الله المطلوب كيف نكتب معادله في sheet code عند استعمالنا sumproduct والملف مرفق للتوضيح والشكر سلفا _________.rar

السلام عليكم ورحمة الله في اي sheet نضغط مثلا على c3 نكتب = b1+a1 في c3 هو جمع خلية a1+b1 1. المطلوب كيف كتابة هكذا معادلات في sheet code 2. :مثلا ... (c1=sumproduct(a1:a10;b1:b10 كيف نكتب ذلك في sheet code

بارك الله فيك. أشكرك اخي الكريم على تعاونك وتجاوبك وكان بالظبط ما اطلبه والسلام عليكم

السلام عليكم ورحمة الله في اي sheet نضغط مثلا على c3 نكتب = b1+a1 في c3 هو جمع خلية a1+b1 المطلوب كيف كتابة هكذا معادلات في sheet code والشكر سلفا

السلام عليكم اخواني كذلك انا بحاجه لجواب عن نفس السؤال وجزاكم الله كل خير

السلام عليكم اخي tendaha اذا اردت الرقم السري ل VBA . MarkeTickerVersionTwoFree فهو23ZB وكذلك اناى تعرضت لنفس المشكله وحتى الان لم اجد الحل

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

بسم الله الرحمن الرحيم السلام عليكم بعد التحيه سوالي الا وهو كيف انقل sheet من workbook الى workbook اخر وشكرا

السلام عليكم ممكن تجد الحل لسؤاك على هذا الرابط http://www.exceltip.com/st/Calculating_the...n_Hours/97.html

ممكن الحل لسؤالك على هذا الرابط http://www.exceltip.com/show_tip/Lookup_Fo..._Match/993.html

اخي العزيز ابو عمر السلام عليكم المعزره لعدم مساعدتك لاني من المبتدئين بالاكسيل وقبلك طلبت خدمه وبدون فائده انصحك بمراجعه هذا الرابط ربما تجد ضالتك هناك ادعو لك بالتوفيق وتقبل تحياتي http://www.exceltip.com/category.html

السلام عليكم مطلوب للعمل( خبير كود مع خبره) للمزيد على الاطلاع الدخول على الرابط التالي http://www.officena.net/ib/index.php?showtopic=11561

جزاك الله كل خير.واشكرك على ما قدمته من خدمه. وبقي سؤال .كيف الطريقه بان اتعلم لغة vba لاستعمالها في الاكسيل ؟؟؟ ولك مني كل شكر وتقدير.

Private Sub Comd_Add_Click() Sheets("list").Select Dim EndRow As Long If TextBox1.Value = "" Or TextBox2.Value = "" Or TextBox3.Value = "" Then MsgBox Prompt:="&iacute;&Igrave;&Egrave; &Aring;&szlig;&atilde;&Ccedil;&aacute; &szlig;&Ccedil;&Yacute;&Eacute; &Ccedil;&aacute;&Egrave;&iacute;&Ccedil;&auml;&Ccedil;&Ecirc;", Title:="&Icirc;&Oslash;&Atilde;" Else EndRow = Sheets("List").Range("A1").CurrentRegion.Rows.Count Sheets("List").Cells(EndRow + 1, 1).Value = EndRow Sheets("List").Cells(EndRow + 1, 2).Value = TextBox1.Value Sheets("List").Cells(EndRow + 1, 3).Value = TextBox2.Value Sheets("List").Cells(EndRow + 1, 4).Value = TextBox3.Value TextBox1.Value = "" TextBox2.Value = "" TextBox3.Value = "" MsgBox Prompt:="&Ecirc;&atilde;&Ecirc; &Uacute;&atilde;&aacute;&iacute;&Eacute; &Ecirc;&Ntilde;&Iacute;&iacute;&aacute; &Ccedil;&aacute;&Egrave;&iacute;&Ccedil;&auml;&Ccedil;&Ecirc; &Egrave;&auml;&Igrave;&Ccedil;&Iacute;", Title:="&Ntilde;&Oacute;&Ccedil;&aacute;&Eacute; &Ecirc;&Atilde;&szlig;&iacute;&Iuml;" End If end Sub]

Private Sub Comd_Add_Click() Sheets("list").Select Dim EndRow As Long If TextBox1.Value = "" Or TextBox2.Value = "" Or TextBox3.Value = "" Then MsgBox Prompt:="&iacute;&Igrave;&Egrave; &Aring;&szlig;&atilde;&Ccedil;&aacute; &szlig;&Ccedil;&Yacute;&Eacute; &Ccedil;&aacute;&Egrave;&iacute;&Ccedil;&auml;&Ccedil;&Ecirc;", Title:="&Icirc;&Oslash;&Atilde;" Else EndRow = Sheets("List").Range("A1").CurrentRegion.Rows.Count Sheets("List").Cells(EndRow + 1, 1).Value = EndRow Sheets("List").Cells(EndRow + 1, 2).Value = TextBox1.Value Sheets("List").Cells(EndRow + 1, 3).Value = TextBox2.Value Sheets("List").Cells(EndRow + 1, 4).Value = TextBox3.Value TextBox1.Value = "" TextBox2.Value = "" TextBox3.Value = "" MsgBox Prompt:="&Ecirc;&atilde;&Ecirc; &Uacute;&atilde;&aacute;&iacute;&Eacute; &Ecirc;&Ntilde;&Iacute;&iacute;&aacute; &Ccedil;&aacute;&Egrave;&iacute;&Ccedil;&auml;&Ccedil;&Ecirc; &Egrave;&auml;&Igrave;&Ccedil;&Iacute;", Title:="&Ntilde;&Oacute;&Ccedil;&aacute;&Eacute; &Ecirc;&Atilde;&szlig;&iacute;&Iuml;" End If End Sub هذا الكود هو الذي يدخل البيانات من الفورم الى ورقة الاكسيل. وارجو لو تتكرم علينا وتشرح بالمختصر اسطر الكود حتى نستوعب بالفهم وليس لالنقل والشكر سلفا ...

جزاك الله كل خير على ردك السريع. شاهدت الشرح .وانها طريقه جميله جدا فهمت الشرح ولكن عندما نسخت من Enter_data الكود وهو في الفورمز.فهي لغة vba وهذا ما اجهله. وقبل عمل الفورم كان هناك فورم اخر باسمEnter_data ؟؟؟؟؟؟؟وفيه الكود؟ وهل الكود بلغة vba ام عن طريق ماكرو تسجيل؟ واين نضع الكود في زر بالفورم؟ ام في sheet.view code؟؟؟؟ او بالاحرى ان توضح ما افتقد من التوضيح السابق ارجو المعزره .

اخانا العزيز hs889 انا من المبتدئين "في الاكسل" وعند اطلاعي على برنامجك اعجبت به جدا.ارجو منك ان توضح لي وللاخوه المبتدئين كيف عملت ال form وربطته بالصفحه.وكيف عملت الزر الموجود بالفورم. وبارك الله بك وجزاك كل خير.