Search results

I certainly will. He has no time for political correctness.

Oh wait it's probably... Application.Run "DoSomething" & str

Imagine I have two subrountines: Private Sub DoSomething1() [Do Something] End Sub Private Sub DoSomething2() [Do Something] End Sub And this Declaration: Dim str As String str = 1 Is it possible to refer to/call one of these subroutines using something like this: ("DoSomething" & str)...

No sorry guys. Still the same error on the same line.

Hi everyone. Happy New Year to you all. I'm working on a user form that has a number of check boxes on the left. On the right hand side there are two text boxes for each check box. When a check box is ticked (set to true) the two text boxes on the right hand side become active. Rather than...

Hello everyone, I'm trying to add two rows to the top of an Excel worksheet "qryCFP" from a workbook using the following vba code from Access: Excel.Application.Workbooks("Path").Worksheets.("Sheet1").Rows.Insert I get the error message "subscript out of range." I realize that the code above...

Yeah I just did that in the end. Good idea.

Hi I'm using Excel vba for the first time and I'm trying to find the maxium value in the column AI (No. 35) in an Excel spreadsheet FROM Access. So I've got: Dim appExcel As Object Dim datLast As Date Set appExcel = CreateObject("Excel.Application") datLast =...

Thanks for the reply. Is this true even if the field name is in a SQL Query?

Hello everyone, I think this is a vba question at heart so I've posted this here. Adding fields into a function has been a problem for me: IIf((Count([qryADDR].[Fuel Type]>2), 'MPS', [qryADDR].[Fuel Type]) The logic I'm trying to create is the following: If the number of Fuel Types is...

lol And that method worked for me. There were two fields that were still non-numeric because of the limitations of an underlying query. Thanks very much. Excellent work!

Hello everyone, I think this is a vba question at heart so I've posted this here. I'm trying to use this in a query: SELECT [Table]., SUM(CDbl([Table].[Field])) AS [New Field] FROM Table GROUP BY [Table].[Code] The CDbl() is used because the original value for [Table].[Field] is of the...

Sup fellas. Found the solution after going through it step by step. The dimension "strVALUES" should have been inside the Do/Loop. It wasn't subject to MoveNext and therefore stayed on the same record! Private Sub cmdSubmit_Click() Dim db As Database Dim strINSERT As String...

uwotm8 :D Ah thanks

What's an rte?

The field Sourcing_Date is actually stored as a number and recalculated into a date using Date_Add on demand. This line of code actually seems to work on the first loop through, but then fails on the second loop, because the recordset hasn't moved to the next record (.movenext not working for...

Is there anything I can make clearer? I know it's a quite a long question.

Fascism is not inherently racist. See Mussolini and Franco.

Hello, So I have a table "zztblArticles." Some fields should go to "tblArticles" and values in Tag_ID should go to a lookup table "tblTag" and a junction table "tblArticles_Tags." I'll explain the code I've written below: Private Sub cmdSubmit_Click() Dim db As Database Dim...

Oh my God yeah, Ghandi - "Man of Peace." We are told so many half truths it's sickening.