Log In
Register
Home
Active Member
August 1, 2020
Offline
In my excel searching method not working. it gives the result no record founds in all condition. and if i add the record first time then it shown in my excel database but after fired searching method then my data wrapped and not show in excel but showing in vba application list box.
mainly i have faced a problem with searching method so plz plz plz resolve itt.
1. first of all open the .xlsm file.
2. click on New Registration form btn on 'Hone' sheet
3. click on list btn and then
4. search the record according, search by and search value field.
Attach : Screenshot of Workbook.
and link of my workbook sheet.
https://drive.google.com/file/.....sp=sharing
plz download the .xlsm file from abovelink
I have looking positive response from you.
Thankyou.
October 5, 2010
Offline
Hi Umesh,
That Google Drive link is asking me to request access for the file. Can't you just attach the file to this thread?
Video instructions on how to do so are here
https://www.myonlinetraininghu.....this-first
Regards
Phil
Active Member
August 1, 2020
Offline
Good Evening,
And sorry for asking google request of sharable link.
I have can't upload .xlsm file due to file size. when upload the file then it gives the error msg 'Error 106 - Upload file size exceeds maximum allowed size'. so i provide google shareable link.
Now sharable link is accessible so please download the file from link
October 5, 2010
Offline
Hi Umesh,
I'm not really sure why you are using filters and then copying data between sheets? If I was searching for something I'd write a sub like this
Sub MOTHSearch()
Dim Result As Range
Set Result = Range("Table1[Name]").Find("Krishna")
End Sub
Of course, you need to modify this to use the column being searched and search string from the userform.
Result will be the cell where your first match occurs. From this you can get the row and then populate the form as needed.
As you already have your data in a Table, make use of the structured references to access the data in the columns so that you don't have to do this
iColumn = Application.WorksheetFunction.Match (sColumn, shDatabase.Range ("A1:AL1"), 0)
You can use the Find and FindNext methods on the column being searched to get all matches
https://docs.microsoft.com/en-us/office/vba/api/excel.range.find
https://docs.microsoft.com/en-us/office/vba/api/excel.range.findnext
Hope that helps.
Regards
Phil
Active Member
August 1, 2020
Offline
i'm using filter according selection of filter type and the purpose of this filter is that find a record and could be delete , edit on selected(select record via over mouse point on a particular record) record.
it not necessary that copy the records between sheets it can be in a single sheet.
I'm a new learner of excel vba. so i have no depth knowledge about excel vba. But i want to learn the vba code so i have saw the other's code and try to learn.
Now, i humble request to you can you change the filtration method(codes) by own way and without changes the searching view structure. and it also can work delete and edit method same as current method??
please, please, change the filter method as you want. So i have learn too easy and new concept of vba.
And thanks for your support.
