General :: Drawing A Line Over The Grid Depending On What Day It Is And Time
Sep 14, 2012
Here is a project. I have a grid on a form. its width is 20cm wide and 15cm tall. in the grid are 6 groups of columns (all columns listed are from left to right).
Group 1 - 5cm wide - description
Group 2 to 6 are 30cm wide and represent days. Each group is split into 8 columns which represent hours per working day.
I need to to draw or position a line over the grid depending on what day it is and time. for example, lets say its thursday at 14.30. ( the 8 hour columns run from 8am to 4pm ) it would need to look like this-
So I need to work out the position of of the line depending on the time of of the day in the week. The day can be determined by the column header, the time by the grid....
View Replies
ADVERTISEMENT
Aug 22, 2013
I am using Access 2003. Is there any way to put grid lines among fieldnames and contents just like in Excel in the output of subreport?
View 1 Replies
View Related
Oct 25, 2013
I created a report that only has gridlines around the outside border of the entire report (rather than around each record). I want the grid line style on the last/bottom record to be solid so it boxes in all the records. When I change the "Gridline Style Bottom" for the records, each record has a bottom gridline rather than an outside box around all the records.
View 1 Replies
View Related
Oct 16, 2012
I have a orders sub form that was working great .Then all of asudden when i when to input information into the fields i realised the grid under variuos field names has disappered (Icant enter any info),surly this must be something i have accidentally done without realizing.
View 13 Replies
View Related
Feb 16, 2013
I am writing a database to track our (and others) wine collections. i'm wanting to track what bottle is where. so i can look up what i have, look up where i have put it and away i go to get it, simple right?
just to complicate things i want a system in place. where the end user and use forms to add/remove or modify wine racks.
assuming that all racks are rectangular i would like to be able to add a rack and call it rack 1. rack 1 has 4 shelves all able to hold 5 bottles. the database would then say that bottle X is in rack 1 shelf 1 position 1.
if possible there will aslo be a screen that is auto generated by the database showing a simple grid with grrn and red squares denoting if the position if full or empty. the ability to click on a position to see what is in there or to add a bottle there would be amasing but not fussed if that can't be done.
View 2 Replies
View Related
Sep 4, 2012
I am struggling with a slight form delay. When it opens on the OnOpen event, i am populating a grid. This takes about 3 to 5 seconds but, the it also takes the form the same time to open. What i need to do is get the form to open then populate the grid. Can i make the form open first then populate?
View 4 Replies
View Related
May 22, 2014
How to generate prescription order form, so that I can order 10 line items at a time. I have the following tables,
Suppliers
---------
SupplierID
SupplierName
SupplierContact
SupplierAccount No
SupplierPhone No
Order Form Header
-----------------
SupplierID
SupplierName
SupplierContact
SupplierAccount No
SupplierPhone No
Date
Order Items
-----------
OrderID
ItemID
Item Name
Item Description
Item Size
Item Code
Item Qty
Items
-----
ItemID
Item Name
Item Description
Item Size
Item Code
Item Qty
View 2 Replies
View Related
Jun 4, 2014
I would like a query to run, depending on a date..If the date in [Txt_Date_Account_Opened] is between todays date, and within the last 30 days.do CurrentDb.Execute ("Qry_Append_Units")else a msg box stating "account is not yet open"
View 12 Replies
View Related
Aug 11, 2005
I have a table with three fields:
SSN
Member #
Case #
I want to create a form that I can search by SSN or Member # which will show all Case #'s known to the SSN or Member #.
A member can only have one SSN and one Member # but many Case #.
I've done this before, but can't remember how, can anyone help?
View 1 Replies
View Related
Nov 12, 2013
I need to display a message on a form after a record update has been done depending on whether a table field is ticked or not. If it is ticked I want one message if it is not ticked I want a different message, but here is the scenario.
I have a form and one of the options I have is to call up an address from a record in a table. I want it to display a message to advise whether there is a special requirement for delivery to the address, so in the table I have a checkbox field. If its checked, once the address has been pulled up I want it top advise 'special requirement' or 'no special requirement'.
I need to do this in a macro form, or expression form if possible as I already have an after update macro when that drop down is selected.
So on the dropdown list I have the following on the afterupdate function:
SearchForRecord
Object Type :
Object Name :
Record: First
Where Co0ndition - - "[ID] = "& Str(Nz([Screen].[ActiveControl],0))
That brings up the address from a record in my table onto this form, so what I want is if that record has got a tick the checkboxfield it prompts with a message and ok button.
View 3 Replies
View Related
May 29, 2013
I have a log in form and user combo box.
I want to add photo of each user in this log-in form.
Just want to ask if possible to change photo depends on combo box value?
View 1 Replies
View Related
Jun 30, 2005
im responding to the code you submitted to draw lines on a form. I am trying to change it a bit to only draw dots. I have x and y cordinates that I want to draw on the MS form kinda like a scatter graph. So I want to pass values from a table into the function LineX. Then have the function create dots that draw on the for to corespond to the x and y Cordinates. I was wondering if you could help.
thanks in advance
here is the original code
Option Compare Database
Option Explicit
Private Declare Function LineTo Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, _
ByVal Y As Long) As Long
Private Declare Function MoveToEx Lib "gdi32" (ByVal hdc As Long, ByVal X As Long, _
ByVal Y As Long, lpPoint As Any) As Long
Private Declare Function apiGetDC Lib "user32" Alias "GetDC" _
(ByVal hWnd As Long) As Long
Private Declare Function apiGetFocus Lib "user32" _
Alias "GetFocus" _
() As Long
Public Function LineX(Ctrl As Control, X As Long, Y As Long, cx As Long, cy As Long)
Dim DC As Long
'device context
Dim hWndCtrl As Long
'bounding control handle
hWndCtrl = fhWnd(Ctrl)
'get control handle
DC = apiGetDC(hWndCtrl)
'get control DC
MoveToEx DC, X, Y, ByVal 0&
'set starting point
LineTo DC, cx, cy
'draw line from starting point to cx, cy
End Function
Private Function fhWnd(ctl As Control) As Long
'use getfocus to retrieve ctrl handle
On Error Resume Next
ctl.SetFocus
If Err Then
fhWnd = 0
Else
fhWnd = apiGetFocus
End If
On Error GoTo 0
End Function
View 1 Replies
View Related
Nov 10, 2011
The access import wizard has a convenient form when a fixed-width file is to be imported. The form allows us to click the data to insert an arrow at a position where the next field should begin.
For my project, the wizard has some serious shortcomings, so I am trying to build my own import form. I can capture everything else needed to build an import routine, but I can't figure out, nor find examples of, allowing the user to place column breaks graphically.how to do this without using the wizard? Or rather, like in the wizard?
View 1 Replies
View Related
Jun 4, 2013
I need to add new records to a table depending on what the cbo box displays. I figure this is the way to do it but I it's not working, I have only writen the first select,
Private Sub Comando6_Click()
Dim dbPalavraChave As DAO.Database
Dim rstchaveCFEPC As DAO.Recordset
Set dbPalavraChave = CurrentDb
Set rstchaveCFEPC = dbPalavraChave.OpenRecordset("chaveCFEPC")
[code]...
View 9 Replies
View Related
Mar 17, 2007
I am a new user to access and are therefore seeking the assistance of a more experienced user (I'm sure this will be an easy one for all out there).
I want to be able to get records from different tables after the table name has been chosen.
In other words and to be a bit more specific, at the moment in one table I am selecting the tables I want to get information from. Once I select the tables I need to then be able to extract the required data from the selected tables and then put it into a new table with summary totals.
View 8 Replies
View Related
Jul 30, 2015
I'm looking for VBA code.Basically I have a drop down with 3 options on a form but need it to pull up a window to input depending on which option is selected. One selection of the options if selected will not require the input of data, as it can just input a set value or be left blank (haven't totally figured how I want to display it). With all this I will need it to display on a form in a certain format, in which I would like the drop down value displayed with the data inputted, though with the one option without data just would display drop down value.
View 4 Replies
View Related
Aug 30, 2013
I have a checkbox which when checked then turns textboxes to locked as below. However when I navigate to the next record which may not be checked the text boxes remain locked. I obviously want to lock the boxes depending on each record. I am navigating via the windows next/back record buttons. How do i do it?
Private Sub Check44_Click()
If Check44.Value = -1 Then
serial.Locked = True
gain.Locked = True
swst.Locked = True
Else
serial.Locked = True
gain.Locked = True
swst.Locked = True
End If
End Sub
View 6 Replies
View Related
Mar 9, 2006
My company does daily, weekly, and monthly drawings using mountains of entry tickets and a barrel that has seen better days. So needless to say this system has to go. I hope to be able to do it digitally.
I would like to do a random number generator to pick the winners based off of a ticket number range. The ticket numbers issued to the customer would correspond to the customer account number. To complicate things I would really love to have the random numbers displayed on the screen so people feel they are watching the randomization pick in progress with the winner name popping up.
I have searched Help for Rnd function, as well as googled. I haven had any luck finding what I need. Is what I am looking to do possible in access? I had something similar in Excel a few years ago but lost it.
View 7 Replies
View Related
Aug 10, 2015
I have an option button for a field [Fully Paid] (Yes/No) in my LoanT and i want to know if it's possible for my database to automatically choose an option depending on a calculated field
(Calculated field from another query) = [Outstanding Balance]
Say... if [outstanding balance] is = 0 or negative (refundable), then Yes should be On, if not it should remain No/off so that i wouldn't have to go over every record and manually choose the option
The option button is very useful when i want to display loans which are Paid and/or still active. How do I go about this?
View 14 Replies
View Related
Mar 12, 2015
I have a query that I would like to put a count into but I don't know how
1. count how many line items there are in the query
2 count how many line items there are where the "days late" are
View 1 Replies
View Related
Dec 3, 2013
Formatting issue regarding elapsed time calculated using DateDiff().
I understand that you can specify the output value for DateDiff(). In my case I have chosen "n" for minutes. Each result in my query shows the correct calculation in terms of minutes.
[PunchIn] = 11/23/2013 8:11:28 AM
[PunchOut] = 11/23/2013 5:43:30 PM
[ShiftLength] =DateDiff("n", [PunchIn],[PunchOut]) = 572 minutes.
Now when I try to format the result in terms of H:MM (be it in a form or a report) I get varied results. I'll illustrate an example below:
=Format(([ShiftLength]/60),"0") & "." & Format(([ShiftLength] Mod 60),"00") Returns 10.32 Not correct
=Format(([ShiftLength]60),"0") & "." & Format(([ShiftLength] Mod 60),"00") Returns 9.32 This is correct but I need my result to be in the form of a decimal such as my next example
=([ShiftLength]/60) Returns 9.53333333. Getting there but how do I have this result only show two decimal points 9.53?
View 6 Replies
View Related
Oct 17, 2014
Is there an equivalent to Alt-Enter in excel to put a line break in a text box from the keyboard?
View 2 Replies
View Related
Apr 27, 2014
I have a form that could have duplicate material descriptions , is it possible to have on that form a field that counts the number of line items for that material and when the material changes the new number will appear .
View 7 Replies
View Related
Jun 11, 2012
Is it possible to create a line or bar graph as a report in Access 2007?
If so, how would you go about it?
View 1 Replies
View Related
Sep 12, 2013
I have manipulated the duplicate record code found online to suit my purposes. It works for all the other subforms, however this subform has too many fields so the code goes onto the next line. How do I solve this? Online it says using "& _ " but I can't get it to work. There's basically too many fields to fit on one line so I need to continue the code onto the next line
Code with end of line problems highlighted in red:
If Me.[subformEmissionsControlTarget].Form.RecordsetClone.RecordCount > 0 Then
strSql = "INSERT INTO tblEmissionsControlTarget ( System_ID_No, EmissionsStandard, OtherEmissionsStandard, IntakeThrottle, OBDrequired, OBDVersion, DPFregenmethod, ExhaustTemperature, EGRTemperatures, EGRRates, SteadyStateCycle, SteadyStateEngineeringLimitType, SteadyStateLegislativeLimitSmoke,
[Code] ....
View 2 Replies
View Related
Jan 21, 2013
I am working on supporting spaces in the DB filename. I got the rest of my program working... other than being able to invoke Access with the specified filename for it to open.
Code:
C:Documents and Settingsc_mlueckMy DocumentsFandango>"C:Program FilesMicrosoft OfficeOffice12MSACCESS.EXE" "Schema Ideas.accdb"
C:Documents and Settingsc_mlueckMy DocumentsFandango>dir "Schema Ideas.accdb"
Volume in drive C has no label.
Volume Serial Number is C8E4-5856
Directory of C:Documents and Settingsc_mlueckMy DocumentsFandango
01/18/2013 04:45 PM 3,203,072 Schema Ideas.accdb
1 File(s) 3,203,072 bytes
0 Dir(s) 125,846,482,944 bytes free
The envoking of MSACCESS.EXE results in:
Does Access 2007 MSACCESS.EXE not support DB's with a space in the file name being spefied to auto-open via command line switches?
View 3 Replies
View Related
