حمادة عمر

الاخ الكريم / ابوعلى بارك الله فيك الفيديو يعمل ويظهر لدي بشكل طبيعي كل متصفح الاكسبلورر8 وكذلك الفايرفوكس واليك الفيديو مرفوع علي رابط خارجي لتنزيله علي جهازك ومشاهدته جزاك الله خيرا

الاخ الكريم / احب العلم بارك الله فيك واهلا بك بين اخوانك في هذا الصرح العملاق وان شاء الله ستسعد جدا بالانضمام الي هذا الصرح ولكن اولا طلبك ليس في مكانه ... والافضل لتجد الاجابات علي سؤالك هو ان تقوم بعمل موضوع جديد .. فيه طلبك ... ليشاهدة الجميع ومبدئيا شاهد الرابط التالي ... عله يفيدك ان شاء الله http://www.officena.net/ib/index.php?showtopic=46421&hl=%D8%A7%D9%84%D8%AD%D8%B1%D9%88%D9%81 جزاك الله خيرا

الاستاذ القدير العلامة الخبير / عبدالله باقشير بارك الله فيك والله دائما انتظر ردودك ومشاركاتك في المواضيع المختلفة لانه من الاكيد اننا سنتعلم شيئا جديدا مع كل مشاركة او كود او رد او موضوع لك زادك الله من فضله ومن علمه جزاك الله خيرا

الاخ الفاضل / sameer hussien الاخ الحبيب / أبو ردينة بارك الله فيكم ويكفيني مروركم الكريم والشكر كل الشكر للاستاذ القدير الغائب الحاضر / عماد الحسامي ... جزاه الله خيرا جزاكم الله خيرا

الاخ الحبيب / شوقي ربيع بارك الله فيك فكرة جميله وشرح رائع من شخص ارووع جزاك الله خيرا

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

السلام عليكم الاستاذ العملاق / رجب جاويش بارك الله فيك الاجابه الوافية كانت منكم انتم استاذنا حيث انك لو نظرت الي وقت المشاركتين لك هنا في هذا الموضوع ولردي انا في الموضوع الآخر لوجدت انك دائما سباق للخير بكل طرقه ... ولوجدت ردك تم ارساله قبل ردي في الموضوع الآخر وبذلك يكون الفضل في البدايه لك انت ولو اني رأيت هذا الموضوع وردك من البدايه ما كان لي ان اقوم بالرد حيث ان ردودك دائما راائعة جزاك الله خيرا

الاستاذ القدير / جمال عبد السميع ... ملك المعادلات

الحل لطلبك تم علي الرابط http://www.officena.net/ib/index.php?showtopic=46752&p=280804 ليكون الرد في مكانه ... لزيادة الافادة للجميع وسهوله البحث

الاخ الكريم / دكتور محمود ربيع بارك الله فيك بالنسبة لطلبك بخصوص الترحيل فالملف المرفق ليس به اي مثال علي ما تريد فهو ملف لتحريك نص في خليه وعلي حسب فهمي لطلبك ان تريد ترحيل صف معين في ورقة محددة الي شيت معين بناءا علي قيمة خلايا في عمود محدد .... ان كان كذلك شاهد المرفق التالي به مثال علي ذلك باستخدام الكود التالي Sub sama() Dim LastR As Long Application.ScreenUpdating = False LastR = Sheets("Sheet2").Cells(Rows.Count, 14).End(xlUp).Row Sheets("Sheet2").Select Sheets("Sheet2").Range("A1:n" & LastR).AutoFilter Field:=14, Criteria1:="1" Sheets("Sheet1").Range("a1:m1").Copy Sheets("Sheet2").Range("A2:m" & LastR).SpecialCells(xlCellTypeVisible).PasteSpecial Sheets("Sheet2").Range("A1:n1").AutoFilter Sheets("Sheet2").Range("A1").Select Application.ScreenUpdating = True End Sub واليك الملف المرفق به المطلوب .... جزاك الله خيرا كود ترحيل صف محدد.rar

الاستاذ العملاق / رجب جاويش بارك الله فيك كود ولا اروع ولا اجمل من كدة بالفعل طريقتك راائعة جزاك الله خيرا

السلام عليكم الاخ الكريم / محمد الحاج بارك الله فيك لقد قمت بتكرار الموضوع اخي الكريم علي الرابط http://www.officena.net/ib/index.php?showtopic=46778 فوجب التنويه عن ذلك ولكني لم اشاهده الا الآن وبه الحل من العملاق / رجب جاويش ... جزاه الله خيرا وجزاك اخي الله خيرا

السلام عليكم الاخ الكريم / محمد الحاج بارك الله فيك اليك اخي ما تريد ... جزاك الله خيرا فورم رئيسي وآخر فرعي+.rar

