If this is your first visit, be sure to check out the FAQ by clicking the link above. You may have to register before you can post: click the register link above to proceed. To start viewing messages, select the forum that you want to visit from the selection below. |
|
|
Thread Tools | Display Modes |
#11
|
|||
|
|||
Calendar and time sheet
I will try, thanks.
"PC Datasheet" wrote: Use a table with ____ fields. 1 - SampleResultID 2 - SampleID 3 - Year 4 - Month 5 - 36 Day1 to Day31 Store sample results in fields 5 to 36. In your form use some Date math in the OnCurrentEvent to determine whether to display fields Day29 to Day31. Sorry for the previous post! Thought you might just like to see your sample results in a calendar format. -- PC Datasheet Your Resource For Help With Access, Excel And Word Applications www.pcdatasheet.com Over 1050 users have come from the newsgroups trusting me and requesting help. My fees are very reasonable. "Fehn" wrote in message ... Sorry PC Datasheet! But the reason I posted in this newsgroup is because I know that this is a "friendly" exchange of ideas and knowledge! Not for advertising! I am not getting paid to do this database, I am doing this for my own knowlege gain. So if no one in this group doesn't know or wasn't able to help, then so be it! i will just have to do it in my own. Thank you for reading my post, but also understand that Arno R. is just protecting the users of this newsgroup and if what you say in you advertising is true "Over 1000 Access users have come to me for help", then you woudn't need to reply to anybody's questions with your advertising. Thanks again. "PC Datasheet" wrote: Fehn, Consider what another responder said about this obnoxious character and then decide if you want my help. I can put your sample results in a calendar form and calendar report for you for a reasonable fee. Over 1000 users have come from the newsgroups requesting help and trusting me. "If you have anything to contribute to the group, contribute. Your war with Datasheet is simply ****ing and moaning in the wind for the sake of nothing. Grow up and get a life." Salad -- PC Datasheet Your Resource For Help With Access, Excel And Word Applications www.pcdatasheet.com Over 1000 Access users have come to me for help. My fees are very reasonable. "StopThisAdvertising" StopThisAdvertising@Data**** wrote in message . .. "PC Datasheet" schreef in bericht link.net... I can put your sample results in a calendar form and calendar report for you for a reasonable fee. If you are interested, contact me at my email address below, -- PC Datasheet Your Resource For Help With Access, Excel And Word Applications www.pcdatasheet.com Over 1000 Access users have come to me for help. My fees are very reasonable. -- To the OP: Most people here have a common belief that the newsgroups are for *free exchange of information*. But Steve is a notorious job hunter in these groups, always trying to sell his services. Before you intend to do business with him look at: http://home.tiscali.nl/arracom/whoissteve.html (updated) Arno R |
#12
|
|||
|
|||
Calendar and time sheet
Thanks, I will try this next week and give you an update! Thanks so much!
"Duane Hookom" wrote: I would keep all the data in normalized tables (and ignore or verbally abuse PC Datasheet). tblSamples ================ SampleID Autonumber primary key SampleTypeID link to table containing descriptions SampleDate SampleValue If you really need a form like this, consider -writing code that loads your data into a "flat" table for editing more code would be needed to normalize after editing -create an unbound form like a grid of text boxes. use code to fill the grid with data and then to save the data to your normalized table I wrote some code for another poster a while back the filled a bunch of text boxes with customer names and order dates from Northwind. One of the keys was to use a scheme for naming the text boxes as below: txtCust1 txtOrdDate1_1 txtOrdDate1_2 ...etc... txtCust2 txtOrdDate2_1 txtOrdDate2_2 ...etc... txtCust3 txtOrdDate3_1 txtOrdDate3_2 ...etc... ...etc... ...etc... ...etc... ...etc... The code to fill the text boxes with customers and order dates: Private Sub cmdPullOrderDates_Click() Dim db As DAO.Database Dim rs As DAO.Recordset Dim strSQL As String Dim intCustomer As Integer Dim strCustomer As String Dim intOrder As Integer strSQL = "SELECT CompanyName, OrderDate " & _ "FROM Customers INNER JOIN " & _ "Orders ON Customers.CustomerID = Orders.CustomerID " & _ "ORDER BY CompanyName, OrderDate" Set db = CurrentDb Set rs = db.OpenRecordset(strSQL) rs.MoveFirst With rs intCustomer = 0 Do Until .EOF Or intCustomer 2 strCustomer = .Fields("CompanyName") intCustomer = intCustomer + 1 Me("txtCust" & intCustomer) = strCustomer intOrder = 0 Do Until strCustomer .Fields("CompanyName") Or intOrder 4 intOrder = intOrder + 1 Me("txtOrdDate" & intCustomer & "_" & intOrder) = ..Fields("OrderDate") .MoveNext Loop Loop .Close End With Set rs = Nothing Set db = Nothing End Sub -- Duane Hookom MS Access MVP "Fehn" wrote in message ... Does anyone know how to make this possible ad updatable in MS Access? Description - 12/1 - 12/2 - 12/3...... 12/31 Sample1 - 2 - - 5 .....etc Sample2 - 6 - 8 - 3 .....etc : : etc. Thanks. |
#13
|
|||
|
|||
Calendar and time sheet
Ed,
You have a point! I will look into that! thanks!. "Ed Warren" wrote: Your example looks a lot like a pivot table; some grouping at the top and left with some data in the center of the table. You just might be able to get to where you want to be using a clever query and then displaying it in a pivot table. Ed Warren. "Fehn" wrote in message ... Does anyone know how to make this possible ad updatable in MS Access? Description - 12/1 - 12/2 - 12/3...... 12/31 Sample1 - 2 - - 5 .....etc Sample2 - 6 - 8 - 3 .....etc : : etc. Thanks. |
#14
|
|||
|
|||
Calendar and time sheet
Duane,
You continue to demonstrate that you are not even in the league with class acts like Allen Browne, Ken Snell, Pieter Linden, Albert Kallal, Fred G, Graham Mandello, Chuck Grimsby, MG Foster, and others. -- PC Datasheet Your Resource For Help With Access, Excel And Word Applications www.pcdatasheet.com Over 1050 users have come from the newsgroups trusting me and requesting help. My fees are very reasonable. "Duane Hookom" wrote in message ... I would keep all the data in normalized tables (and ignore or verbally abuse PC Datasheet). tblSamples ================ SampleID Autonumber primary key SampleTypeID link to table containing descriptions SampleDate SampleValue If you really need a form like this, consider -writing code that loads your data into a "flat" table for editing more code would be needed to normalize after editing -create an unbound form like a grid of text boxes. use code to fill the grid with data and then to save the data to your normalized table I wrote some code for another poster a while back the filled a bunch of text boxes with customer names and order dates from Northwind. One of the keys was to use a scheme for naming the text boxes as below: txtCust1 txtOrdDate1_1 txtOrdDate1_2 ...etc... txtCust2 txtOrdDate2_1 txtOrdDate2_2 ...etc... txtCust3 txtOrdDate3_1 txtOrdDate3_2 ...etc... ...etc... ...etc... ...etc... ...etc... The code to fill the text boxes with customers and order dates: Private Sub cmdPullOrderDates_Click() Dim db As DAO.Database Dim rs As DAO.Recordset Dim strSQL As String Dim intCustomer As Integer Dim strCustomer As String Dim intOrder As Integer strSQL = "SELECT CompanyName, OrderDate " & _ "FROM Customers INNER JOIN " & _ "Orders ON Customers.CustomerID = Orders.CustomerID " & _ "ORDER BY CompanyName, OrderDate" Set db = CurrentDb Set rs = db.OpenRecordset(strSQL) rs.MoveFirst With rs intCustomer = 0 Do Until .EOF Or intCustomer 2 strCustomer = .Fields("CompanyName") intCustomer = intCustomer + 1 Me("txtCust" & intCustomer) = strCustomer intOrder = 0 Do Until strCustomer .Fields("CompanyName") Or intOrder 4 intOrder = intOrder + 1 Me("txtOrdDate" & intCustomer & "_" & intOrder) = .Fields("OrderDate") .MoveNext Loop Loop .Close End With Set rs = Nothing Set db = Nothing End Sub -- Duane Hookom MS Access MVP "Fehn" wrote in message ... Does anyone know how to make this possible ad updatable in MS Access? Description - 12/1 - 12/2 - 12/3...... 12/31 Sample1 - 2 - - 5 .....etc Sample2 - 6 - 8 - 3 .....etc : : etc. Thanks. |
#15
|
|||
|
|||
Calendar and time sheet
"PC Datasheet" wrote in message ink.net... Duane, You continue to demonstrate that you are not even in the league with class acts like Allen Browne, Ken Snell, Pieter Linden, Albert Kallal, Fred G, Graham Mandello, Chuck Grimsby, MG Foster, and others. -- PC Datasheet The way that Steve figures it, anyone that doesn't object to his Datasheet spam is a class act. |
#16
|
|||
|
|||
Calendar and time sheet
A pivot or crosstab was my first thought also. However, Fehn possibly wants
a solution that is "updatable". The pivot and crosstab work great for presenting the data from a normalized table but unfortunately they are not updateable. -- Duane Hookom MS Access MVP -- "Ed Warren" wrote in message ... Your example looks a lot like a pivot table; some grouping at the top and left with some data in the center of the table. You just might be able to get to where you want to be using a clever query and then displaying it in a pivot table. Ed Warren. "Fehn" wrote in message ... Does anyone know how to make this possible ad updatable in MS Access? Description - 12/1 - 12/2 - 12/3...... 12/31 Sample1 - 2 - - 5 .....etc Sample2 - 6 - 8 - 3 .....etc : : etc. Thanks. |
#17
|
|||
|
|||
Calendar and time sheet
Steve,
Just start behaving like everyone else. It's that simple. It's not complicated. It's not difficult. Everyone else understands this. Everyone else is very good at complying. Everyone else sticks fairly close to common netiquette rules. -- Duane Hookom MS Access MVP -- "PC Datasheet" wrote in message ink.net... Duane, You continue to demonstrate that you are not even in the league with class acts like Allen Browne, Ken Snell, Pieter Linden, Albert Kallal, Fred G, Graham Mandello, Chuck Grimsby, MG Foster, and others. -- PC Datasheet Your Resource For Help With Access, Excel And Word Applications www.pcdatasheet.com Over 1050 users have come from the newsgroups trusting me and requesting help. My fees are very reasonable. "Duane Hookom" wrote in message ... I would keep all the data in normalized tables (and ignore or verbally abuse PC Datasheet). tblSamples ================ SampleID Autonumber primary key SampleTypeID link to table containing descriptions SampleDate SampleValue If you really need a form like this, consider -writing code that loads your data into a "flat" table for editing more code would be needed to normalize after editing -create an unbound form like a grid of text boxes. use code to fill the grid with data and then to save the data to your normalized table I wrote some code for another poster a while back the filled a bunch of text boxes with customer names and order dates from Northwind. One of the keys was to use a scheme for naming the text boxes as below: txtCust1 txtOrdDate1_1 txtOrdDate1_2 ...etc... txtCust2 txtOrdDate2_1 txtOrdDate2_2 ...etc... txtCust3 txtOrdDate3_1 txtOrdDate3_2 ...etc... ...etc... ...etc... ...etc... ...etc... The code to fill the text boxes with customers and order dates: Private Sub cmdPullOrderDates_Click() Dim db As DAO.Database Dim rs As DAO.Recordset Dim strSQL As String Dim intCustomer As Integer Dim strCustomer As String Dim intOrder As Integer strSQL = "SELECT CompanyName, OrderDate " & _ "FROM Customers INNER JOIN " & _ "Orders ON Customers.CustomerID = Orders.CustomerID " & _ "ORDER BY CompanyName, OrderDate" Set db = CurrentDb Set rs = db.OpenRecordset(strSQL) rs.MoveFirst With rs intCustomer = 0 Do Until .EOF Or intCustomer 2 strCustomer = .Fields("CompanyName") intCustomer = intCustomer + 1 Me("txtCust" & intCustomer) = strCustomer intOrder = 0 Do Until strCustomer .Fields("CompanyName") Or intOrder 4 intOrder = intOrder + 1 Me("txtOrdDate" & intCustomer & "_" & intOrder) = .Fields("OrderDate") .MoveNext Loop Loop .Close End With Set rs = Nothing Set db = Nothing End Sub -- Duane Hookom MS Access MVP "Fehn" wrote in message ... Does anyone know how to make this possible ad updatable in MS Access? Description - 12/1 - 12/2 - 12/3...... 12/31 Sample1 - 2 - - 5 .....etc Sample2 - 6 - 8 - 3 .....etc : : etc. Thanks. |
#18
|
|||
|
|||
Calendar and time sheet
This is totally untrue!!
These people are class acts because they spend their time helping posters in the newsgroups and not polluting the newsgroups with garbage and taking up volumes of bandwidth in the newsgroup servers. It has nothing with their feelings about me. For anyone reading this, just take a look at how many real contributions the following dimwits have made to the newsgroups: Arno R, John Marshall, Randy Harris and Keith Wilby. Arno R would rather spend his time sending emails to my office. John Marshall would rather spend his time showing how dimwitted he is. Randy Harris would rather spend his time being a puppet of Arno R and Keith Wilby would rather spend his time showing how two-faced he is. -- PC Datasheet Your Resource For Help With Access, Excel And Word Applications www.pcdatasheet.com Over 1050 users have come from the newsgroups trusting me and requesting help. My fees are very reasonable. "Randy Harris" wrote in message ... "PC Datasheet" wrote in message ink.net... Duane, You continue to demonstrate that you are not even in the league with class acts like Allen Browne, Ken Snell, Pieter Linden, Albert Kallal, Fred G, Graham Mandello, Chuck Grimsby, MG Foster, and others. -- PC Datasheet The way that Steve figures it, anyone that doesn't object to his Datasheet spam is a class act. |
#19
|
|||
|
|||
Calendar and time sheet
Duane,
Just take a cue from the people who are class acts and quit supporting and promoting Arno R and his band of dimwits. It's that simple. It's not complicated. It's not difficult. You are not impressing anyone siding with Arno R and his band of dimwits. You don't see these class act people siding with Arno R. They adhere to common netiquette rules. Whatever their feelings are, they stick to helping people in the newsgroups. There's an old saying, "birds of a feather flock together". Everyone is seeing that you are just like Arno R and his band of dimwits. -- PC Datasheet Your Resource For Help With Access, Excel And Word Applications www.pcdatasheet.com Over 1050 users have come from the newsgroups trusting me and requesting help. My fees are very reasonable. "Duane Hookom" wrote in message ... Steve, Just start behaving like everyone else. It's that simple. It's not complicated. It's not difficult. Everyone else understands this. Everyone else is very good at complying. Everyone else sticks fairly close to common netiquette rules. -- Duane Hookom MS Access MVP -- "PC Datasheet" wrote in message ink.net... Duane, You continue to demonstrate that you are not even in the league with class acts like Allen Browne, Ken Snell, Pieter Linden, Albert Kallal, Fred G, Graham Mandello, Chuck Grimsby, MG Foster, and others. -- PC Datasheet Your Resource For Help With Access, Excel And Word Applications www.pcdatasheet.com Over 1050 users have come from the newsgroups trusting me and requesting help. My fees are very reasonable. "Duane Hookom" wrote in message ... I would keep all the data in normalized tables (and ignore or verbally abuse PC Datasheet). tblSamples ================ SampleID Autonumber primary key SampleTypeID link to table containing descriptions SampleDate SampleValue If you really need a form like this, consider -writing code that loads your data into a "flat" table for editing more code would be needed to normalize after editing -create an unbound form like a grid of text boxes. use code to fill the grid with data and then to save the data to your normalized table I wrote some code for another poster a while back the filled a bunch of text boxes with customer names and order dates from Northwind. One of the keys was to use a scheme for naming the text boxes as below: txtCust1 txtOrdDate1_1 txtOrdDate1_2 ...etc... txtCust2 txtOrdDate2_1 txtOrdDate2_2 ...etc... txtCust3 txtOrdDate3_1 txtOrdDate3_2 ...etc... ...etc... ...etc... ...etc... ...etc... The code to fill the text boxes with customers and order dates: Private Sub cmdPullOrderDates_Click() Dim db As DAO.Database Dim rs As DAO.Recordset Dim strSQL As String Dim intCustomer As Integer Dim strCustomer As String Dim intOrder As Integer strSQL = "SELECT CompanyName, OrderDate " & _ "FROM Customers INNER JOIN " & _ "Orders ON Customers.CustomerID = Orders.CustomerID " & _ "ORDER BY CompanyName, OrderDate" Set db = CurrentDb Set rs = db.OpenRecordset(strSQL) rs.MoveFirst With rs intCustomer = 0 Do Until .EOF Or intCustomer 2 strCustomer = .Fields("CompanyName") intCustomer = intCustomer + 1 Me("txtCust" & intCustomer) = strCustomer intOrder = 0 Do Until strCustomer .Fields("CompanyName") Or intOrder 4 intOrder = intOrder + 1 Me("txtOrdDate" & intCustomer & "_" & intOrder) = .Fields("OrderDate") .MoveNext Loop Loop .Close End With Set rs = Nothing Set db = Nothing End Sub -- Duane Hookom MS Access MVP "Fehn" wrote in message ... Does anyone know how to make this possible ad updatable in MS Access? Description - 12/1 - 12/2 - 12/3...... 12/31 Sample1 - 2 - - 5 .....etc Sample2 - 6 - 8 - 3 .....etc : : etc. Thanks. |
#20
|
|||
|
|||
Calendar and time sheet
On Sat, 03 Dec 2005 23:50:50 GMT, "PC Datasheet"
wrote: These people are class acts because they spend their time helping posters in the newsgroups and not polluting the newsgroups with garbage and taking up volumes of bandwidth in the newsgroup servers. Pot. Kettle. Black. John W. Vinson[MVP] |
Thread Tools | |
Display Modes | |
|
|
Similar Threads | ||||
Thread | Thread Starter | Forum | Replies | Last Post |
How can I fill a time sheet from a calendar | PeterM | General Discussion | 6 | November 29th, 2005 09:24 PM |
Time Zone suggestions for Outlook Calendar | Ben Knox | Calendar | 2 | October 20th, 2005 03:42 PM |
Calendar Time | Linn Allen | Calendar | 1 | September 20th, 2005 10:04 PM |
Calendar should allow scheduling appointments in any time zone | Art H | Calendar | 1 | August 19th, 2005 11:25 PM |
Access Calendar | lost | General Discussion | 2 | July 7th, 2004 04:58 AM |