Re: Import Access Table into Excel. I appreciate your assistance. Thanks!

Did you download my examples ?

I think you only copy the small macro
Test the download first


--

Regards Ron de Bruin
http://www.rondebruin.nl/tips.htm


"Damil4real" <Damil4real@xxxxxxxxx> wrote in message news:586a9e0f-62ef-4e3b-be30-037b25eb5e09@xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
On Sep 11, 3:08 pm, "Ron de Bruin" <rondebr...@xxxxxxxxxxxx> wrote:
That's interesting

What kind of errors ?
Which Excel version do you use ?

--

Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm

"Damil4real" <Damil4r...@xxxxxxxxx> wrote in messagenews:6472e13b-1075-4064-9971-65ca9f18ff0a@xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx

On Sep 11, 2:13 pm, "Ron de Bruin" <rondebr...@xxxxxxxxxxxx> wrote:





> Hi Damil4real

> Maybe this page will helphttp://www.rondebruin.nl/accessexcel.htm

> --

> Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm

> "Damil4real" <Damil4r...@xxxxxxxxx> wrote in messagenews:08c7b2e3-0f28-4ee5-9f29-a83d4f699a51@xxxxxxxxxxxxxxxxxxxxxxxxxxxxxxx
> >I have a table in Access called "Invested Related". All the analysis
> > is to be done in Excel.

> > I want to implement a button in EXCEL. Such that when the user clicks
> > on it, it will go to Access get that Table and then paste it in the
> > current workbook.

> > Then when it's pasted in Excel (there are about 10 Categories), I want
> > the categories to be sorted using the category called "Invested". So
> > Basically, only show me columns for "Invested."

> > Is there anyway this can be done in Excel?

> > I greatly appreciate your efforts, guys!

> > Thanks!- Hide quoted text -

> - Show quoted text -

Thanks! I visited that page, and I tried all of the codes, but none
worked. I received errors on them all.

I appreciate any assistance.

Thanks!- Hide quoted text -

- Show quoted text -


Version 2003.

Error says: "Compile error: Sub or Function not defined"

Then Sub Test1() is highlighted.

I ended the suggested code as follows:

Sub Test1()
'This example retrieves the data for the records in which ShipCountry
= Germany
GetDataFromAccess ThisWorkbook.Path & "/access file name.mdb",
"table name", _
"XX", "=", "XX", _
Sheets("Book4").Range("A8"), _
"*", True, True
End Sub


Code didn't work.

Thanks for your help!
.

Loading