Sendkeys Edit Find
i'm using Sendkeys Edit Find to open the Find dialog box (works well)...i would like to restrict the searching to only 4 worksheets (of 14) of the workbook...?
(i see the option to select Sheet or Workbook)
???
thank you.
Show Find Dialog & Restrict to x Sheets
-
-
-
-
Re: Sendkeys Edit Find
mjs,
Perhaps post the code you have?
-
-
-
-
Re: Sendkeys Edit Find
interesting...
Show doesn't let me select sheets...
gives me an error message: " run-time 438: object doesn't support this property..." (i'm running from an on click event under a label)???
thanks.
-
Re: Show Find Dialog & Restrict to x Sheets
That code should work.
ignore :commandbars
Have a look at this thread http://www.ozgrid.com/forum/showthread.php?t=66121&highlight=Application.+CommandBars.FindControl%28ID%3A%3D1849%29.Execute
-
-
Re: Show Find Dialog & Restrict to x Sheets
we are getting there...(thanks...)
after the find is complete, i would like to unselect (i have four sheets to look through), and remain on the cell from the results of the Find)...?
thank you...!
-
Re: Show Find Dialog & Restrict to x Sheets
That is what it does when you close the dialog. Did it not do that for you when you tested it?
-
-
-
Re: Show Find Dialog & Restrict to x Sheets
thank you...we are getting there...
here's the code i have (this works, but not "perfectly"...)
(and i need to unselect after the find is over, etc.)...
Code
Display More'071107 'find Application.ScreenUpdating = False Application.DisplayAlerts = False Worksheets("Page1").Unprotect Worksheets("Page2").Unprotect Worksheets("Page3").Unprotect Worksheets("Page4").Unprotect Sheets(Array("page1", "page2", "page3", "page4")).Select Application.ScreenUpdating = True Application.Dialogs(xlDialogFormulaFind).Show Worksheets("Page1").Select Worksheets("Page1").Protect Worksheets("Page2").Protect Worksheets("Page3").Protect Worksheets("Page4").Protect Application.ScreenUpdating = True Application.DisplayAlerts = Truethank you.
-
Re: Show Find Dialog & Restrict to x Sheets
thank you...works...but not perfectly...
(i at least need to unselect sheets after the find, etc.)
Code
Display More'find Application.ScreenUpdating = False Application.DisplayAlerts = False Worksheets("Page1").Unprotect Worksheets("Page2").Unprotect Worksheets("Page3").Unprotect Worksheets("Page4").Unprotect Sheets(Array("page1", "page2", "page3", "page4")).Select Application.ScreenUpdating = True Application.Dialogs(xlDialogFormulaFind).Show Worksheets("Page1").Select Worksheets("Page1").Protect Worksheets("Page2").Protect Worksheets("Page3").Protect Worksheets("Page4").Protect Application.ScreenUpdating = True Application.DisplayAlerts = True???
thank you.
-
Re: Show Find Dialog & Restrict to x Sheets
thank you.
no, the four sheets selected, stay selected...(code is below):
Code
Display More'find Application.ScreenUpdating = False Application.DisplayAlerts = False Worksheets("Page1").Unprotect Worksheets("Page2").Unprotect Worksheets("Page3").Unprotect Worksheets("Page4").Unprotect Sheets(Array("page1", "page2", "page3", "page4")).Select Application.ScreenUpdating = True Application.Dialogs(xlDialogFormulaFind).Show Worksheets("Page1").Select Worksheets("Page1").Protect Worksheets("Page2").Protect Worksheets("Page3").Protect Worksheets("Page4").Protect Application.ScreenUpdating = True Application.DisplayAlerts = Truethank you...
-
Re: Show Find Dialog & Restrict to x Sheets
It works fine in my 2003 version.
-
-
Re: Show Find Dialog & Restrict to x Sheets
...and what happens when you use what I suggested in my last post?
Participate now!
Don’t have an account yet? Register yourself now and be a part of our community!