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 Rhinorhino 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: *

  • Users: gdev
  • Content: Threads
  • Order by date
  1. gdev

    Is there way to keep same questions/fields in the one table?

    Please help, Each construction project has an unique set of initial and monitoring questions to be answered. The construction project can have many locations and may have multiple monitoring questions in 6 months intervals. Also, some of initial and monitoring questions are the same. Some...
  2. gdev

    Access Report Totals are Missing when exporting report to excel

    Hi, I have these totals in the report: =Sum([custcnt]) =Sum(Val([wgt])) =Format$(Sum([glamt]),"$#,##0.00") only sum([custcnt] is appearing on the Excel export. I am using Access 97 and using DoCmd.OutputTo acOutputReport, r2xls, acFormatXLS to export. Does anyone know why the other totals...
  3. gdev

    Ordinalposition not working correctly

    I have the following code: With tblXL .Fields("0").OrdinalPosition = 0 .Fields("1").OrdinalPosition = 1 .Fields("2").OrdinalPosition = 2 .Fields("3").OrdinalPosition = 3 .Fields("4").OrdinalPosition = 4 .Fields("5").OrdinalPosition = 5 .Fields("6").OrdinalPosition = 6...
  4. gdev

    Border for cells within range not working

    Hi, Please assist. I have a thick border around range and range a5:l8 I want thin borders around cells in range from a5 to the end of range. The below code gives me the thick borders I want not the cells within the range. Set rngAL8 = Range(Cells(Rows.Count, "A").End(xlUp), Range("l5"))...
  5. gdev

    Automating right and bottom borders code not working

    Why isn't this code working? I want bottom and right borders from a7:l7 to the last row. Dim rng As Range Set rng = Range(Cells(Rows.Count, "A").End(xlUp), Range("L7")) With rng .Borders.LineStyle = xlNone .Borders(xlInsideHorizontal).LineStyle = xlContinuous...
  6. gdev

    Excel Macro: Bottom border for each row not working

    Please Assist I would like a bottom border For each row on the sheet from columns a:l For some reason this code does not work. What am I missing? Dim x As Integer Dim lastrow As Long lastrow = Range("A65536").End(xlUp).Row For x = 7 To lastrow ActiveCell.Columns("A:L").Select...
  7. gdev

    Changing listbox columnwidth at runtime

    Hi, I have 6 comboboxes. The user wants to be able to sort/filter in any combination with these comboboxes. I have decided to change the rowsource(query) after each combobox update. All of my data is displayed is a listbox. My first problem is I can't seem to get the listbox columnwidth to...
  8. gdev

    Formatting Text Box

    Hi, Please assist. amtField is defined in the table as follows datatype = number fieldsize = double format = percent In the form I want to change the formating of this field for certain records I have tried the following iif statements in the text box control source: =iif([name] = "Jane"...
  9. gdev

    group query using MAX function displays incorrect data

    Hi, I have a query using these fields: date planid employeeid amount using the max function on date. Somehow, it doesn't display the correct data and has wrong number of records. For example it will display the amount for 12/31/2003 with the wrong date, 12/31/2004. When I remove the amount...
  10. gdev

    combobox doesn't display new record after adding new item

    Hi, I have unbound combo box that uses the findfirst method in the afterupdate event to display records on main form. After adding a new item to the combo box using the notinlist event, the afterdate event findfirst method does not display the new record until I close and reopen the form. The...
  11. gdev

    After delete "No current record" when EOF

    Hi, DoCmd.RunCommand acCmdDeleteRecord works fine except when the current record is the last record. I get a "no current record" error message. I have tried rst.movefirst and rst.moveprevious after the command but I still get the error message. Please tell me what I am doing wrong? Thanks Gwen
  12. gdev

    Validation Rules to prevent non primary key fields from duplicat

    Hi Everyone, I have these 3 fields in a table planinvestid - pk planid investid Records can have the same planids Records can have the same investids Records cannot the same planid and investid combination A record can have an unique planid and investid How can I make sure that a new...
  13. gdev

    Autonumber incrementing after updating fields?

    Hi Everyone, How I can make an autonumber increment after dlookup does it thing to make sure there isn't a record matching the new entries? As soon as I select the plan, autonumber increments which makes the if statement always true. I don't want autonumber to increment until after dlookup...
  14. gdev

    Item not found in this collection

    Hi, I have 3 fields in a table; when the item gets to the second field, I get this error message: item not found in this collection. Here's the code I am using: Dim x As Integer Dim db As DAO.Database Dim tdf As DAO.TableDef Dim fld As DAO.Field Dim strField As String Set db = CurrentDb...
  15. gdev

    How to get Excel XP out of memory?

    Hi, Please help. While importing an Excel spreadsheet to Access, I am using: xlapp.workbooks close xlapp.quit set xlapp = nothing. Yet Excel stays in memory. I attempted to use xlapp.workbooks.close (false), but received an error message. Please assist. Thanks Gwen
  16. gdev

    How can I get Excel Xp out of memory?

    Hi, Please help. While importing an Excel spreadsheet to Access, I am using: xlapp.workbooks close xlapp.quit set xlapp = nothing. Yet Excel stays in memory. I attempted to use xlapp.workbooks close (false), but received an error message. Please assist. Thanks Gwen
  17. gdev

    Top 20 and bottom 20 values in 1 query

    Hi Is there a way to get the top 20 and bottom 20 values in 1 query without using a union query. If so, please direct. Thanks Gwen
  18. gdev

    Excel Pivot Table Calculated Field

    Hi Everyone, Please assist! I want my pivot table to calculate the % change of the item counts on a day by day basis. I believe this is the formula I need for the calulated field: (current dte itm ct - yesterday's dte itm count)/current dte item ct)*100 How can I make this work with an Excel...
  19. gdev

    How to get 2 separate totals in 1query?

    Hi, Please help. I have the below fields in my query. planinvestmentid name interest amount activity date I want a total for each quarter in the current year and the sum from previous years not necessarily for each quarter. Is it possible to calculate 2 separate totals in one query? I am...
  20. gdev

    Group on current year Quarter

    Hello I would like to group dates by the current year's quarter, excluding previous years dates. But I need to total previous years transactions in the groups footer, if less than zero. The following is what I am using in the group header text box control source...

Part and Inventory Search

Back
Top