پرفروش ترين
برترين
آخرين محصولات فروشگاه
فایل الکترونیکی آموزش اکسل پیشرفته ۲۰۱۰
آموزش ایجاد فایل چندکاربره با سطح دسترسی مشخص
نمایش نتایج: از شماره 1 تا 5 , از مجموع 5

موضوع: باز کردن پنجره جستجو با کد

  1. #1


    آخرین بازدید
    3 روز پیش
    تاریخ عضویت
    November 2013
    محل سکونت
    تهران
    نوشته ها
    1,514
    امتیاز
    6126
    سپاس
    2,918
    سپاس شده
    4,894 در 1,374 پست
    سطح اکسل
    71.67 %

    باز کردن پنجره جستجو با کد

    آيا امکان دارد پنجره find and replace را که در حالت عادي با ctrl+f باز مي شود را با کد نويسي باز کرد و به فرض محتويات سلول a1 را در آن کپي کرد؟
    اخطار: این یک موضوع قدیمی است
    به دلیل قدیمی بودن موضوع، ممکن است برخی فایل های ضمیمه به درستی کار نکنند. لطفا در صورت عدم ضرورت، از بالا آوردن موضوعات قدیمی خودداری نمایید.

  2.  

  3. #2


    آخرین بازدید
    2 روز پیش
    تاریخ عضویت
    September 2013
    محل سکونت
    بچه محل آقا امام رضا
    نوشته ها
    4,493
    امتیاز
    12381
    سپاس
    8,957
    سپاس شده
    10,652 در 3,762 پست
    سطح اکسل
    100.00 %

    نقل قول نوشته اصلی توسط علي پارسا نمایش پست ها
    آيا امکان دارد پنجره find and replace را که در حالت عادي با ctrl+f باز مي شود را با کد نويسي باز کرد و به فرض محتويات سلول a1 را در آن کپي کرد؟

    سلام

    راه هاي مختلفي براي باز كردن اين پنجره وجود داره.

    کد:
    Application.CommandBars.FindControl(ID:=313).Execute
    کد:
    Application.CommandBars("Edit").Controls("Replace...").Execute
    کد:
    Application.Dialogs(xlDialogFormulaReplace).Show
    کد:
    Application.CommandBars("Edit").Controls("Replace...").Execute
    حتي ميتونين كد بنويسين. مثلا اينطوري:

    کد:
    Cells.Find(What:=InputBox("Please enter your search criteria", "Search"), _
        After:=ActiveCell, LookIn:=xlFormulas, LookAt:=xlPart, _
        SearchOrder:=xlByRows, SearchDirection:=xlNext, MatchCase:= _
        False).Activate


  4. #3


    آخرین بازدید
    2 روز پیش
    تاریخ عضویت
    September 2013
    محل سکونت
    بچه محل آقا امام رضا
    نوشته ها
    4,493
    امتیاز
    12381
    سپاس
    8,957
    سپاس شده
    10,652 در 3,762 پست
    سطح اکسل
    100.00 %

    اينو يادم رفت بگم . براي اينكه مثلا در فيلد find what كلمه ali رو سرچ كنيد و در replace with كلمه parsa رو جايگزينش كنيد از يك همچين ساختاري استفاده بفرماييد.

    کد:
    Application.Dialogs(xlDialogFormulaReplace).Show "ali", "parsa"


  5. #4


    آخرین بازدید
    2014/03/03
    تاریخ عضویت
    December 2013
    نوشته ها
    5
    امتیاز
    14
    سپاس
    5
    سپاس شده
    5 در 3 پست
    تعیین سطح نشده است

    سلام،
    ببخشيد شايد توقع زيادي باشد ولي امکان دارد بفرماييد چگونه مي توان کد فوق را به گونه اي تکميل کرد که وقتي پنجره جستجو باز مي شود به صورتي تنظيم شده باشد که در ناحيه within آن به جاي sheet حالت workbook انتخاب شده باشد؟

  6. #5


    آخرین بازدید
    2 روز پیش
    تاریخ عضویت
    September 2013
    محل سکونت
    بچه محل آقا امام رضا
    نوشته ها
    4,493
    امتیاز
    12381
    سپاس
    8,957
    سپاس شده
    10,652 در 3,762 پست
    سطح اکسل
    100.00 %

    نقل قول نوشته اصلی توسط EXCELIAN نمایش پست ها
    سلام،
    ببخشيد شايد توقع زيادي باشد ولي امکان دارد بفرماييد چگونه مي توان کد فوق را به گونه اي تکميل کرد که وقتي پنجره جستجو باز مي شود به صورتي تنظيم شده باشد که در ناحيه within آن به جاي sheet حالت workbook انتخاب شده باشد؟

    با اين كد آخري كه گذاشتم نميشه ولي شايد با كد زير بشه. نميدونم چه تغييراتي لازم داره

    کد:
    Application.CommandBars.FindControl(ID:=313).Execute


اطلاعات موضوع

کاربرانی که در حال مشاهده این موضوع هستند

در حال حاضر 1 کاربر در حال مشاهده این موضوع است. (0 کاربران و 1 مهمان ها)

موضوعات مشابه

  1. جستجو و پیدا کردن عدد نزدیک به عدد مورد جستجو
    توسط nimavao در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 8
    آخرين نوشته: 2016/01/27, 13:49
  2. يافتن نام استان براي يك شهر از جدول استانها
    توسط karbar در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 3
    آخرين نوشته: 2012/08/27, 12:27
  3. سوال در مورد جستجوی آخرین ردیف مورد جستجو
    توسط omidi در انجمن توابع اکسل - Excel Functions
    پاسخ ها: 2
    آخرين نوشته: 2012/02/13, 20:57

بازدید کنندگان با جستجو های زیر این صفحه را پیدا کرده اند

کد جستجو در vba

کلمات کلیدی این موضوع

علاقه مندی ها (Bookmarks)

مجوز های ارسال و ویرایش

  • شما نمیتوانید موضوع جدیدی ارسال کنید
  • شما امکان ارسال پاسخ را ندارید
  • شما نمیتوانید فایل پیوست کنید.
  • شما نمیتوانید پست های خود را ویرایش کنید
  •  
  • BB code ها فعال هستند
  • شکلک ها فعال هستند
  • کد [IMG] فعال است
  • کد [VIDEO] فعال است
  • کد HTML غیر فعال است