الاخ الكريم / محمد الحاج بارك الله فيك هل هذا هو المقصود ... شاهد الملف المرفق فورم رئيسي وآخر فرعي.rar

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

الاخ الكريم / أبو شرف بارك الله فيك بالنسبة لهذا الطلب ... بتنفيذ ذلك في ملف آخر اولا : قم بتصميم زر في صفحة الاكسيل في الملف الذي تريده ثم ضع الكود التالي في حدث الورقة التي تريد ظهور الزر فيها Private Sub Worksheet_SelectionChange(ByVal Target As Range) Me.CommandButton1.Visible = False If Target.Column = 8 Then If Target.Row > 1 And Target.Row < 10000 Then Me.CommandButton1.Top = Target.Top Me.CommandButton1.Left = Target.Left Me.CommandButton1.Visible = True End If End If End Sub ويتم تحديد العمود المراد ظهور الزر فيه من خلال السطر ... حيث انه هنا العمود رقم 8 If Target.Column = 8 Then ثم يتم تحديد في نفس الكود بداية ونهاية ظهور الزر ... اي من الصف رقم كذا ... الي الصف رقم كذا ...من خلال هذا السطر If Target.Row > 1 And Target.Row < 10000 Then وتقوم ايضا بوضع كود لاظهار الفورم المطلوب ( وهو هنا Go11 ) في حدث الزر نفسه كما يلي Private Sub CommandButton1_Click() Go11.Show End Sub ثم نضع الكود التالي في زر الترحيل الموجود في الفورم المذكور Private Sub CommandButton3_Click() Dim LR As Long ActiveCell.EntireRow.Copy If Not Cmb_NameSheet.Text = "" Then Sheets(Cmb_NameSheet.Text).Select End If LR = ActiveSheet.Cells(Rows.Count, 1).End(xlUp).Offset(1, 0).Row ActiveSheet.Cells(LR, 1).Select ActiveSheet.Paste Sheets("الحساب الرئيسي").Select MsgBox ("تم ترحيل الحساب المحدد ... بحمد الله") ActiveCell.Select ActiveCell.Offset(0, 3) = "تم الترحيل الي" & " " & Cmb_NameSheet.Value ActiveCell.Offset(0, 3).Select End End Sub جزاك الله خيرا

الاخ الكريم / أبو شرف بارك الله فيك معذرة ... سوف اقدم لك طلباتك طلب طلب نظرا لضيق الوقت لدي بالنسبة للطلب الاول بخصوص وضع اسم الحساب مع كلمة ترحيل اليك المرفق به المطلوب جزاك الله خيرا كشف حساب-SAMA++.rar

الاخ الحبيب / ضاحي الغريب بارك الله فيك مرورك دائما يشرف اي موضوع جزاك الله خيرا

السلام عليكم الاخ الكريم / نورانور بارك الله فيك بالنسبة لطلبك الاول ( كيف يمكن نقل زر بالمايكرو ليعمل فى ملف آخر ) اليك الفيديو التالي يوضح طريقة لعمل ذلك لنقل المودل الموجود به الماكرو ووضعه في ملف آخر بطريقة بسيطه وسهله ارجو ان يفي بطلبك ( ان شاء الله ) وبالنسبة لطلبك الثاني ( كيف يمكن للاكسل الحفظ اتوماتيك ) اليك ملف مرفق به كود ليجعل ملف الاكسيل كل دقيقة تلقائيا ... وبالطبع يمكنك تغيير المدة كما تريد ام انك تريد ذلك من خلال زر مخصص للحفظ ؟؟ ارجو ان يفي بطلبك جزاك الله خيرا حفظ كل دقيقة.rar

الاخت الفاضلة / سما محمد بارك الله فيكي اليك ملف للقدير الغائب الحاضر / عماد الحسامي ... جزاه الله خيرا به مثال علي طلبك بخصوص TreeView ارجو ان يفيدك ويكون هو ما تريدين جزاكي الله خيرا ملف للحسامي به مثال TreeView.rar

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

الاخ الكريم / nabiljumaan بارك الله فيك قم بوضع طلبك في موضوع جديد ( وان شاء الله ستجد ما يسرك ) ... لزيادة الافادة للجميع وسأقوم بالرد عليه مع باقي الاساتذة ... ولكن يجب عليك ارفاق ملف للعمل عليه لتكون الحلول كما تريد انت في ملفك ولتتضح الصورة لي وللجميع لتلبيه ما تريد ( باذن الله ) وايضا نصيحة قم بتقديم الطلبات في الموضوع الجديد ... طلب طلب ... لتجد اروع الحلول وتختار ما تفضله ( باذن الله ) جزاك الله خيرا