Search results

  1. D

    want to save the D1 Column Header and place it in all rows of column G

    KALINE No Card No. and Manufacturer GOOD 2 12-LOW 12-HIGH Grade Select KALINE 201 1954 Topps - ROOKIE CARD 25 $400.00 $700.00 Place GOOD 2 Select KALINE 23 1955 Bowman 30 $90.00 $150.00 Place GOOD 2 x KALINE 4 1955 Topps 120 $90.00 $150.00 Place GOOD 2 x ETC This also...
  2. D

    Copy only selected fields from 1 sheet to another

    VBA Code: Public Sub CopyRows() Sheets("Kaline").Select ' TRIED Sheets("Kaline").Range ("A7.c999, f7.f999") ' Find the last row of data FinalRow = Cells(Rows.Count, 1).End(xlUp).Row ' Loop through each row For x = 2 To FinalRow ' TRIED Range ("A7:c999, f1:f999") ' TRIED .Cells.Select Cells(x...
  3. D

    Added a field to the SQL Insert within VBA and the Insert fails now

    The insert into table field name is desc and it is loaded from the "input" table with a field named description (I know it's a reserved name now) So in the vba I refer to that source table field as [description] - but still errors out on the SQL Insert?
  4. D

    This does not bring back the corresponding Matched ROW value in Column D

    =LOOKUP(B7,'C:\CollectorCards\EXCEL\Cards\[55BOFOOT_Sheet1.XLS]Sheet1'!$B$1:$B$113,'C:\CollectorCards\EXCEL\Cards\[55BOFOOT_Sheet1.XLS]Sheet1'!$D$1:$D$113)
  5. D

    Validation rule error should not appear ?

    strSQL = "insert into rates ([customer], [ratecode], [saturdaystart], [fridayend], [rate]) values (""" & [findcust] & """, 'L', " & [LastSaturday] & ", " & [LastFriday] & ", " & Me.RateperHour & ")" CurrentDb.Execute strSQL, dbFailOnError On debugging, I see that value of [LastFriday] is...
  6. D

    Neither dlookup or dcount worls in vba

    findcust = Mid(Me.Text0, InStrRev(Me.Text0, " ") + 1) & " " & Left(Me.Text0, InStr(Me.Text0, " ") - 1) ' If Nz(DLookup("[city]", "customers", "[customer]= '" & findcust & "'")) Then If DCount("[city]", "customers", "[customer]= '" & findcust & "'") > 0 Then The findcust HAS the proper value in...
  7. D

    Split out and reverse a string

    “John and Mary Jones” s/b “Jones John” “Jim & Bob & Mary Jones” s/b “Jones Jim”
  8. D

    I'm missing something REALLY simple!

    I have a report reading from a query. I have a column with defined as alpha which has mostly characters in, but on certain rows (with "Daily" in field1, there are some totals, left justified, e.g., 0.5 and 2.5 I keep getting a "data mismatch" using" =IIf([field1]="Daily" And Not...
  9. D

    Anyone ever hear of this ?

    I have office 365, my client has office 16. I print out a report and it looks fine. He prints it out (using the same database), and it is really FAINT and rather hard to see the data detail, logo, etc. ???
  10. D

    Stacked Category Axis for Graph

    Using the 2016 graph version, is there a way to display a "stacked" x-axis Category for my graph? See attached.
  11. D

    Do I just have a typo I missed?

    HAPPY NEW YEAR TO ALL!! Can anyone quickly see why the code aborts at the debug line ? Private Sub Command2_Click() DoCmd.OpenQuery "weeklytotallabor" DoCmd.OpenQuery "weeklytotalmatl" ' get weekly totals of labor + materials for CUSTOMER DoCmd.RunSQL ("delete * from weeklygraph;")...
  12. D

    where did short purple data lines come from ?

    This is a report graph in 2016 format
  13. D

    What happened to the Graph ?

    I have a report with a couple of text fields above the graph. The report has no source, but the graph below the textboxes has a query as the source. When I run the report on my laptop (vers. 2016), the whole report looks fine in the Preview. I shipped the whole database to a user but when the...
  14. D

    Can I load a bound combo box from VBA ?

    Is there a way to load a bound combo box using IF statements in VBA? I am trying to load the combo box from a field from 2 different tables - depending on the value of a preceding field. Possible ??
  15. D

    Losing formatting on form after table updated

    I have events coded on the form fields as well as some conditional formatting. After I run VBA code to update records in the related Table and then return to the Form, these controls are not showing. When I go into the properties, the events and conditional stuff is still there, and then after...
  16. D

    Conditionally present a Drop down list

    If I have a form based on a table with 2 fields. If field1 = "Customer", then I want field2 to show a dropdown list from another table with 1 field in it, else no dropdown list should apply. Not quite sure best way to approach ?
  17. D

    A set location for the Report summary

    [code] Private Sub DummyGroupFooter_Format(Cancel As Integer, FormatCount As Integer) Dim footerPos As Long ' Dim countspace As Long ' countspace = countspace + 1 footerPos = 7.6 * 1440 'desired position of footer in inches * 1440 twips per inch) If Me.Top < footerPos Then...
  18. D

    Printing an Emoji

    Is there any way to print/include an emoji on an access REPORT ?
  19. D

    PDF to Modules

    What is THE Best way OR the best product to get a pdf into a text file from where I can process it with VBA? I do this on another application where I can copy content right off of a web page, paste it into Excel, transfer it to an Access Table, and then process it with the VBA code. This...
  20. D

    Calculation for a form field OR direct entry ?

    I have a "added-up" form "total" field which is based on a bunch of prior entries. Is there a way to "IF" those prior fields are filled in, then use the formula for this "total" field, ELSE the User may just key in a "total" directly into the "total" field, essentially bypassing all of the...
Top Bottom