إخوتى الأفاضل
الأستاذ / حمادة باشا
الأستاذ / حسين العصلوجى
ألف مليون مبروك على الترقية المستحقة
ومن تقدم الى تقدم ومن نجاح الى نجاح
وألف مليون شكر لإدارة المنتدى
ولأستاذى الحبيب / عبد الله باقشير على حسن الإختيار
استاذى الحبيب / عبد الله باقشير
بسم الله ما شاء الله
ابداعات لا تنتهى تصل الى المطلوب من أقصر وأذكى الطرق
ولإثراء الموضوع
هذا حل آخر على خطى أستاذى الحبيب
ترحيل1.rar
أخى الفاضل / أكرم جلال
تفضل
هذا هو الكود المستخدم فى الاستبدال
Private Sub CommandButton2_Click()
If Me.TextBox2 = "" Then Exit Sub
For i = 1 To Sheets.Count
Sheets(i).Cells.Replace TextBox1, TextBox2
Next
End Sub
استبدال كلمة فى جميع الصفحات.rar
أخى الفاضل
جزاك الله كل خير على كلماتك الطيبة
أخى اذا كنت تريد أن تدخل جامعة الأكسل فعليك بمتابعة هذا المنتدى
فهو يحتوى على العديد من عمالقة الاكسل وسوف تتعلم منهم الجديد والمفيد كل يوم
تقبل تحياتى
أخى الفاضل
السلام عليكم ورحمة الله وبركاته
أولا : لك منى دعوة كريمة بتغير اسم الظهور الى اللغة العربية لسهولة التواصل بيننا
ثانيا : هذه فكرة سريعة لما تريد حيث يتم البحث برقم الجلوس فقط ويتم عرض البيانات بمجرد كتابه رقم الجلوس
جربها وان أردت تعديل أخبرنى
تقبل تحياتى
بحث.rar
أخى الفاضل
مرحبا بك عضوا جديدا بين اخوانك
فى هذا المنتدى سوف تجد كل ما هو جديد ومفيد
أولا : لك منى دعوة كريمة بتغيير اسم الظهور الى اللغة العربية حتى يسهل التواصل بيننا
ثانيا : تم عمل الجزء الخاص بتسلسل الفاتورة
New ورقة عمل Microsoft Excel (2).rar
وعليكم السلام ورحمة الله وبركاته
أخى الفاضل
مرحبا بك عضوا جديدا بين اخوانك
فى هذا المنتدى سوف تجد كل ما هو جديد ومفيد
أولا :لك منى دعوة كريمة بتغيير اسم الظهور الى اللغة العربية حتى يسهل التواصل بيننا
ثانيا : أرفق ملف أخى الفاضل به توضيح لما تريد
وان شاء الله سوف تجد الكثيير من الأخوة يبادرون بعمل المطلوب
تقبل تحياتى