Search results

  1. M

    Change the Caption of a field in a tble

    Hi there, I am trying to change the caption of a field in a table per VBA. Set td = db.TableDefs("tbl_Dress") With td Set fld = td.Fields("DPurchasePrice") fld.????? = "Einkaufspreis" td.Fields.Refresh Cn anyone tell me how to reference this property please? Sorry, I am using a German...
  2. M

    Value not showing on Main Form

    I have a very strange problem. Background: I have a main form on based on a table. I have an unbound combo search field on this form. After update I select the correct record from the table to display (recordset bookmark). I have sub form on the main form containing transactions pertaining to...
  3. M

    Solved Seat Reservation / Grafik Programme

    Morning all, I have a small application where I sell tickets for concerts in a hall that can seat 720 People. At the moment I enter the name and address in my tbl_Customers, then in a dropdown list from my tbl_Seats I select the ticket Numbers (seat numbers) . After Update I enter the info into...
  4. M

    Solved Counting records with certain criteria in a recordset clone

    good morning all, I hope I can explain my problem "understandably" On my main form (Customer) I have a sub form where concert tickets are selected (Category 1 or 2) for the selected customer. Now I would like to add a new record to a "summary" sub form. I have made a recordset clone of the...
  5. M

    Insert into problem

    Hi all, I need a bit of help please. I have this sqltext that works fine but I want to add another field that is not in the source table, but in a box on the screen. sqltext = "insert into tbl_Kett_Teilnehmer_Vorauszahlung([tbl_tour_id], [tbl_teilnehmner_id])" & _ " select...
  6. M

    Using dates in the selection criteria

    Hi all I have a problem with selecting certain records to print in a report, My aim is to print all Orders that have no delivery date and where the expected Delivery date is < todays date. I have tried this : Printkriteria = "IsNull([DateDelivered])" & "and " & "ExpectedDelivery< " &...
  7. M

    Display Account balance on Main form from sub form transactions

    Hi there, I have a sub form listing various transaction for a client. It displays in Datasheet form. I have put an unbound field in the foot of the sub form (nz(summe(endbetrag);0) Now I want to display this on the main form when the client is chosen, (forms are linked by id to clientID) It...
  8. M

    Calender Tool

    Hi Everybody, I am trying to create a database for a bridal shop. I would really like to use a calender element to make appointments but Access no longer has the calender active X element that used to be in 2007. Sorry if this is a silly question, but is there another element /calender that I...
  9. M

    Sort cut for multiple Addnew

    Good Morning, I have a function that calculates Holidays from Easter Sunday..(thanks again to this forum) The FT1 to FT25 variables are declared as Dates. I want to send these dates to a local table. Is there a way of doing this without having to code 25 Addnews? I was think something like For...
  10. M

    Solved Function for calculating holidays ....

    I want to print an attendance register for a certain Period e.g. 01.04.2021 till 30.04.2021 where the backcolour of fields for weekends and holidays are grey. Using the weekday function works fine for weekends, but how do I calculate moveable holidays, e.g. Easter Monday, Good Friday. Something...
  11. M

    Sendkey

    Morning, I have a a bit of code on the presskey property in a form- If KeyAscii = 44 Then DoCmd.CancelEvent 'stop the comma keypress being updated SendKeys ".", True 'put a full stop in the field DoEvents End If which replaces the comma on the numder pad with a ".". The reason being...
  12. M

    Using db.execute in Access 2019

    Good evening all, In an Access 2016 database I use: db.Execute ("update loktbl_Locals set [text] = '" & s & "' where bezeichnung = 'mdbPfad'") In the table loktbl_Locals I have a field named "text" and one named "Bezeichnung". The Variable "s" here holds the path to the Data (back-end...
  13. M

    comdlg.ocx

    I am now using Access 2016 in Windows 10 on a 64 bit system. I used a browse for file Code on my Access 2013/Windows 7 before where I had a form with a common dialog control to browse for a file (to reconnect my back end database). Now it is not working. Have tried: Reinstalling and...
  14. M

    Using Dlookup

    Hi there, Is anyone willing to help me a bit on this: I have a table tbl_Rates which holds the amount an employee would be payed within a certain time limit. eg. 01.01.2016 till 31.12.2017 - 50 € 01.01.2018 till 31.12.2018 - 55 € 01.01.2019 till (is null) -60 € Now for reporting purposes I...
  15. M

    format function not working in access 2016

    Hi there, I have just updated from Access2013 to Access 2016. All my Forms and Reports with the Format function in show an error. =Format([fromdate];"dddd") just displays #name. What to do now? If I add a new field it seems as though the format function is still there. Can anyone help me out...
  16. M

    Displaying time correctly

    Hi all, I know this is an age old question but I just can't get it right. I have to display -0,029171 as time 00:00 I use this formula in an unbound field on the form =([zuvielstd]*1440\60) & ":" & Format(Abs([zuvielstd])*1440 Mod 60;"00"). It sems to work fine unless the first part not a...
  17. M

    For I is startdate to enddate

    Hi there World, I need a bit of help! Is it possible to use "For I=1 to 10 " using dates? eg. for I=startdate to enddate where the dates are passed from a form. Can't seem to get it to work. Not strictly true... it does exactly what I want, but doesn't stop! Starts beautifully on my startdate...
  18. M

    Linking a sub report with unbound fields

    Hi there, Is there any way to link a sub report to a main report with unbounf fields? I have a form where I put in Person _ID and Month end Date. By a button I print a report noting different detail for the Month. At the bottom I need to print a summary for the year per person. I have tried...
  19. M

    Filling an excel worksheet from a recordset

    Hi there all, I am trying to fill an excel sheet from an access recordset, using this code newdata.MoveFirst With xlapp Do Until newdata.EOF x = x + 1 For y = 1 To 22 ' the recordset has 22 fields...
  20. M

    Attendance register

    Hi all, Hoping someone can give me an idea how best to do this. Background: My DB is the administration of a day care centre. I have a list of clients, and the days they have chosen to attend. eg. Monday and Friday or Tuesday and Wednesday etc. ( as check box) Now I need to print a monthly...
Top Bottom