Ali Mohamed Ali

تفضل جرب هذا حدث اليوم.xlsx

السلام عليكم أحبائى وأساتذتى أقدم لكم ملف للبحث عن بيانات شخص فى صفحة معينة من عدة صفحات بإستخدام المعادلات فبمجرد اختيار اسم الصفحة المراد البحث فيها من القائمة المنسدلة الموجودة فى الخلية C2 من صفحة البحث واختيار اسم الشخص المراد البحث به من الخلية B2 من نفس الصفحة يتم جلب بيانات هذا الشخص من الصفحة التى قمت بتحديدها جزاكم الله كل خير وبارك الله فيكم البحث عن بيانات من عدة صفحات بالمعادلات.xlsm

ممكن تجرب هذا Query by Advanced Filter & VBA1+2 - Copy.xlsm

تفضل أستاذى الكريم اكسل vba فتح شيت جديد بمجرد ادخال الاسم فى الخلية.xlsm

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

ممكن ارسال الملف حتى يتسنى للإخوة مساعدتك

أهلا وسهلا بك أستاذى الكريم فى منتدانا من الأفضل ارسال الملف للعمل عليه حتى يتسنى للإخوة الخبراء مساعدتك بارك الله فيك

وهذا تنفيذ لدالة استاذنا الكبير زيزو دالة شرطية.xlsm

يمكنك تجربة هذان الملفان واختر ما يناسبك بارك الله فيك Vice_versa Hyper.xlsm فتح شيت جديد.xlsm

وجدت هذا الملف لدى حاول تطويعه لما تريد بارك الله فيك 35075838.doc هرم.xls

أخى الكريم يمكنك رفعه على مواقع لتحميل الملفات مثل https://www.mediafire.com https://www.file-upload.com/ https://up.top4top.net/ أو اذا كان لديك سيرفر فى الشركة يمكنك رفع الملف عليه جزاك الله كل خير

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

تفضل وهذا ايضا ملف لما تريد يوزرفورم.xlsm

أهلا وسهلا بك فى منتدانا الكريم ..من الأفضل ارسال الملف للعمل عليه ..ولكن تفضل هذا الكود والباسورد به 123 Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Target.HasFormula Then MsgBox "ÇáãÚÇÏáÇÊ áä ÊÙåÑ" 'ActiveSheet.Protect Else 'ActiveSheet.Unprotect End If MyPassword = "123" For Each MySheet In ActiveWorkbook.Sheets MySheet.Protect _ Password:=MyPassword, _ DrawingObjects:=True, _ Contents:=True, _ Scenarios:=True, _ AllowFormattingCells:=True, AllowFormattingColumns:=True, _ AllowFormattingRows:=True, AllowInsertingColumns:=True, AllowInsertingRows _ :=True, AllowInsertingHyperlinks:=True, AllowDeletingColumns:=True, _ AllowDeletingRows:=True, AllowSorting:=True, AllowFiltering:=True, _ AllowUsingPivotTables:=True, _ UserInterfaceOnly:=False Next MySheet End Sub

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

أهلا وسهلا بك فى منتدانا الكريم ممكن تجرب هذا و الباسوورد 550055 والباسوورد للصلاحيات 29051982 برنامج_مخازن_2018.rar

تفضل اخى الكريم بيان اول وااخر تاريخ تحميل المنتوج على اساس الرقم.xlsx

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

السلام عليكم اهل المنتدى الكرام اقدم لحضراتكم ملف به كود لتحديث وتغيير محتوى القائمة المنسدلة تلقائيا فهناك عمود مكون من أسماء الموظفين واخر بأكواد هؤلاء الموظفين-فقمت بعمل قائمة منسدلة بسيطة بأسماء الموظفين ثم بعد ذلك قمت بعمل كود يربط أسماء الموظفين بأكوادهم وأرقامهم عن طريق Vlookup بحيث عند اختيار اسم الموظف من القائمة المنسدلة يظهر بعد ذلك كود هذا الموظف مكان اسمه بارك الله فيكم وجزاكم كل خير تحديث محتوى قائمة منسدلة تلقائيا.xlsm

ممكن تجرب هذا معادلة جمع.xlsx

اللى حضرتك بتقوله ده صعب تنفيذه الا اذا كانت الفواتير على صفحات مختلفة كمثل هذا الملف Serial.xls

السلام عليكم اهل المنتدى الكرام أقدم لكم برنامج المرتبات وكلمة السر :123 A.salary.mdb

جرب هذا الكود

يمكنك تجربة هذا الملف عله يفيدك ملف بحث بفورم ممتاز - 2.xlsm

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