Search results

Hi Gasman. Thanks for reply. I modify code like you suggested Me.lbxMon.RowSource = "SELECT * FROM qDailyMON WHERE " & CopmDate = DateAdd("d", 1, Me.FilterDate) After run the code I'm debuging. When I point cursor on Me.FilterDate it display date value that has filter TextBox. But CompDate...

Hi All. I would like to filter different ListBoxes RowSource by value which differ by one day. For this I created a code Private Sub cmdFilter_Click() Dim strFilter As String strFilter = "CompDate = #" & Format(Me.txtFilter.Value, "mm/dd/YYYY") & "#" Me.lbxMon.RowSource = "SELECT * FROM...

Hi MajP. Thanks for reply. This is a very useful idea. And an idea supported by an example is great. I will try to develop it close to my goal and I hope you will reply me on my next post. Thank you.

Hi All. I have attached the sample of weekly worksheet. Based on this, I would like to create a database, because every new week I have to create a new spreadsheet for keeping statistics. I can't figure out how to create a form that will look like an attached spreadsheet. Where the user will be...

Hi theDBguy. Thanks for reply. The database not split. What mean FE and BE? Thanks

Hi CJ_London. Thanks for reply. I cleaned the database and left only what is necessary. And size of DB indicate 1.8GB. An other questions. In case if database will migrated. Can I expect that it will work faster? Also, I very worry about how will work macros and VBA codes if tables and queries...

Hi All. I have the Access DB with a huge amount of macros that manage queries and files in explorer. The database file has almost reached its size limit (2 GB). I have an idea to migrate it to SQL Server. Questions: 1. Is it worth to do it? 2. If yes. Should I migrate all tables or queries as...

Hi Pat. Thanks for reply. That is exactly what I want to know. Just one more question. What execute faster query code in VBA or query as DB object? Thanks.

Hi Ranman256. Thanks for reply. Will macros run faster if you combine several similar queries into one? Thanks

Hi All. I have couple update queries for the same table: UPDATE Table1 SET Table1.Code = "01" WHERE (((Table1.Code) Not In ("01","05","06","07","08"))); and UPDATE Table1 SET Table1.ANum = Null WHERE (((Table1.Group) Like "HC*")); Is it possible to combine those queries into one update query? If...

Now I created multilevel folder. How to programmatically transfer files from one subfolder to another? Thanks

After your correction syntax error is gone. Thanks a lot. Works great, awesome.

I changed code like this Private Sub cmdFolder_Click() Dim sPath As String sPath = Environ$("UserProfile") & "\documents\test & Format(Now(), "dd_mm_yyyy_hh_nn_ss") forceMKDir (sPath) End Sub Access says Syntax error in line sPath=.... How to fix? Thanks.

Hi arnelgp. Thanks for reply. I tried to use your function like this Private Sub cmdFolder_Click() Dim sPath As String sPath = "c:\This PC\Documents\Test&CStr(now()" forceMKdir (sPath) End Sub I didn't get error, but folder was not created. I located the function in the Form code...

Hi All. I would like to create programmatically new network subfolder where name of the will be include the current date and transfer files to that subfolder from other network subfolder from the same path. If that is possible to do in Access VBA. Can somebody show and explain how to create it...

I have comma in the split In the parent form Public Function OpenForm() Dim formArg As String formArg = Me.SupplyID + "," + Me.Supply DoCmd.OpenForm "fSupply", acNormal, , , "SupplyID=" & Me.SupplyID, , formArg End Function When I double click in the parent form I'm getting error...

Hi MajP. I tried to modify your double click function of continuous form in parent form that call child form. In that changes would like to open child form with title based on values of continuous form. In order to the title of the form shows the value that will be updated. That is code of...

I substituted Dim formArg() as String to Dim formArg() as Variant now when I call child form to create a new record and when I double click to call child form to modify a record in both cases I have the same error message: Run-time error'12': Type mismatch

With 2 commas before formArg gave me error: The expression On Dbl Click you entered as the event ptoperty setting produced the following error: Type mismatch.

In the parent form for click button event to create a new record FormArg = "0,New Supply" DoCmd.OpenForm stDocName, acNormal, , , acFormAdd, , FormArg In the child form I used your suggestion Dim formArg() As String formArg = Split(Form.OpenArgs, ",") the problem is gone. But in case when I in...