Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations derfloh on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  1. JamieArvato

    Seperate Period Data into Fields

    Hello, I have a table; Period Amount Cost Centre 01 500.00 AAA 01 250.00 AAB 02 300.00 AAA 02 500.00 AAB I want to make a report which shows a trend by period: Cost Centre Pd01 Pd02 AAA 500.00 300.00 AAB 250.00 500.00...
  2. JamieArvato

    Looping through multiple recordsets on a form

    Hi I have a form on which I can select titles from a combo box. The table from which I am retrieving this data is linked to two record sets on the form (whose data is drawn from a further 2 linked tables). These recordsets appear filtered on the form according to what is selected in the combo...
  3. JamieArvato

    Exporting data from Access into Excel

    No, the file has pivot tables running off an export.
  4. JamieArvato

    Exporting data from Access into Excel

    Hi I am trying to export data from a table or query in Access into an Excel spreadsheet. I am currently doing this by opening the workbook, deleting the existing worksheet, saving and closing the file before exporting the updated table again using the same filename. Can anybody offer a more...
  5. JamieArvato

    Better way than Transfer Spreadsheet

    I'm currently using the Transfer Spreadsheet in my code which imports data from 20 spreadsheets from a particular range in a particular sheet (all s/sheets) identical. I'm getting Import errors though on type conversion as some fields have date & text in them. My problem is, I can't change...
  6. JamieArvato

    On form run code for each record in table

    ...acImport, cSpreadsheetTypeExcel9, "TblImport", fp, _ True, "Total_Week_Data" Me![Text199].Value = "Imp:" + Str(DCount("*", "TblImport")) + ", " Me.Repaint ADRecsBeforeAppend = DCount("*", "Tbl_All_Data") Import_Run_Queries ADRecsAfterAppend = DCount("*"...
  7. JamieArvato

    Get Data from Closed Workbooks

    The array code above will not work as it is going forwards and backwards from the file for every cell, I was looking at bringing in 44k rows by 12 cols = 528k cells. So I've wrote code which checks the file exists, checks its not open, opens the files read-only, copies what it needs to moves...
  8. JamieArvato

    On Row Selection

    Is there a event which runs on selection of an entire row? What I need is that if someone selects a row, ie to delete it it goes to cell - col A and the row they are on and tells them they are unable to select an entire row. I would use the sheet protect but everytime I do the whole thing...
  9. JamieArvato

    Get Data from Closed Workbooks

    Hi, I'm looking at pulling in data from several workbooks into one. Some of these workbooks will be open by another user some wont. I was originally looking to set-up code to create 15 ODBC links each time I ran it but thought that there must be an easier way to copy and paste without opening...
  10. JamieArvato

    Automating ODBC links

    When I run the follwoing code I am getting a GENERAL ODBC ERROR and the Debugger is going to the .Refresh BackgroundQuery:=False line ? I have tries true and tried deleting it but no luck.Please help. Sub Get_Data() Dim cnn As String, sql As String, sPath As String, sWbName As String...
  11. JamieArvato

    ODBC Links

    That's excellent, thanks so much. What would I tweak to make a new table on a blank sheet starting in cell A1? Thanks again for your help.
  12. JamieArvato

    ODBC Links

    Nearly there.... Getting a subscript out of range error..... With ActiveSheet.QueryTables(1)
  13. JamieArvato

    ODBC Links

    Here's the code it recorded; Sub Macro1() ' ' Macro1 Macro ' Macro recorded 01/11/2004 by Jamie Riden ' ' Range("B9").Select With Selection.QueryTable .Connection = Array(Array( _ "ODBC;DSN=Excel Files;DBQ=X:\Agent Hours\Miele\Timesheet - Miele - WE...
  14. JamieArvato

    ODBC Links

    I understand what your saying and I have wrote simple SQL in the past and understand the from clause, but don't know how to put it into this code, the from is; X:\Agent Hours\Miele\Timesheet - Miele - WE 2004-11-07.xls Table Name: Total_Week_Data The code I pasted was what Excel recorded for me.
  15. JamieArvato

    ODBC Links

    This is the macro that was recorded, the part in the middle I have seperated by spaces though is in red in the code and this code will not run when I try, giving the error "Compile error" and highlighting the section I have spaced out .commandtext Sub Macro1() ' ' Macro1 Macro ' Macro recorded...
  16. JamieArvato

    ODBC Links

    I have 15 files a week all a copy of each other. I am pulling the data through into one spreadsheet to run summary reports. When doing Data>Import External Data>New Database Query> sometimes it is opening the source files and sometimes it won't !?!!? I don't understand. Also is there a quick...
  17. JamieArvato

    calling external VBA sub with parameters

    hi how do i call a sub-procedure with parameters that exists in another file, i.e.: in Book1.xls, i have: sub MyProc (my_string as String) .... end sub how do i call this from book2.xls? TIA jamie
  18. JamieArvato

    If sheet1 exists then delete, if not End If

    How do I write code to say if there is a sheet1 in the workbook then delete if not then end if. thanks
  19. JamieArvato

    Unique Value Check Using Data Validation

    I found what I thought was a perfect solution to a problem I have in putting in the custom data validation below warning of duplicate values in a column; =IF(COUNTIF(A:A,A12)>1,FALSE,TRUE) BUT........ I already had this column as a list data validation so that people could only pick from a...
  20. JamieArvato

    Can you push data..........?

    Method one sounds like the answer, where can I go to learn this ?

Part and Inventory Search

Back
Top