If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#21
|
|||
|
|||
Import Access Table into Excel. I appreciate your assistance. Thanks!
If you not have to enter a password then it must work
Try to clean up the database so it only have a few records with no important information. Send it to me private and I test it for you -- Regards Ron de Bruin http://www.rondebruin.nl/tips.htm "Damil4real" wrote in message ... On Sep 15, 1:19 pm, "Ron de Bruin" wrote: Is the database protected ???? -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... On Sep 15, 12:36 pm, "Ron de Bruin" wrote: I have no idea what the problem is on your machine Try it on another machine to see if you have the same problem Use only the files in the zip example to test it the first time -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... On Sep 12, 2:22 pm, "Ron de Bruin" wrote: First test the code in the "Code Website.xls" Always start with a simple example -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... On Sep 12, 12:05 pm, "Ron de Bruin" wrote: A space in the field name is no problem If my Examples are working OK then I have no idea without seeing your macro. Maybe if you post the macro I see something strange -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... On Sep 12, 11:30 am, "Ron de Bruin" wrote: HiDamil4real Send me your database private I will look at it then for you -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... On Sep 12, 10:27 am, "Ron de Bruin" wrote: Hi This is not correct GetDataFromAccess ThisWorkbook.Path & "C:xxx/xxx/xxx/ OrderDatabase.mdb", "Invested Securities", _ Remove this ThisWorkbook.Path & And enter your path like this "C:\Users\Ron\test\OrderDatabase.mdb" -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... On Sep 11, 3:23 pm, "Ron de Bruin" wrote: Did you download my examples ? I think you only copy the small macro Test the download first -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... On Sep 11, 3:08 pm, "Ron de Bruin" wrote: That's interesting What kind of errors ? Which Excel version do you use ? -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... On Sep 11, 2:13 pm, "Ron de Bruin" wrote: HiDamil4real Maybe this page will helphttp://www.rondebruin.nl/accessexcel.htm -- Regards Ron de Bruinhttp://www.rondebruin.nl/tips.htm "Damil4real" wrote in ... 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!- Hide quoted text - - Show quoted text - I greatly appreciate your assistance, Ron, but the code is still not working. I downloaded and made some changes to your code, but it's still not working. I get an error message that says: "error copying data." I don't know why I'm getting this error. It seems your example has the table name as just one word ("Orders"), while my table has two words ("Invested Related"). Also my access path has three words. Also you have ur path as: GetDataFromAccess ThisWorkbook.Path & "/ OrderDatabase.mdb", "Orders", _ I changed this code to my path..something like: GetDataFromAccess ThisWorkbook.Path & "/Invested Related.mdb", "Invested Securities", _ OR GetDataFromAccess ThisWorkbook.Path & "C:xxx/xxx/xxx/ OrderDatabase.mdb", "Invested Securities", _ OR GetDataFromAccess ThisWorkbook.Path & "C:xxx\xxx\xxx \OrderDatabase.mdb", "Invested Securities", _ Any difference in having \ or /? It seems like the path code is not working well. Thanks for your help!- Hide quoted text - - Show quoted text - Ron, on my access table the name of my categories are two letter words like "invested securities" or "Cusip Number"...etc. I see that yours is merged together like "OrderNumber" "ShipVia" "ShipCountry"...etc. Does that make a difference? This categories in Access is shown as two or three-letter words. My Access File Name is "invested securities.mdb" while yours is "OrderDatabase.mdb" So everytime I saw the "OrderDatabase.mdb" I changed it to "invested securities.mdb. I tried merging it, but still no luck. My Access Table Name is "invested companies" while yours is "Orders" So everytime I saw "Order", I changed it to "invested companies" I tried merging this as well to fit yours, but still no luck. Now is the space betwee all these two or three-letter words a problem? Because I entered the path code just as you suggested, but still no luck. I apologize for bothering you so often, but I do appreciate your patience and assistance. Thanks!- Hide quoted text - - Show quoted text - Unfortunately I can't send the database Ron because it's work-related/ sensitive. I wish it was not work-related so i can get this code working properly for me. Does it matter that I'm using Excel 2003? I have no idea why this thing is not working because I simply pasted your code as is, and just changed access file path, access name, table name, access column names...etc. I know I'm probably making a minor error somewhere, but since I'm clueless about Macro..., what can I say. Any other way you can assist will be greatly appreciated. Thanks!- Hide quoted text - - Show quoted text - Here goes the codes, I hope it helps. I inserted those modules manually - (Right-clicked on Project name - Insert - Module). Thanks a great deal, Ron. MODULE 1: Sub TestGetData() With Sheets("Criteria") Sheets("Sheet1").Range("A7:H7").Value = .Cells(ActiveCell.Row, 1).Range("A1:H1").Value GetDataFromAccess "R:\SM\Undecided\Page Me\index me v2.mdb", "Sample Table", _ "Firm Name", "=", .Cells(ActiveCell.Row, "B").Value, _ "Status", "=", .Cells(ActiveCell.Row, "C").Value, _ "Game Firm Contact", "=", .Cells(ActiveCell.Row, "D").Value, _ "Funds Impacted", "=", .Cells(ActiveCell.Row, "E").Value, _ "Funds Impacted", "=", .Cells(ActiveCell.Row, "F").Value, _ "Start Date", "=", .Cells(ActiveCell.Row, "G").Value, _ "Start Date", "=", .Cells(ActiveCell.Row, "H").Value, _ Sheets("Sheet1").Range("A10"), "*", True, True End With End Sub Sub GoToCriteriaSheet() Sheets("Criteria").Select End Sub MODULE 2: 'Look in the Examples module how you can call this macro Public Sub GetDataFromAccess(MyDatabaseFilePathAndName As String, MyTable As String, _ MyTableField1 As String, S1 As String, MyFieldValue1 As String, _ MyTableField2 As String, S2 As ... read more »- Hide quoted text - - Show quoted text - If you are asking whether I enter an password when accessing the Access Table, the answer is no. But then again maybe I'm too dumb to know. What happens if it's in fact protected, but I can't see it. |
Thread Tools | |
Display Modes | |
|
|