Search results

Give this a read, it covers the file dialogue pretty well. https://analystcave.com/vba-application-filedialog-select-file/

The problem isn't how crazy she is, it's how many people support her brand of crazy.

The lottery is an entertainment expense, not an investment strategy. - my .02

What about those who claim no gender?

Thanks to everyone who contributed and I apologize for not responding faster. I kept getting HTTP 500 errors yesterday when I tried to log in to the site. The solution was a one liner to invoke the saved import specification: DoCmd.RunSavedImportExport "Python_Import_Spec"

Yes, even going through the advanced feature to choose the import spec. during the manual import. On a side note, it doesn't seem to matter whether I choose the spec or not during a manual import. The only time I'm having difficulty is when I try to automate the import with VBA. I may just...

That was one of the first things I tried. I don't understand why this works manually but runs into problems when automating it.

No, the file I'm working with does not have field names. It's a raw CSV dump that I have to manipulate.

Adding quotes around the specification causes Run-time error '3001' Invalid argument.

I am working to automate an import. I have defined the import specification and it works if I run it manually but it fails when called by VBA. Public Function SelectFile(Optional ByVal sFilter As String) As String 'Microsoft Office Object Library - Reference Dim fDialog As...

Every so often I provide an unsolicited opinion to my wife.

Thank you Gasman, I should have been more clear that I am not working in a cell. I am manipulating data within a spreadsheet from inside MS Access.

Solution: Debug.Print objXL.Application.WorksheetFunction.Sum(Range(Cells(11, intColumn), Cells(1017, intColumn)).Value) I had to reference objXL first to get WorkSheetFunction to work. The rest of the solution comes from Gasman and one of my co-workers assisting me with the .Value at...

After reading through this: https://powerspreadsheets.com/r1c1-formular1c1-vba/#Referring-To-A-Full-Row-Or-Column-Using-R1C1-Style-Notation I still don't have a clue of what to do. Trying to integrate the suggestion from Gasman is failing. The latest attempt produces a result of "False"...

This Fails with invalid or unqualified reference at "Sum" : Debug.Print WorksheetFunction.Sum(Range(Cells(R11C & intColumn), Cells(R1017C & intColumn))).FormulaR1C1 = "COUNTIF(C1,RC1)"

I tried Debug.Print WorksheetFunction.Sum(Range(Cells(R11C & intColumn), Cells(R1017C & intColumn))) And it looks like it wants to work but it produces a zero result where is should be a sum in the millions. Next try is what the Gasman posted above.

I need to get a sum of columnar data from an excel spreadsheet. I can get some data but not all because I won't know which column I'm working in until run time. I have an idea of converting the numerical column reference to an letter but I'd rather just use R1C1 formatting if possible to...

My original solution fails spectacularly with forms in Datasheet view so I had to try the alternate solution (Source cited in code). I've tried to get it to work without success however I was able to modify it to work in Access 2000 and provide a visual cue to the user when the limitations had...

On a related note, while implementing this further in other subforms I discovered that it doesn't work if the subform has a form or page header / footer turned on. Additionally, other CustomFormatting settings in the same collection (Controls on the form) will also over-ride this manual setting...

I came back to let you know that I see how I can leverage your method when I upgrade to a newer version but saw that you edited my comment rather than reply and had some fun with it. Right now, we use global constants declared in VBA (Inherited). Your method will allow for faster and easier...