Home |
Search |
Today's Posts |
#1
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Settings in Find Dialog Box
I want a macro that will change the default setting in the Find or Find and
Replace dialog box to search by "columns" instead of rows, and look in "values" instead of formulas. I'm glad all of you are there to help people like me. -- Thank you... Elaine |
#2
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Settings in Find Dialog Box
One way:
Put this in the ThisWorkbook code module of your Personal.xls workbook: Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub Note that the Find dialog retains the settings of previous finds, so the new "defaults" won't come up if you do a search by rows and look in formulas. In article , Elaine wrote: I want a macro that will change the default setting in the Find or Find and Replace dialog box to search by "columns" instead of rows, and look in "values" instead of formulas. I'm glad all of you are there to help people like me. |
#3
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Settings in Find Dialog Box
This is what I have in the Personal Workbook and it does not work for me.
What am I doing wrong? ------------------------------------------------------------------------------ Sub Custom_Find_Dialog() ' ' Custom_Find_Dialog Macro ' ' Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub ------------------------------------------------------------------------ -- Thank you so much for your help... Elaine "JE McGimpsey" wrote: One way: Put this in the ThisWorkbook code module of your Personal.xls workbook: Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub Note that the Find dialog retains the settings of previous finds, so the new "defaults" won't come up if you do a search by rows and look in formulas. In article , Elaine wrote: I want a macro that will change the default setting in the Find or Find and Replace dialog box to search by "columns" instead of rows, and look in "values" instead of formulas. I'm glad all of you are there to help people like me. |
#4
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Settings in Find Dialog Box
You shouldn't have the
Sub Custom_Find_Dialog() line. In fact, what you've shown *should* give you a compile error. Make sure that the Workbook_Open() macro is in the ThisWorkbook module, not a regular code module. In article , Elaine wrote: This is what I have in the Personal Workbook and it does not work for me. What am I doing wrong? ------------------------------------------------------------------------------ Sub Custom_Find_Dialog() ' ' Custom_Find_Dialog Macro ' ' Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub ------------------------------------------------------------------------ -- Thank you so much for your help... Elaine "JE McGimpsey" wrote: One way: Put this in the ThisWorkbook code module of your Personal.xls workbook: Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub Note that the Find dialog retains the settings of previous finds, so the new "defaults" won't come up if you do a search by rows and look in formulas. In article , Elaine wrote: I want a macro that will change the default setting in the Find or Find and Replace dialog box to search by "columns" instead of rows, and look in "values" instead of formulas. I'm glad all of you are there to help people like me. |
#5
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Settings in Find Dialog Box
JE wrote to put this code:
Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub behind the ThisWorkbook module in your personal.xls workbook's project. Don't try to bury it in an existing subroutine (like custom_find_document). By using Workbook_Open under ThisWorkbook, then the code will run each time excel opens this file. By using personal.xls (in your XLStart folder), excel will open that file each time it starts. Elaine wrote: This is what I have in the Personal Workbook and it does not work for me. What am I doing wrong? ------------------------------------------------------------------------------ Sub Custom_Find_Dialog() ' ' Custom_Find_Dialog Macro ' ' Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub ------------------------------------------------------------------------ -- Thank you so much for your help... Elaine "JE McGimpsey" wrote: One way: Put this in the ThisWorkbook code module of your Personal.xls workbook: Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub Note that the Find dialog retains the settings of previous finds, so the new "defaults" won't come up if you do a search by rows and look in formulas. In article , Elaine wrote: I want a macro that will change the default setting in the Find or Find and Replace dialog box to search by "columns" instead of rows, and look in "values" instead of formulas. I'm glad all of you are there to help people like me. -- Dave Peterson |
#6
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Settings in Find Dialog Box
It works!!! I'm soooo glad for people like you that have the patience and
expertise to help others!!! -- Thank you... Elaine "JE McGimpsey" wrote: You shouldn't have the Sub Custom_Find_Dialog() line. In fact, what you've shown *should* give you a compile error. Make sure that the Workbook_Open() macro is in the ThisWorkbook module, not a regular code module. In article , Elaine wrote: This is what I have in the Personal Workbook and it does not work for me. What am I doing wrong? ------------------------------------------------------------------------------ Sub Custom_Find_Dialog() ' ' Custom_Find_Dialog Macro ' ' Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub ------------------------------------------------------------------------ -- Thank you so much for your help... Elaine "JE McGimpsey" wrote: One way: Put this in the ThisWorkbook code module of your Personal.xls workbook: Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub Note that the Find dialog retains the settings of previous finds, so the new "defaults" won't come up if you do a search by rows and look in formulas. In article , Elaine wrote: I want a macro that will change the default setting in the Find or Find and Replace dialog box to search by "columns" instead of rows, and look in "values" instead of formulas. I'm glad all of you are there to help people like me. |
#7
Posted to microsoft.public.excel.programming
|
|||
|
|||
Change Settings in Find Dialog Box
What incredible people all of you are!!!
-- A BIG thank you... Elaine "Dave Peterson" wrote: JE wrote to put this code: Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub behind the ThisWorkbook module in your personal.xls workbook's project. Don't try to bury it in an existing subroutine (like custom_find_document). By using Workbook_Open under ThisWorkbook, then the code will run each time excel opens this file. By using personal.xls (in your XLStart folder), excel will open that file each time it starts. Elaine wrote: This is what I have in the Personal Workbook and it does not work for me. What am I doing wrong? ------------------------------------------------------------------------------ Sub Custom_Find_Dialog() ' ' Custom_Find_Dialog Macro ' ' Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub ------------------------------------------------------------------------ -- Thank you so much for your help... Elaine "JE McGimpsey" wrote: One way: Put this in the ThisWorkbook code module of your Personal.xls workbook: Private Sub Workbook_Open() Worksheets(1).Cells.Find What:=vbNullString, _ LookIn:=xlValues, SearchOrder:=xlByColumns End Sub Note that the Find dialog retains the settings of previous finds, so the new "defaults" won't come up if you do a search by rows and look in formulas. In article , Elaine wrote: I want a macro that will change the default setting in the Find or Find and Replace dialog box to search by "columns" instead of rows, and look in "values" instead of formulas. I'm glad all of you are there to help people like me. -- Dave Peterson |
Reply |
Thread Tools | Search this Thread |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Forum | |||
How to permanently change Dialog Caption while in the Dialog | Excel Programming | |||
How to permanently change Dialog Caption while in the Dialog | Excel Programming | |||
Capture Find Settings | Excel Programming | |||
cannot find c:\documents and settings | Excel Discussion (Misc queries) | |||
Change Find Dialog Defaults | Setting up and Configuration of Excel |