Search results

Dear Great arnelgp, It's working perfect. How about editing the database. How to edit the current record in the MDB file. Thaaaaaaaaaaaaaaaanks in advance

Thanks a mile my dear. I'll work on.

thanks for your fruitful reply; How about the index and search Previously I was using the code: rst.index = "index name" rst.seek "=", "anything" if not rst.nomatch then How such code will be. Sorry for any inconvenience

Kindly note that I'm using Word 2016 not 2013. I've already tried this solution, but still the same issue. Thanks

Good day! I'm writing the following code in Word 2013 VB to connect to MDB database dim db as database dim rst as recordset set db="db path" set rst= db.openrecordset("Table Name") In this stage I'm getting the error message :run-time error '4029' activex component can't create object" I...

Thanks for your kind support

Thanks. I'll try it and update your goodselves.

Good evening all! I use the following Ribbon XML code in a UsysRibbon table. I got it from these forums. I need to remove the (File) menu and also to remove the title that appears at the top of the database (which displays the file name and path). Thanks in advance <customUI...

I'll try your kind suggestions. Many thanks

this: DoCmd.RunCommand acCmdFilterMenu is a part of the function (Filterform) this recalls the standard filter that's found just on the right top corner of a field. I think the idea will be clear only when you have a look on the database

Thanks for your prompt reply. An image attached.

Attached a sample database. In form (expense), the combo box (expense_item) collates data from (expenses) table and (revenues) table. There's a filter button on form header. it shows only the contents of (expenses) table to which the combo box is bound. I hope it's clear now

Good day! I use the follwoing code to filer a filed on a form Public Function FilterForm() On Error GoTo errlbl Set SelectedButton = ActiveControl Me.Controls(ActiveControl.Tag).SetFocus Me.Recordset.MoveFirst DoCmd.RunCommand acCmdFilterMenu Exit Function errlbl: If Err.Number =...

I works fine. Thanks for everyone

Attached a sample form (form1) with the text in footer section. you will notice the huge gap between the detail section and footer seciton.

Thanks all. I'll check out. Best regards

Good day everyone! I need urgently to remove the gap between form detail section and form footer, either by vba code or changing the properties. Need your urgent help please

Great. Everything is OK now. thank you very much

I've created the Newmenu using the above code but I'm talking about the case upon deploying my program on another machine in which the office 16.0 reference is not activated. i.e. every time I place my program on any other machine, I need to enable the reference manually. In case of my absence...

This code works perfectly, but the issue is that it needs office 16 library reference. On implementing my project, user will need to add it manually. Is there any VBA code to add (Microsoft Office 16.0 Object Library). Thanks in advance