السلام عليكم ورحمة الله وبركاتو
الاعزاء جمعيا
الرجاء مساعدتي وتم ارفاق الملف
انا احتاج عند الكتابة بحقل البحث ان تتفلتر اتوماتيكي الليست بوكس لانه يوجد لدي بيانات كثيرة في الجدول ولقد حاولت كثيرا ولم استطع حل هذه المشكلة مع العلم تم تفعيل الدبل كليك في الليست بكوس لاظهار البيانات
ولكم جزيل الشكر
test L - Copy (2).xlsm
السلام عليكم
الرجاء المساعدة لدي ملف وسوف يعمل به اكثر من 10 موظفين وانا بحاجة ان اضيف كود
أود الحصول على الماكرو الخاص باسم المستخدم او (اسم الكمبيوترللموظف)
واملأ خليه سي 2 باسم المستخدم عند تغيير خليه بي 2 وما إلى ذلك نحن 10 اشخاص الذين يستخدمون ورقة العمل ومن الجيد أن نرى من قام بالتغييرات
تم استخدام هذا الكود ولكن عند دخول مستخدم اخر يتغير جميع اسماء المستخدمين الاخرين
Public Function UserName()
UserName = Environ$("COMPUTERNAME")
End Function