Hello the problem I am having is that when I imported data from excel, it somehow placed carraige return at the end of the text box ( this is what I believe), this is a problem because in that field is a drop down box and it complains about my value not being valid. I press the del key behind the value and it doesnt complain. Can anyone help me?
View RepliesAccess 2010
I have a report with some text boxes on it. Sometimes the text in these boxes can be a very long string of characters (maybe a path to some folder). In this case I do not want the text box to grow. I just want the report to show me the right-hand side of this path and cut off the left. How do I do this when still aligning my text to the left?
So I'm trying to manipulate Access to create a Directory for my church. I'm trying to get a report to show the church staff, which I was able to do, but I was wondering, is it possible to get the records to show side by side instead of one on top of the other?
I included a picture of the design view showing what I would like to see. Excuse the way the numbers are written, it's hard to write with a mouse.
I have split my database, the data is in a DB on the server and the forms, reports, etc is on the client desktop. My question is "Is there an advantage to having all of my combo box queries (Lookups) on the server side (defined in the table as a combo lookup) or should I put the all on the form so that they reside in client side DB.
View 7 Replies View RelatedForm with three sections. I have three queries selecting different set of set in a table, I would like to show all three in a form side by side. How can I do this? I use form wizard bit it only uses one query as a source.
View 2 Replies View RelatedHi,
I want to Delete only FK on the many side first and the record on the one side by one click of a button. I wrote some code which sometimes works and sometimes it does not!!
I wonder if any one have a better idea or doing this please?
Private Sub Delete_Click()
Dim db As DAO.Database, rs As DAO.Recordset
Dim n As Integer, i As Integer
Dim vStart As Integer
Dim vEnd As Integer
Dim vSite As Integer
Dim vRCCID As Integer
vSite = Forms![frmSite].Form![SiteID]
vRCCID = Forms![frmSite]![Roads Construction Consent].Form![RCCID]
vStart = Me.PhaseStart - 1
vEnd = Me.PhaseEnd + 1
Set db = CurrentDb
Set rs = db.OpenRecordset("tblPhase")
rs.MoveLast
n = rs.RecordCount
rs.MoveFirst
If n > 0 Then
For i = 1 To n
If rs![SiteID] = vSite Then
If rs![PhaseNumber] > vStart And rs![PhaseNumber] < vEnd Then
rs.Edit
rs![RCCID] = Null
rs.Update
End If
End If
rs.MoveNext
Next i
End If
rs.Close
db.Close
Set db = Nothing
Set rs = Nothing
'/////////////////////////////////////////////
DoCmd.RunSQL "DELETE RCCID FROM tblRCC WHERE RCCID = " & vRCCID & ""
'//////////////////////////////////////////////
End Sub
tblRCC is the one side of the relationship and tblPhase is the many side.
Any help will be very much appreciated.
B
I have a report in which a textbox generates numerical values and letter values. I want to...On report load - if textbox = numbers then hide otherwise show if it contains letter values.
View 9 Replies View RelatedThere is a text box in a form that user can enter the value.
How can I check if the value entered by user is already existed in the record of the linked table or not?
If the value (or record) do not exist, that new value/record will be added to
the table.
If the value do exist, just show the msgbox to indicate.
How can I do that ? :confused:
Thanks
Hello, I have two images (img1 and img2) and I want to have img1 visible when the form opens and when I run the mouse over img1 it changes it to visible = False and img2 is visible = True. Also when I mouse off the image it changes back to img1… How is this done? Thanks!
View 8 Replies View RelatedHello,
I'm having a little problem with an Access Query. Simple table design, with relationships as normal, using a junction table for a many-to-many link.
Table1
Field: Area (Text)
Field: T1_ID (AutoNumber)
Table2
Field: T2_ID (AutoNumber)
Field: Value (Double)
Table3Join
Field: Area_ID (Long Integer) *Rel: Table1.T1_ID
Field: Value_ID (LongInteger) *Rel: Table2.T2_ID
Table4
Field: T4_ID (AutoNumber)
Field: Area (Number) *Rel: Table1.T1_ID
Field: Description (Text)
Query1
Sources: Table4, Table3Join, Table2, Table1
Fields: Description, Area, Value
SQL:
SELECT Table4.Description,Table4.Area,Table2.Value
FROM Table2 INNER JOIN ((Table1 INNER JOIN Table4 ON Table1.T1_ID = Table4.Area_ID) INNER JOIN Table3Join ON Table1.T1_ID = Table3Join.Area_ID) ON Table2.T2_ID = Table3Join.Value_ID;
However, with this design as it is, I cannot "edit" the Description field, or change the Area field. The entire Query becomes read only. Why is this? And how should i re-write this to allow me to use the relationships which Link Table2.Value to the appropriate Table4.Area (and display them both in one query), while allowing me to edit all the sub fields.
Thanks
Jaeden "Sifo Dyas" al'Raec Ruiner
Using: Access XP 2002 (10.4302.4219) SP-2
I am trying to write code to change the color of the text on a button on a continues form. I only want the button for the specific record, that meets the requirements of the if/then, to be effected. The code below will change the button for every record if one record meets the requirements.
If Me.datPMDueDate = Date Then
Me.cmdAccessMaintenance.ForeColor = 65280
Else
If Me.datPMDueDate < Date Then
Me.cmdAccessMaintenance.ForeColor = 255
Else
If Me.datSMDueDate = Date Then
Me.cmdAccessMaintenance.ForeColor = 65280
Else
If Me.datSMDueDate < Date Then
Me.cmdAccessMaintenance.ForeColor = 255
Else
Me.cmdAccessMaintenance.ForeColor = 0
End If
End If
End If
End If
I am having problems getting Access to evaluate whether a textbox is empty using VBA behind my form. I'm currently using Access 2000 on a Windows98 machine, but I also tested this in Access 2003 on an XP machine and got identical results.
The way I’d like the code to operate is if the “Product1” field is empty, the value taken from another form would be pasted there, and if it isn’t empty, go to the “Product2” field and if that field is empty, paste it there, otherwise go to the “Product3” field, etc.
I have tried using If IsNull(“Product1”) Then… but Access seems to think that the unbound textbox with no default value isn’t empty.
I tried using If ("Product1" <> "*") Then… but Access again seems to think that there is something in that unbound/no-default value textbox.
My code looks like this:
If ("Product1" <> "*") Then
DoCmd.GoToControl "Product1"
DoCmd.RunCommand acCmdPaste
DoCmd.OpenForm "ActiveProduct", acNormal, "", "", , acNormal
DoCmd.GoToControl "Description"
DoCmd.RunCommand acCmdCopy
DoCmd.OpenForm "Order Form", acNormal, "", "", , acNormal
DoCmd.GoToControl "ProdDescr1"
DoCmd.RunCommand acCmdPaste
DoCmd.Close acForm, "ActiveProduct", acSaveNo
DoCmd.GoToControl "ProdQty1"
DoCmd.Close acForm, "Product Lookup form", acSaveNo
ElseIf ("Product2" <> "*") Then
DoCmd.GoToControl "Product2"
DoCmd.RunCommand acCmdPaste …
End If
I admit that my VBA skills are limited, but after having scoured these forums as well as Access help and examining the logic of my code, I am completely stumped. Any suggestions you can offer would be greatly appreciated!
Thanks!
I have a textbox on my main form that calculates the total of a field on the sub-form. It works well and display the correct ammount on the textbox when I load up the form, but if I do changes the values of the sub-form it doesn't update at all ! I need to close and open the form again to see the changes.
How can I update the textbox so it always reflect the values on the sub-form?
Code:
Private Sub Check253_AfterUpdate()
Me.Text255 = Environ("UserName")
If Me.Check253 = -1 Then
Me.Text254 = DLookup("[Lot]", "[tblAutoGen]", "[Inuse] = -1")
Me.Text256 = DLookup("[Exp]", "[tblAutoGen]", "[Inuse] = -1")
Me.Text258 = DLookup("[Lot]", "[tblEthanol]", "[Inuse] = -1")
Me.Text260 = DLookup("[Exp]", "[tblEthanol]", "[Inuse] = -1")
Me.Text262 = DLookup("[Lot]", "[tblDPBS]", "[Inuse] = -1")
Me.Text264 = DLookup("[Exp]", "[tblDPBS]", "[Inuse] = -1")
Me.Text266 = DLookup("[Lot]", "[tblTE]", "[Inuse] = -1")
Me.Text268 = DLookup("[Exp]", "[tblTE]", "[Inuse] = -1")
Me.Text259.Value = Date
End If
End Sub
How do I clear the values in each textbox if check253 = 0 rather then going to each and clearing them?
I have created a report and i am having trouble with the =Sum() function. I would like to sum all the values that are held in a text box which has the expression of '=[BookingSF_Qry subreport].[Report]![TotalSF]*[HowManyDays]'. No matter what i try i cant get a total value of all of these.
View 14 Replies View RelatedSELECT Count(Query1.Route) AS NumberofReRoutes, Query1.Route
FROM Query1
WHERE [Start Date] <= #9/30/2014# AND [End Date] >= #9/1/2014#
GROUP BY Query1.Route
ORDER BY "NumberofReRoutes" DESC;
The last line seems to make absolutely no difference. I can change it to ASC, or I can remove the line entirely, and nothing changes. I need these sorted by the NumberofReRoutes field, but this method isn't working!The output at the moment is two columns: Route, and NumberofReRoutes.
I have a form in which the user has the privilege to download some data from the table.the user will paste some of the numbers to the textbox from the excel in order to download the specific data.i need to write a query to parse the textbox using the in condition
View 12 Replies View RelatedI am designing a book collection database where each book can contain multiple authors. I used three tables; tblBooks, tblAuthors, tblBookAuthorJOIN. The tblBookAuthorJOIN allows me to create a subform with drop down combo boxes in the Books form linking multiple authors to each books indexed field. The Author table contains the usual FirstName, LastName, MiddleName fields. I would to be able to display the names of each author in the forms header but I am having difficulty.
For example a book may have two authors such as:
Authors table would contain values such as
Last Name: Grisham
First Name: John
Last Name: Twain
First Name: Mark
Textbox in header would display: John Grisham; Mark Twain
The authors would be displayed in the following format in the same order as listed in the subform datasheet.
Attached is a graphic of the form.
Hello,
I have a MS Access form with a few hyperlinks on it. I have tried to achieve effect similar to hyperlink roll over effect on a web page: when mouse pointer goes over a hyperlink it changes colour, etc.
Unfortunately, all I could find was MouseMove event:
Sub Label_MouseMove
Label.ForeColour=vbBlue
End Sub
But in this case hyperlink stays blue even after mouse pointer leaves it. And I would like hyperlink get back it's initial colour.
Thank you
Trying to figure out during the key down event -
a.) how to also stop a leading zero (e.g. don't allow 04, but allow 4)
b.) Don't allow any combination of numbers to be outside 1 to 36
Yes, I can do this on a validate event after the fact. Just wondering if there is anything that could put this all into the KeyDown event to prevent errors in the first place.
This code works great to prevent any key entry except 0..9, Tab, and backspace
Code:
Private Sub txtSectionNumber_KeyDown(KeyCode As Integer, Shift As Integer)
Select Case KeyCode ' only accept a number 0 to 9 Backspace or Tab
Case vbKey0, vbKey1, vbKey2, vbKey3, vbKey4, vbKey5, vbKey6, vbKey7, vbKey8, vbKey9, vbKeyBack, vbKeyTab
' do nothing and accept the value
Case Else
KeyCode = 0
End Select
End Sub
In the US Western States, a survey township is simply a geographic reference used to define property location for deeds and grants as surveyed and platted by the General Land Office (GLO). A survey township is nominally six by six miles square. They are assigned numbers of 1 to 36.
I've got a rapidly expanding database that I designed to do my quotes for work and now I'm trying to expand it to add up the invoice amounts when the jobs come to fruition. I've got 99% of it working well but as I'm not the only one entering data I'm trying to make it as foolproof as possible and here is my problem.
I have a multi-line textbox that receives 'vehicles' in an abbreviated format and I need to get them in order based on a sort column number in the appropriate table. This i can do but the code I have found removes the duplicates which I don't want as I can can two identical vehicles on the same job.
e.g
Vehicle Sort Order
UNT/FL 500
FL4/45 400
E7/F5 600
UNT/FL 500
I want as
FL4/45 400
UNT/FL 500
UNT/FL 500
E7/F5 600
Basically what I have is a form where a user has a drop down combo box that he can pick more than one value.
I then want to take what he has inputted e.g. Option1, Option2 and put that on a report in an unbound text box with another field value.
For example
=[Field1] & "/" & Option1/Option2
Those forward slashes are quite important as well, so any solution would need to include those.
I have a problem in doing a task with my form. Actually I have a button to add a new record which opens a new form there i enter the values to the record. But when I press the Addnew record button I want to calculate the maximum of the Identity field +1 and open the new form with that new number which i have calculated. How can i do this....
View 1 Replies View RelatedI am importing data from a sharepoint list on to Access 2007, as linked data where any changes I make on Access is made to the list and vice versa. However, I recently made a change to one of the column types and this change is not being made on Access. I have changed a column type from choice to single line of text but I still see the list of choices when I access the list on Access 2007.
I have refreshed the list by right clicking the linked list and pressing refresh list. The list is set to not cache the list and is not set to work offline so cannot see why the change is not being made. I don't want to mess with the list be removing it and re-adding it as I have multiple queries set up which are being fed in to an excel file I use to create reports from the data. I have no knowledge of VBA, so there is none of that being used on Access.
I have (from SPSS) many multiple regression analyses, and each one of them has about 7-8 independent variables. I need to find the effect size-in particular I want to have effect size above 1% and statistical significance p<0.001. I am familiar with p, but I cannot understand whether effect size is b, beta or R square and how to interpret it.
View 1 Replies View RelatedIt is a strange effect I get when switching among records.
In a form I have a TAB Control with some pages, when I open the form everything is ok:
But, when switching continuosly among records, the font becomes strange, looking like being bold.
It seems to happen only when using TAB control or, if you prefer, only on every TAB control's page except for the first one. Tried on different pc with different resolution.