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

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

قام بنشر

السلام عليكم

بص يا غالى اولا كده الف مليون شكر و عاش الحماس

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

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

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

 

كفاية غلاسة منى لحد كده

زو اقول الجد " جزاكم الله كل خير "

قام بنشر

الأخ حمدي

بارك الله فيك

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

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

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

وإن شاء الله نستكمل المشوار ..إنت بس خلص الـ 11 حلقة ونتفاهم (مش 14 يا محمد يا قمجي)

تقبل تحياتي

قام بنشر

ممكن المساعدة

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

قام بنشر

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

قام بنشر (معدل)

الأخ الفاضل ياسر خليل

 

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

 

لقول النبي صلى الله عليه وسلم : (( أحبّ الناس إلى الله أنفعهم للناس ، وأحبّ الأعمال إلى الله عز وجل سرور تدخله على مسلم ، أو تكشف عنه كربةً ، أو تقضي عنه دَيناً ، أو تطرد عنه جوعاً ، ولأن أمشي مع أخي المسلم في حاجة أحب إليَّ من أن أعتكف في المسجد شهراً ، ومن كفَّ غضبه سَتَرَ الله عورته ، ومن كَظَمَ غيظاً ولو شاء أن يُمضيه أمضاه ، ملأ الله قلبه رضاً يوم القيامة ، ومَن مشى مع أخيه المسلم في حاجته حتى يثبتها له ، أثبت الله تعالى قدمه يوم تزلُّ الأقدام ، وإن سوء الخُلُق ليُفْسد العمل كما يُفْسد الخلُّ العَسَل )) [ رواه ابن أبي الدنيا وحسَّنه الألباني ] .

 

جعله الله في ميزان حساناتك

تم تعديل بواسطه طالب علم 1
  • Like 1
قام بنشر

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

قام بنشر

السلام عليكم

 

اسعد الله صباحك استاذ ياسر 

 

شكرا و جعله الله في ميزان حسناتك .

 

"لا تعطني سمكة ولكن علمني كيف اصطاد"  لقد تجاوزت معني المثل بهذا المجهود الرائع استاذنا  :frown3: 

 

تحياتي  

قام بنشر

أستاذي الكبير وأخي الحبيب الغائب الحاضر أحمد عبد الناصر

مشكور على مرورك العطر على موضوعي المتواضع ...

وأرجو من الله أن ينفع به جموع المسلمين ويجعله في ميزان حسناتي يوم القيامة

قام بنشر (معدل)

شكرا جزيلا أستاذنا الكريم يــــاســـر ..واصل بارك الله فيك وجزاك كل خير ، أما عن تأخرك عن الدروس فأنت معذور لانشغالاتك الكثيرة .

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

جزاك الله خيرا ونفع بك وأدام عليك نعمة الصحة والعافية لتنفع الأمة قاطبة..

ونعتذر نحن أيضا عن التأخر عن الواجب وهذا الحل إن شاء الله  كما يلي:

Sub RightLeftFunction()
    Dim strName As String
    strName = Range("E5").Value
    
    Range("F5").Value = Right(strName, Len(strEmail) - InStr(strName , "K") + 1) _
    & "," & "  " & Left(strName, Len(strName) - InStr(strName, "r"))

End Sub

Exam12.zip

تم تعديل بواسطه salah15salah
قام بنشر

الأخ الحبيب صلاح

مفيش غيرك بيعمل الواجب ولا ايه ؟؟؟

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

بالنسبة للواجب يبدو إنك مذاكرتش كويس ..راجع الحلقة مرة تانية .. :mad: :imsorry:

الاسم اللي في الواجب مجرد مثال ::: أنا أريد كود ينطبق على أي اسم مركب من اسمين

Yasser Khalil

Salah Salem

Ahmed Kamal

Tamer Salim

Hossam Essa

وهكذا .. أي أن الكود يمكنه التعامل مع أي اسم

عموما بارك الله فيك ..أعتقد أن فكرة الواجب قد وصلتك الآن .. في انتظار التصحيح (صحح لنفسك بنفسك) .. :yes:

لو عايز واجب أصعب اكتب الأسماء اللي فاتت كلها في النطاق A1:A10 مثلا وقم بعمل المطلوب في النطاق B1:B10

قام بنشر

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

أعتقد أن الكود يمكن أن يكون كالتـــالي:

Sub RightLeftFunction()
    Dim strName As String, Str2 As String
    Dim Line As Byte, LineMax As Byte
   With Sheets(1)
     LineMax = 10
     For Line = 1 To LineMax
      strName = .Cells(Line, 1).Value
      Str2 = Right(strName, Len(strName) - InStr(strName, " "))
     .Cells(Line, 2) = Str2 & "," & "  " & Left(strName, Len(strName) _
     - Len(Str2))
     Next Line
       
   End With
 End Sub

Exam12 Solution.zip

  • Like 1
قام بنشر

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

ولما حبيت اشتغل يدوب على اول عمود اعمل عنوان مثلا رقم الجلوس واللى بعده اسم الطالب واحفظ واقول

الحمد لله تم العمل بس لما دخلت على موضوع حضرتك قبل كتابة هذه المشاركة ولحد ما وصلت لكتابة الردود اضغط هنا

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

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

قام بنشر

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

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

تقبل تحياتي

  • Like 1
قام بنشر (معدل)

استاذى الغالى ... انا متابع جيد لجميع الحلقات .. و اعتبرها مرجع خاصة كما تعلمون ان الاوامر كثيرا ما تنسى و هنا السؤال الاول :-

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

لانى اعلم ان قلة التواصل من معشر المتابعين امثالى ............تثبط الهمم

 

ثانيا هذا كود للخزينة من تنفيذ ( العبد الفقير ) و به مشكلة ان الصفحة بعد التنفيذ بزر "ترحيل و حفظ " اجد الصفحة لا تستجيب للوحة المفاتيح  رجاء العلاج و الافادة

  ملاحظة هذا هو الكود بالملف المرفق بعد الضغط لانى حاولت ارفعة بحالتةه " كالسذج :yes:  :yes:  :yes:  الصفحة رفضت

 

 

لان صفحتكم لاتسمح  برفع ملفات .xlm  

الخزينة - Copy.rar

تم تعديل بواسطه ihhamdi
قام بنشر

أخي الحبيب حمدي تسعدني كلماتك ويسعدني متابعتك للموضوع

بالنسبة لطبك يفضل طرحه في موضوع مستقل..حتى يشارك الأعضاء ويساهموا في حل المشكلة

بالنسبة لرفع الملفات قم بضغط الملفات أولاً قبل رفعها

تقبل تحياتي

قام بنشر

اسلوب جديد بس رائع

  • Like 1
قام بنشر (معدل)

الأخ ياسر

 

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

انا مشيت معاك شوية  بس حسيت بتنميل وصداع في صباع رجلي الشمال ، ومتقليش اعملها بكود<<<<

 

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

 

طبعا انتا اللي غرغرت بيا وخليت دمي يبا مش خفيف كده 

 

عموما اشكرك جزيلا ، وربنا يستر وميطلبوش منك تدرس منهج خفة الدم ،  :geek:

 

 

جزالك الله خيرا ، وممكن دعوه عن ظهر قلب لك تعدل حياتك كلها

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

تم تعديل بواسطه طالب علم 1

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