زاكي بوشلاغم

السلام عليكم اخواني قمت بوضع كود عند فتح ملف ايسكل كما اريد تعديل في ماكرو لكن قمت بإخفاء vba basic اريد ارجاعها قد نسيت كيف اخفيتها لانني لا اجيد تقنايت وفيزيال بازيك من فضلكم انزعو عليه تقنية مارو اوتو كلوز وشكرا حيث لا يضهر لي vba project اريد اضهاره وشكرا عند فتح ملف كلمة سر هي 3452043760

السلام عليكم اخواني قمت بوضع كود عند فتح ملف ايسكل كما اريد تعديل في ماكرو لكن قمت بإخفاء vba basic اريد ارجاعها قد نسيت كيف اخفيتها لانني لا اجيد تقنايت وفيزيال بازيك من فضلكم انزعو عليه تقنية مارو اوتو كلوز وشكرا حيث لا يضهر لي vba project اريد اضهاره وشكرا عند فتح ملف كلمة سر هي 3452043760 CNR.rar

هل من مجيب

شكرا اخي لكن انا اريد شرح كامل كل كلمة ماذا تعني الشرح يكون بالعربية

شكرا reda.ali انا انتظر الرد وبارك الله فيك

اريد كتاب يشرح لغة vb

هل من مجيب

هل من مجيب

السلام عليكم نست كلمة السر اريد ان افك كلمة السر حيث لم اتفكرها ملف في الرابط http://www.up-00.com/?wglf

السلام عليكم اتمنى ان تكون قد فهمتو ماذا اقصد

السلام عليكم اريد كتاب شرح لغة البازيك مثال : Sub AL_KHALEDI() Dim Arr As Variant Dim Rn As Range Dim C As Range Dim Lr As Long Dim T1 As String Dim T2 As String Dim Str As String Dim S As Variant Dim R As Integer Dim A As Integer Set Rn = Range(Cells(2, 2), Cells(Rows.Count, 2).End(xlUp)) Lr = Rn.Rows.Count ReDim Arr(Lr - 1) For Each C In Rn.Cells T1 = "" T2 = "" Str = Application.Trim(C) For R = 1 To Len(Str) T1 = Mid(Str, R, 1) S = Application.Search(T1, "أبجدهوزحطيكلمنسعفصقرشتثخذضظغ", 1) If Not IsError(S) Then T1 = Mid("أبتثجحخدذرزسشصضطظعغفقكلمنهوي", S, 1) T2 = T2 & T1 Next R Arr(A) = T2 A = A + 1 Next C Range("K2").Resize(Lr).Value = WorksheetFunction.Transpose(Arr) Range("B2:K500").Resize(Lr).Sort Range("K2"), xlAscending Range("K2").Resize(Lr).ClearContents Set Rn = Nothing Erase Arr End Sub بمعنى شرح كل كلمة من لغة البازيك وماذا تعني من احسن لو كان كتاب مفصل يشرح كل كلمة من لغة البازيك

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

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

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

اخي الورقة المطلوبة هيdonnee تظغط على زر ابجد هوز ترتب الاسماء. وذلك بعد ادخال اسماء كلها

السلام عليكم اخي كلمة التي تكون فيها حرف ظا لا ترتب حسب الترتيب ابجد هوز مثال لقب : ظافري لا يرتب حسب الترتيب ابجد هوز اريد ترتيب اي اسم ولقب يكون فيه حرف ظا حسب ترتيب ابجد هوز وشكرا جدول-تصفية-المنح-ابجد-هوز-صحيح.rar

شكرا اخي وبارك الله فيك

السلام عليكم اخي لم تصلح معي ممكن ان تقوم انت بالتعديل ان امكن وبارك الله فيك

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

اريد عند كتابة رقم قرار 943-000-000 في خانة رقم قرارالمنحة في عمود (h) تكتب في خانة الدفع في العمود( j ) كلمة (نعم ) مباشرة اي كلمة (نعم )مرتبطة بالقرار 0943-000-000 وكلمة (لا ) مرتبطة رقم قرار المنحة المختلفة كلمة نعم تكتب اليا في خانة الدفع عمود j لما يكتب رقم قرار المنحة 0943-000-000- في خانة رقم قرار المنحة عمود (h) جدول-تصفية-المنح-ابجد-هوز-صحيح.rar

شكرا وبارك الله فيكم

هل من الممكن ان اعرف كيف غيرت ملف بارسو الى هذا الشكل يا اخي

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

هل من مجيب

شكرا علي اليخ بارك الله فيك وربي يرحم والديك