نجوم المشاركات

السلام عليكم تفضل أخي الملف وبه ورقة للشرح نقل التركيز.rar عذرا أخي سليم ، لم أقرأ ردك

يا أستاذ ياسر أنا مش فاكر الباسورد ومش عارف هو كبير ولا صغير وأرقام بس ولا أرقام وحروف أنا مش فاكره فعلا بس ساعات باعمله أرقام وحروف وعلى فكرة جربت برنامج EXCEL PASSWORD RECOVERY وقعد حوالي 3 أيام وماوصلش لحاجة والبرنامج بيتم تفعيله بسهولة على ويندوز 10 بس مصطفى كامل الله يرحمه قال ( لا حياة مع اليأس ولا يأس مع من تنادي) وسعد زغلول قال ( مفيش فايدة ) أنا بقى هاقول ( إلحقووووووووووووووووووووووووووووووووني )

السّلام عليكم و رحمة الله و بركاته أخي الكريم " صلاح الدين سعيد " أنصحك لوجه الله .. إذا لم يحل لك المشكلة الأخ الغالي " ياسر العربي " .. فمن الصعب .. أقول من الصعب .. تحل المشكل بسهولة إذن عليك ..بياسر العربي .. خالص إحتراماتي

وده اجتهدت وغيرت فيه بما يتوافق مع احتياجي يمكنك الاستعانة بما يخدم عملك وغير ما يلزم Mov Details Husary.rar

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

أخى عبدالعزيز الحمد لله ان كل شىء تمام أخى ياسر كل الشروحات اللى فى الموضوع ده تعمل على النسخه 2010اللتى تم وضع رابط لها باذن الله هذا والله اعلم اما بالنسبه ل vb.net فانا منزل النسخه 2012 ولم يصادفنى اى اخطاء فى التسطيب وكمان بها بعض التحسينات والاضافات اللتى لم الحظ منها غير شىء بسيط لمتابعة درس بسيط وهو سهولة اعداد البرنامج الذى نعدى ليعمل على اى بيئه سواء 32 او 64 بت جزاكم الله كل خير احبابى فى الله ما هذا الجمال ابانا الغالى ابو يوسف خطك قمه فى الجمال وكلمات فى منتهى الروعه جزاك الله كل خير وبارك الله لنا فيك ولك فى اهلك ومالك وكل من تحب لا تطيل غيابك عنا ابانا الغالى تقبل تحياتى

استبدل الكود بهذا (لا يسمح بتحديد الخلايا التي تحتوي غلى معادلة- لعدم العيث بها عن طريق الخطأ) Private Sub Worksheet_Change(ByVal Target As Range) If Target.Row >= 5 And Target.Column <= 11 And Target.Count = 1 Then _ Target.Offset(0, 1).Select If Target.Column = 9 Then Target.Offset(0, 2).Select If Target.Column = 11 Then Target.Offset(1, -9).Select End Sub Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.Column = 10 Then If Target.Row >= 4 Or Target.Row <= 15 Then Target.Offset(0, 1).Select End If End Sub

أخي الغالي ياسر العربي .. مالك قافش ليه .. Take It Easy يا عزيزي لا تلقيح ولا تنقيح .. ولا تأنيب ولا أنابيب .. لا يوجد أي من هذه الأفكار التي تدور برأسك وافر تقديري واحترامي

اخى ياسر ابوخليل الاخر ياسر العربى ماشاء الله ربنا يكرمه بجد ربنا يعينه ع المصايب اللى احنا عمالين نعملها فى الملفات او تحصل لينا وفى الاخر نرميها عليه

اخي الكريم يرجى توضيح الحماية علي ايه بالتحديد اذا كانت على محرر الاكواد او علي اوراق العمل فدي امرها سهل اما اذا كانت على الملف من الخارج فهتبقي صعبة علينا الا اذا كان الملف بامتداد xls مثلا ممكن افك حمايته ولكن المساحة تشترط ان تكون صغيرة وانت ذكرت 40 ميجا؟!!! وضح المطلوب واي حماية؟؟ وهذه مواضيع فك الحماية لاوراق العمل محرر الاكواد http://www.officena.net/ib/topic/66742-فك-حماية-محرر-الاكواد-وحماية-اوراق-العمل/ http://www.officena.net/ib/topic/66951-فك-حماية-محرر-الاكواد-xlsm-xlsb-بدون-تحويل-الملفات-ل-xls/ دي ثقة كبيرة حبيبي الغالي عبد العزيز اعتز بها ومن الممكن ان نجد من هو افضل مني في مجال تكسير وضرب ملفات الاكسيل تقبل فائق احترامي

