So I'm using the same field in a query, price. But I need it listed twice in the table it creates, one as cogs_mfn, and the other as cogs_afn. The problem is that since the field that the data is coming from is exactly the same, the caption remains consistent, whether one or the other. I've tried to create separate expressions, but that doesn't work either.
View RepliesWon't the captions reflect on Queries as Query Column Headers? If it is, how to make it reflect...
View 3 Replies View RelatedHello,
I have an MS SQL 2000 backend, and I link the tables from here to an .mdb file. In that .mdb I would like to change the field captions of the tables in runtime, but when I try to assign value to a caption property which didn't have value before, I receive an error message which says, that this property could not be found. I tried out a lot of things, but up to now, without any success. Does anybody have any idea, what could be the solution?
I would be very grateful for any small tips!
Many thanks,
voiD
I have an access 2000 database and i want to make a cross tab query with 2 column headers but access doesnt allow thatI decide to make the inverted cross tab query and its okbut now i want to use this in a report but invertedex product type client1 client2 client3 a 1b 2c 3 product a product b product c type 1 type 2 type 3client1 client2 client3
View 3 Replies View RelatedI want to change the Caption of a textfield depending upon a value selected from a combo box. i.e. If the user selects 'Scientist' from combo box, then the caption to enter name should be 'Scientist Name' if the user selects 'Engineer' then caption should be 'Engineer Name'. Can anyone guide me how this can be done?
Thanks
Hello all,
Does anyone know how I can make this code search the captions instead of the Control Sources: :confused:
Option Compare Database
Option Explicit
Dim mstrFormToSearch As String
Private Sub cmdFind_Click()
Static strLastFind As String
Dim ctlFocus As Access.Control
Dim strTemp As String
Dim I As Integer
If IsNull(Me.TxtFindWhat) Then Exit Sub
With Forms(mstrFormToSearch)
.SetFocus
Set ctlFocus = .ActiveControl
On Error Resume Next
strTemp = ctlFocus.ControlSource
If Err.Number <> 0 Then
For I = 0 To .Controls.Count - 1
Set ctlFocus = .Controls(I)
If ctlFocus.Enabled = True Then
Err.Clear
strTemp = ctlFocus.ControlSource
If Err.Number = 0 Then
Exit For
End If
End If
Next I
End If
ctlFocus.SetFocus
On Error GoTo 0
End With
If Me.TxtFindWhat = strLastFind Then
DoCmd.FindNext
Else
DoCmd.FindRecord _
Me.TxtFindWhat.Value, _
acAnywhere, _
False, _
acSearchAll, _
False, _
acAll, _
True
strLastFind = Me.TxtFindWhat
End If
End Sub
Private Sub Form_Open(Cancel As Integer)
On Error Resume Next
mstrFormToSearch = Screen.ActiveForm.Name
If Len(mstrFormToSearch) = 0 Then
MsgBox "There's no active form to search!"
DoCmd.Close acForm, Me.Name, acSaveNo
End If
End Sub
Thanks :)
Hi There
I am wandering if anyone has a solution to this problem i has basically have 2 tables 1 called departments, with the fields: Dep No, Dep Name, then i have another table called Items, with the fields: Item No. Item Name, Item Price, Department.
What i want to do is create say 10 command buttons and create an array of them i know sort of how to do it in visual basic and all the 10 command buttons name is the same and an aray is created but i dont know how to do it in access i know that it doesnt let you create an array but i have seen it done somehow in a project that i came across.
so basically what i would want to have done is on the form load the 10 department buttons captions are loaded from the table departments and when a department button is clicked its is linked to items where i ahve created say 20 command buttons called items.
I dont know it it makes sense what i have written but any help on this matter would be very apreciated it pr if anyone knows of any examples as i have been stuck on it a while
Many Thanks
Hi.
I regularly import tables with many fields from a third party application into Access 2000.
These fields all have captions as well as field names (obviously!) but I give them much more meaningful "friendly" names. But to do this I must first manually delete all the captions.
Is there an easier way?
Thanks in advance.
Hi all!
I have this command button whose caption switches from update record to save record with a msgbox verifying if the person really wants to take this action. On click the user is then allowed to update the record then in theory they would be able to hit the same button whose caption now reads save record, the msg box would appear with a yes or no answer required. The code I have is putting the msg box after the user clicks the update button.
Anyhelp and/or suggestions would be most appreciated!
Private Sub cmdOpen3_Click()
stDocName = "frmSearch"
If cmdOpen3.Caption = "&Update Record" Then
If IsNull(Me.FTMSubform.SourceObject) = False Then
Me.FTMSubform.SourceObject = "frmFTMInfo"
Me.FTMSubform.Form!txtFirstName.Enabled = True
Me.FTMSubform.Form!txtFirstName.Locked = False
Me.FTMSubform.Form!txtFirstName.BackStyle = 1
Me.cmdOpen3.Enabled = True
Me.cmdOpen3.Caption = "&Save Record"
Me.cmdOpen4.Enabled = False
Me.cmdOpen4.Caption = "&Update Record"
Else
Me.FTMSubform.Form!txtFirstName.Enabled = False
Me.FTMSubform.Form!txtFirstName.Locked = True
Me.FTMSubform.Form!txtFirstName.BackStyle = 0
Me.cmdOpen3.Enabled = False
Me.cmdOpen3.Caption = "&Save Record"
Me.cmdOpen4.Enabled = True
Me.cmdOpen4.Caption = "&Update Record"
End If
End If
If cmdOpen3.Caption = "&Save Record" Then
If IsNull(Me.FTMSubform.SourceObject) = False Then
Me.FTMSubform.SourceObject = "frmFTMInfo"
If MsgBox("Save update to this individual?", vbQuestion + vbYesNo, "Save Update?") = vbYes Then
DoCmd.Save
DoCmd.Close acForm, "frmFTM"
DoCmd.OpenForm stDocName
Else
MsgBox "Return to the FTMInfo Form!", vbInformation, "Save Function Aborted!"
End If
End If
End If
End Sub
~Van
I would like to display a continuous form with a command button whose caption is dynamic; such that the button text is determined by a field in the underlying recordset of the table.
So, if the field were forename : each button caption maybe : Brian, Peter, Sally etc.
Is this possible / and how can it be done?
Thank you.
G
I used the code below to check the empty fields in the form and populate it in a message
Code:
Private Sub Form_BeforeUpdate(Cancel As Integer)
Dim ctr As Control
Dim strMsg As String
'Loop through every control on the form
For Each ctr In Me.Controls
[code].....
I want the message to show the captions of controls instead of its names
I have a system that has a growing number of forms. On each form they are a variable number of labels/text boxes/command buttons etc. The captions for all of these are in english.
The database is to be deployed to a non english speaking country so I want to be able to dynamically change all the captions on the forms (not n the data) to the local language.I know how to do this. For each control on load I decide the local language and change the caption accordingly ie (and code is for illustration only and not necessarily syntactically correct)
if locallanguage = 1
me.control1.caption = "save in english"
me.control2.caption = "heading1 in english"
else
me.control1.caption = "save in local language"
me.control2.caption = "heading1 in local language"
end if
What I want to know is there and easy way to do this. Rather than wade through each control on each form and find out what the name is can I generate anything that will give me all the control names and captions for each form (and report)?
I want the caption for buttons in my Form to be pulled from a record in a table. Additionally, I want the name of the related form or report opened from the button to be pulled from the same record. I've been looking into this and it seems like using DAO is one option,I've already go the table set up, that was easy enough.
View 7 Replies View RelatedI' ve created an index (catalog) for the books in the database using a tab control and the code:
Private Sub TabCtl21_Change()
If (193 + Me!TabCtl21.Value) < 210 Then
Me.RecordSource = "SELECT * FROM tblBookTrackDetails" _
& " WHERE [tblBookTrackDetails.Details] Like '" & Chr(193 + Me!TabCtl21.Value) & "*'" _
& " ORDER BY " & Me.SortingTypeList & " ASC;"
End If
'for english characters chr=97
If (193 + Me!TabCtl21.Value) >= 210 Then
Me.RecordSource = "SELECT * FROM tblBookTrackDetails" _
& " WHERE [tblBookTrackDetails.Details] Like '" & Chr(194 + Me!TabCtl21.Value) & "*'" _
& " ORDER BY " & Me.SortingTypeList & " ASC;"
End If
If Me.Recordset.EOF Then
MsgBox ("There are no books for this letter!")
End If
End Sub
It works ok but please take a look at the attached image to see what is happening after clicking two or three times the index letters.
After the tab's caption is "erased", if I pass over the mouse is being corrected.
I tried the repaint and refresh commands but neither worked.
Can anyone help?
I have a form (Form1) and a in it, I have 2 subforms datasheet (Subform1 and Subform2). I have ID, First Name, Last Name in each as headers.
I need to:
1) Find the subforms
2) Loop through the subforms and get all the labels
3) Change the captions
The reason for this is because I need to have the forms bilingual. I do have a function that will translate the caption (called TranslateThisWord). I just cant figure out a way to loop through the subforms and find all the labels.
My database has a front end that uses forms to allow the user to navigate within it, each year we create a new database which is based on the previous year's database but with all the variable information removed.
Within the database each form has a caption that starts with '2014-15' then goes on to say the form name.
Most of my forms also have a yellow background, (last year it was pink).
Both these areas were set up so that each year our users can distinguish between our databases, as they may have last years and this years open at the same time.
What I would like if possible is to know whether I can get a user to change both these things from within a form. So something along the lines of a button that when clicked would check all form captions and if within the caption it finds 2014-15 then change it to 2015-16 (or whatever the user specifies) but keep the rest of the caption.
I would also want the same type of thing to happen with the colour so again within the background of the forms, if you find colour X then replace it with colour Y.
If this can't be done within a front end form, then could it be done behind the scenes, and if so how would I go about doing it?
Hello all,
Is it possible to add logos and headers to mdb tables. This is required because the tables are to be printed out and presented. The database itself is manipulated through java swing, so I would like the table to be ready to print out when opened. Any assistance is greatly appreciated.
Zengineer
Hi,
I have a switchboard that points to other switchboards (sub switchboards so to speak). I'm looking to change header title depending on what I group on that switchboard. However, when if I change one of them I change them all. Example: The main switchboard has a header of "switchboard". I have a sub switchboard that I would like to name "Report Switchboard". If I do that it changes all of them, not just the one that I want. Any thoughts?
Thanks in advance.
Eddie.
P.S.
In looking through the forums for this answer I found this awesome thread about to jazz up a database. Thanks to any of you that put suggestions on there.
http://www.access-programmers.co.uk/forums/showthread.php?t=61871&highlight=make+applications+great
I am attempting to create my first crosstab query in design view. Adding a simple row and column header and one value, I always get the error message 'Too many crosstab column headers (454)'. What am I doing wrong? Here is the SQL:
TRANSFORM Sum(Forecast.QTY) AS SumOfQTY
SELECT Forecast.HECI
FROM Forecast
GROUP BY Forecast.HECI
PIVOT Forecast.QTY;
Robert
How would I go about creating a datasheet style form with 'sort by' headers
for example:
I could create a form with a list box sorted by 'name' by default. If i wanted the same data to appear but sorted by 'Address' or 'Phone Number' how would I go about this?
Many databases give a datasheet view of the data where you can sort by clicking the appropriate header... how could this be achieved in access?
any hints or suggestions welcomed?
Hi,
I have a report that has category, subcateogry and districts.
I can get the first part of the report to work as I want it like so:
Category
FruitSub Cateogry
Apples
OrangesMeatSub Cateogry
Pork
Chicken
Now is where the fun starts. I want next to each of the subcateogries a count of districts, but I want to name of the districts to be at the top, and the counts to go underneath - here is 2 lines to show what I would like.
Category District Name
FruitSub Cateogry 2Apples 3Oranges0
The red text "District Name" would be 4 different districts, going across with the counts under the related districts.
I can not get the districts to show up at the top of the report next to cateogories, and go across with all of the districts, it keeps on wanting to list them underneath each other.
All reports that I have seen have a "set" header, not one created on the fly according to a database.
Is this possible to do, and if so, can someone point me in the right direction?
thank you for your time
My report has a header that contains "Shipped-From" and "Ship-To" information. I only display this on the first page of my report by using some code in the Page Header section. The problem is that the field names of the detail section are also in the header. This means that from the second page on the field names are absent. What can I do to include the field names in all of the pages - but the "Shipped-From" and "Ship-To" information only on the first page?
View 3 Replies View RelatedI'm using Access 2003. I have a report that I've set up with 2 columns. Unfortunately the Page Header won't print the headings for both columns. I looked on the Help screen and it says the information below. I assume this does not apply to the Page Header section? When I try to use a group header, all I can get is a header for every single row in the group. What am I doing wrong?
Repeat a group header in another column
Open the report in Design view (Design view: A view that shows the design of these database objects: tables, queries, forms, reports, and macros. In Design view, you can create new database objects and modify the design of existing objects.).Double-click the section selector (section selector: The box on the left side of a section bar when an object is open in Design view. Use the box to perform section-level operations, such as selecting the section.) of the group header (group header: Used to place information, such as group name or group total, at the beginning of a group of records.) to display the property sheet.Set the RepeatSection property to Yes.
I can't get my choices to display--only the Headers. In the selected field I choose combo box and choose the table to look up in the row source. The data columns are first in the table and their ID is last, but I only get the Header to display in the box. If I deselect header, I get an emply list
There are actually 7 columns in the look up table (the eighth is the ID) and 10 rows of possible choices.
Column Count: 7
Headers: Yes (or no doesn't matter)
Bound Column: 1 (changing doesn't matter)
Limit to List: No (so I can add)
What am I missing in the properties setting?
Also, can I use one of the columns in the look up table as a primary sort on a report? Or will it see the whole string of columns as one?
Thanks.
Dear Access Experts:
I am using Access 2000. I have created a command button on a form that when pressed, it exports a file to Excel using the TransferSpreadsheet command. It exports names, degree type, graduation date starting in cell A1. It works well.
What I wish to do is this: Can I have this data exported starting in cell A5 instead of A1? AND in the export cell A1 will have "College", A2 will have "School" and A3 will have "Dean".
Any help is appreciated.
Regards,
Dion
I have a subform that if it has lots of records in it and I scroll down then I cannot see the column headers, how do I get it to always show them?
View 1 Replies View Related