الاخ يحيى حسين

[ابو العلاء]

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

وذلك بالتعلم من خلال تسجيل المايكرو ورؤية الاكواد

ولكن هناك مايكرو كل ما احاول تسجيلة لا اجد اكواد له وهو البحث ( ctrl+f )

الرجاء توضيح ما السبب وشكرا جزيلا

[يحيى حسين]

السلام عليكم و رحمة الله

أخي تسجيل الماركو لن يظهر لك امر اظهر الديلوبوكس الخاص بعملية البحث

بل سيظهر لك مسار عملية البحث

فلقد قمت بعملية بحث عن اسمي من خلال تسجيل الماكرو

و كان هذا هو الكود

  Range("D12").Select

    Cells.Find(What:="Yahya", After:=ActiveCell, LookIn:=xlFormulas, LookAt _

        :=xlPart, SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _

        False, SearchFormat:=False).Activate 

و لكن ان رغبت في اظهار الديلوج بوكس الخاص بعملية البحث فيمكنك استخدام كود اخر لا يمكن الحصول عليه بالتسجيل من خلال الماكرو

 Sub Yahya()

   Application.Dialogs(xlDialogFormulaFind).Show

End Sub

 

[ابو العلاء]

شكر ا لك يا استاذ يحيى وجزاك الله كل خير

[ابو العلاء]

استاذ يحيى ممكن مثال على الكود الاول

[يحيى حسين]

السلام عليكم و رحمة الله

اخي الكود الاول هو عملية تسجيل ماكرو

قمت بكتابة اسم يحيى و من ثم انتر

و بعدها اوقفت تسجيل الماكرو

و حصلت على هذا الكود