طيب انا مشارك معاكم بس يا ابو اسيل قلنا هتشتغل على اصدار كام وحط الرابط بتاعه علشان ننزله ونتعلم سوا ملحوظه انا عاندى vb.net 2012 وياريت نوحد وقت معين نتجمع فيه سويا حتى نكون مع بعض فى نفس اللحظه ونشارك بعض ولو انى افضل برنامج محادثه يضم الاعضاء المشاركه ونضع هذه الدروس والتجارب هنا حتى يتعلم من ياتى بعد ذلك ولا تقف عند حد معين فما رايمك اخوانى الافاضل ملحوظه اخرى هل سيتم افتتاح قسم للفيجوال بيزك دوت نت هنا باوفيسنا ولا سيتم وضع الموضوع هنا عن نفسى اود فتح قسم خاص به حتى ينضم الينا اكبر عدد ممن يشاركون بهذا المجال منهم سنستفيد ومنهم سيستفيد تقبلوا منى مرورى وتحياتى لكم اجمعين

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

القديم عفا عليه الزمن وإن لم نواكب الجديد الآن فمتى نواكبه ؟! هذا مجرد رأي وننتظر بقية الآراء من إخواننا الكرام

بدأت تطلع قماش !! بارك الله فيك أخي وحبيبي أبو القبطان وجزاكم الله خير الجزاء تقبل تحياتي

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

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

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

السلام عليكم إخوتي الكرام سأحاول الترجمة حسب قدراتي المتواضعة... التطبيق حول تهيئة تحكم Active X ربما يكون غير آمن .إذا كنت تثق بمصدر هذا الملف اختر موافق وسيتم تهيئة إعداداته والسلام عليكم.

السلام عليكم أخي الكريم إن ملف التامبلت يعتبر قالب به وحدات ماكرو يمكنك أن تحفظه فارغا من البيانات أعني أنك قد أعددته بكل محتوياته بعد حفظه وإغلاقه سيعطيك مصنف جديد يحتوي على كل ماتضمنه القالب تقوم بحفظه باسم جديد ..." الغاية توليد مصنفات جديدة تحتوي الجداول والإعدادات دون البيانات كالقالب الأم " والله أعلى وأعلم والسلام عليكم.

جزاك الله خيرا اخى عبد العزيز على الترجمه اخى حماده دائما وأبدا قم برفع مشكلتك وارفاق صور لها وشرحها واهم شىء قم برفع الملف الذى به المشكله حيث من سيساعدك سوف ينظر للملف ويحاول ان يتلافى هذه الرساله تقبل تحياتى ومرورى

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

جزاكم الله خير الجزاء للمتابعه والردود الكريمه فعلا التصميم بيظهر في اختيارات 2007 شكرا جدا

السّلام عليكم و رحمة الله و بركاته هذا ما فهمته .. IF YOU TRUST ...SELECT OK إذا كنت تثق في ....... إضغط على OK لن تخسر شيء أخي الغالي إذا جرّبت الضغط على OK .. لترى ما نتيجة ذلك .. و بعدها يحلها ألف حلاّل إن شاء الله خالص إحتراماتي

السّلام عليكم و رحمة الله و بركاته أخي الحبيب الغالي " أحمد الفلاحجي " ألف شكر لمجهوداتك و شروحاتك المميّزة أخي العزيز الغالي " محمّد حسن المحمد " .. الصورة التي رفعتَها أنتَ تمثل الفيجوال بيسك دوت نات أمّا الرابط الذي وضعته هو رابط الفيجوال بيسك 6 التي عملتُ بها أنا و أنتَ مع الأخ الحبيب الغالي " ياسر العربي " في الأيام الخوالي أتمنى عودتها و عودة أحبابنا الذين ألّف الله بين قلوبنا على طاعته إحتراماتي

أخي الحبيب / ياسر بارك الله فيك وجعلني عند حسن ظنكم أعذرني ، بل اعذروني جميعا للإنقطاع أنا متابع خفيف فقط هذه الأيام لانشغالي شبه الدائم لو تيسر وقت أدخل طبعا وأشارك

