[X]My Assistant

[datAdrenaline]

First note: This application is for A2000 and up, I selected 'All Versions' because of the wide audience the utility can apply to. I have down converted to A97 with success, if you have that need, please let me know. In the mean time, I do have an earlier version of the utility (found here), that has an A97 compatible file available.
--
This is a utility that I use to find objects in my application that contain a string pattern you specify. This is useful when you want to change a field name in a table, but you need to find out where you have used it first to see if it is worth changing the name or not. This utility is also good for determining if you can delete some old queries or tables you suspect you are not using any more, just type in the name of that query/table, select the object types you wish to search, then 'Search' the utility will point you to all occurrences of that string.
When searching Query, Form, and Report object types, you have to option to edit and save the property in which the string pattern was found. That feature is very helpful when you change the name of a Table or Query object or name of a Field in a Table object.
Osearch Queries, Forms, Reports, Tables, Modules, Macros, and Command Bars (code for command bars was not originated by me). The code behind Forms and Reports is also searched.
I realize that with A2000 and up has the 'Name AutoCorrect' feature, however, I personally do not use that feature for reasons mentioned on UtterAccess and elsewhere on the web. This utility may not be perfect either, but it sure has been a lifesaver for me. I hope you find it useful as well.
The Zip file contains and MDB file in Access 2000 format. To use this utility just extract the MDB from the Zip file, then import the xdlgSearchForText_v42 Form object into your database application. All the code needed is behind the form. A reference to the DAO object library is expected (a check for that library is done on Form_Open).
If you have any questions, please contact me.
 SearchForText.jpg ( 62.41K )Number of downloads: 313

Attached File(s)

 SearchForText_v42.zip ( 71.03K )Number of downloads: 1537

 

[ifiaz]

Hi This is a great tool!

I have saved the file to .accdb format (Access 2016) and it works flawlessly.

Hope this helps someone.

Thank you to the original author.
This post has been edited by ifiaz: Jul 12 2019, 09:48 AM

Attached File(s)

 SearchForText.zip ( 51.86K )Number of downloads: 119
 access_accdb.jpg ( 57.22K )Number of downloads: 49

 

[datAdrenaline]

You are most welcome! ... Thank you for updating to .accdb!

[paul_hammond]

Just downloaded this. It will be very help after the demise of Find and Replace.

Thanks for posting.

[NewToAccess2019]

I tried this utility, for some reason it can only search table-names and not the actual text in one of the columns of the tables.
Can someone through some light on this?
This post has been edited by NewToAccess2019: Aug 22 2019, 11:58 AM

[datAdrenaline]

This utility does not search data, it searches defined objects -- TableDefs, QueryDefs, Forms, Reports, etc. It searches through all the objects used to design and develop a database.

[NewToAccess2019]

Got it, I found something that fit my requirement.

The only problem with the new code is, it gives me the error (6- Overflow In Procedure : btn_Search_Click in Form_frm_Search)
and comes to a halt (however it does search the table and column name).
The code is and forms in the attachment.


This post has been edited by NewToAccess2019: Aug 26 2019, 11:42 AM

Attached File(s)

 SearchAllTables.zip ( 44.67K )Number of downloads: 58

 

[dstelley]

The search works flawlessy in my access database. I have literally hundreds of replacements needed in many many class objects for forms.
It finds them all under the Modules tab.
Is there a way to use the replace functionality?
Or a simple tutorial?

The edit & Replace tab has "Found Where" and Value. How do I use it?

[I_Mitch]

Hi

Similar question as dstelley, I am trying to find and replace in my forms queries etc where I have changed a table name. It finds all the items but does not make any changes, I assume its something I am doing wrong.

I have changed a table name from "Machine Collection" to "Machine_Collection"

I ticked just Queries only, just as a test
I have entered "Machine Collection" in the "Search for Text" box and "Machine_Collection" in the "Value" box then hit "Start Search" that found plenty of instances but nothing was replaced. I did the same but put the "Machine_Collection" value in "found where:". Still no joy

Any help would be appreciated

Ian

[datAdrenaline]

The code will not do the replacement for you. However, you can UN-Check the box that indicates "Do Not Offer To Replace" (yes I know is a double negative, but it made sense to do it that way when I put that code in )... when you un-check that box, when the text pattern being searched for is found in a property, the screen will present the value of the property the text pattern was found in, and you can edit the value of the property directly in that text box.

I hope that made sense. Just un-check the box when you search the Query objects and will see the SQL statements (the .SQL property of a QueryDef object) of the queries that contain the old name ... you can then edit the SQL with the new name of the table.