رجاء من الأخ ياسر العربي بالنسبة للنسخة 2010 التي تم طرح موضوع مستقل لها .. هل هي نفس الشرح على الدروس الموجودة؟ لما لا تقوم بتوحيد مصدر التعلم أي الاتفاق على نسخة واحدة تكون متوافقة مع جميع الأنظمة وتعمل بكفاءة وبدون مشاكل ليعمل عليها الأخوة ، ولتقل نسبة المشاكل أعتقد نسخة 2010 مناسبة لجميع الأنظمة ..أذكر أنني قمت من فترة بتنصيبها ولكن الوقت لم يسعفني لأعمل عليها .. الرجاء توحيد المصدر .. لتلافي المشاكل التي تحدث مع أغلب الأعضاء تقبل تحياتي

وعليكم السلام و رحمة الله و بركاته ... If DCount("*", "tp") = 0 Or DLast("[id]", "tp") = 11 Then txt1 = 1 Else txt1 = DLast("[id]", "tp") + 2 txt1.Requery End If . . . كرار ...

تمام يا ابوالبراء وتم التنفيذ سؤال صغير وحل مشكلة ارهاق متعبه مع الاكواد الكبيره فالحمد لله الذى بنعمته تتم الصالحات ربنا يجازيك كل خير ويباركلنا فيك يا ابوالبراء تقبلوا تحياتى

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

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

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

طيب يا فلاحجي .. متنساش تبقا تقسم بالنص : النص ليك والنص التاني لأعضاء المنتدى

أخي الحبيب الجموعي أخيراً شاركت معنا في موضوع البحث .. والحل المقدم جميل جداً ورائع تقبل وافر تقديري واحترامي

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

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

لا يجوز وضغ كودين لنفس الحدث Workbook_Open يمكن دمجهما في كود واحد

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

ماتخافش ياابو البراء الصعايده طول عمرهم رجاله مع الحبابيب والمنتدي ان ماشاتلوش الشبكه العنكبوبتيه نشيله فوق كتافنا وبما انني ماعنديش حاجه معينه اشتغل عليها اليومين دول فانا قررت ابدأ بالمصطبه وسع ....وسع جايلك يابو العربي انا عارف انت سبقتني بكتير بس هابدأها من الاول والله خير معين

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

يا حاج بلاش دخووووول الصعايدة بقوة ..دا ممكن مش يكسروا المنتدى بس .دا ممكن يدمروا الشبكة العنكبوتية بالكااااااااااااااااامل .. تحياتي لكل أسيوطي وكل صعيدي ..

وعليكم السلام ورحمة الله وبركاته أخي الحبيب عبد العزيز البسكري .. لا أدري تماماً أخي فأنا ذكرت أنني لم أعمل عليها .. ولكن رأيي حتى لو كانت VB.Net فأعتقد أنها أفضل النسخ .. لأنني أثناء التنصيب أذكر أنه لم تصادفني أية مشاكل وساعتها كنت أعمل على ويندوز 10 64 بت .. ولكن لم أجربها على النسخة الحالية بعد وهي ويندوز 7 32 بت تقبل تحياتي

اخى عبدالعزيز هل قمت بالتحميل وجربت هل تم ما تريد بنجاح ام هناك شىء آخر ظهر معاك تقبل تحياتى اخى الغالى

سيكون كرما منك وفضلا لا امر بان تستجيب لتغير الاسم وجزاك الله كل خير اين اليوزر فورم الذى تتحدث عنه الذى تود التعديل عليه لايوجد اى شىء بارك الله فيك قم با نشاء اليوزر فورم الخاص بك واظبط ما تقدر عليه وعندما تقف على شىء محدد ارفع الملف هنا لاخوانك لمساعدتك تقبل منى هذا الكلام بصدر رحب تقبل مرورى وتحياتى وتمنياتى لك بالتوفيق والنجاح

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

شوف كدة الاستمارة الالكترونية.rar

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

السلام عليكم و رحمة الله و بركاته هل من يريد كل الأعداد بين عددين (حسب الاختيار) موزّعة عشوائياً دون تكرار ؟؟ انظر الى الملف المرفق توزيع عشوائي دون تكرار1.rar

أوفيسنا 2 Officena 2.rar

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

السلام عليكم الاخ الكريم / TEMOO بارك الله فيك بعد اذن الاخوة الكرام ... شاهد المرفق التالي علي حسب فهمي للطلب ( حاول فتح شيت 3 ) لا يتم ذلك الا برقم سري الرقم السري : 12345 وحاول مرة اخري برقم او كلمة خطأ وشاهد النتيجة ارجو ان يكون هذا هو طلبك جزاك الله خيرا عدم فتح شيت الا بباسورد.rar