Has A 2013 changed the way that labels are aligned, or do I need to look for some other setting. Normally in A 2010 and 2003 I could highlight a row of label click size/space > equal vertical and it would move the labels.
View RepliesIn the bit of code below how do I set QTY to be right aligned using the Format keyword? Example of the output I am trying to get with my output strings is
1600.00
***1.00
**15.00
*100.00
I've messed about with the format function but no quite there yet.
code:
Set rs2 = CurrentDb.OpenRecordset("qry_test")
With rs2
Do Until .EOF
StrBody = StrBody & vbCrLf & _
"" & !Item & "" & !Desc & " " & Format(!QTY, "##0.00") & " " & !PRICE & ""
how do I create on on click event to change a label in form view so that a user can customise a form??
View 9 Replies View RelatedHi
I have a problem where the user has certain contraints in colour.
I am trying to change all the colours of labels in the database to purple.
Is there any way to declare it once in the database and all label statements will pick up the new colour. Saves me going through every form. Also there are other users who want to use the database with black.
???:rolleyes:
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.
Hi,
I have a command button that opens a report. The report has many subforms in it. I am sending open args which existingstewardship. I want one of the labels of the labels to be visible if the me.openargs = "existingstewardship". the code is not working. I have tried to debug when I do this I have found the open args are null and I am wondering if the open args are null is this because they were sent to the main report from the command button and the subforms in the main report do not get passed the open args.
Does anyone have any idea ? how I could make the box visible or not visible in subreport from the command button. The other option I have would be two different reports. Thanks PWF
I cannot link a label with a control. I don't know how it happens, or rather how I do it, but on various forms the label is not linked to the proper control. I try to do it by clicking on the warning popup on the right side and indicate I want to associate the label with the control, but sometimes it just doesn't work. That is, if I set the visibility of the control to True or False depending on the value of another control, the label still appears.
I've looked in the properties of each, but there doesn't seem to be anything there to indicate the link or association. Other than laboriously copying and pasting the label back on the form with the control highlighted, is there any way else to do this?
I have a problem with the connection between the labels and fields in designing my form.Is there a command do eliminate the association between the two? If not I was thinking if there is a problem to delete the labels and make new ones but by doing this Access (2010) says the label is unassociated.
View 6 Replies View RelatedI want to be able to do something to several labels, e.g. make them invisible, using a FOR loop. They are all named similarly, with ascending numbers on the end, e.g. lblName20
Say I want to make lblName20 to lblName40 invisible. I need something along the lines of:
Code:
Dim labelname As String
For c = 20 To 40
labelname = "lblName" & c
labelname.Visible = False
Next c
Of course, that doesn't work, because it doesn't recognize the string as a label name. How do I go about this?
Is there a way to align text in Labels vertically (top, center, bottom) ?
I see the horizontal text align property (right, left, etc) but do I miss the vertical or there is non?
I have an option group with 4 options and I want them to display traffic light colours when an option is clicked. So if option 4 is clicked it displays red, if option 1 is clicked it displays green, however, once clicked the colours remain, and dont disappear when I click another option and they remain for all records.
Private Sub Frame742_AfterUpdate()
'Select Case Me![Frame742]
' Case 1
[Code].....
I have a form containing a sub form.
On the sub form I am selecting products that I am selling to a customer whose details appear on the main form.
The products on the sub form are selected from a combo box. This section is in datasheet format.
Depending on the product sold some of the labels on the sub form are not relevant. And when this is the case I was thinking maybe the label is rendered invisible.
Maybe this is not the best way to handle this - or is it. It certainly is expedient.
Perhaps as well when the label is rendered invisible entry of a value into the corresponding text box becomes impossible.
Is there a better way to handle this?
How I can render the label invisible and disallow data entry depending on the value of the combo box.
I'm having trouble getting my form to be "blank" except for the labels upon loading. I've tried putting in some code "on load" but it doesn't clear everything. I haven't had this trouble on some of my other db's, the only difference here is it's a switchboard. I don't know if that matters.
View 1 Replies View RelatedI have three labels that I can't change the text color. I must have them locked or something. What should I check?
View 5 Replies View RelatedI'm trying to make a template form for a helpdesk, at the bottom would be a "Copy to Cliboard" button that when pressed will copy to clipboard in the format of:
label1 textbox1
label2 textbox2
label3 etc...
I got the jist of it, but got lost somewhere along the way, this is what I have so far:
Code:
Option Compare Database
Option Explicit
Private Function fcopyfields() As String
Dim strapp As String
Dim strapplabel As String
[Code] ....
It's falling apart at the button click.
How do I change the legend labels of a pivot chart form so that it doesn't show the words "sum of" in front of my description. I am using access 2007.
View 2 Replies View RelatedIs there a way to make text fields or text labels curved?
Is this even possible?
There is a light border that is still there after I remove the text that was in the box. I want to remove the ghost image, for lack of a better name, that is left.
Also all the images, fields, are locked together. I want to remove some individually,without moving everything.
I'm in the "LayOut View" of Access 15.0.4551 Office 365 Home Premium.
I am trying to generate standard Avery 2160 address labels. Fonts are small enough to allow for up to 4 print lines none of which quite touch. Players have entered their own names and addresses via a website form, so I we never quite know what is in the fields. If the player has a foreign address, it will all be entered in the address field, whereas US addresses have 1 or 2 lines in the address field, and city, state and zip in their respective fields. Line 1 is set as name, no shrink or grow. Line 2 is set as address, shrink and grow set to yes, and line 3 (text4) is set for city & state & zip, concatenated and trimmed in the query, shrink and grow no. The detail OnPrint event is the following:
Code:
Private Sub Detail_Print(Cancel As Integer, PrintCount As Integer)
Me.Text4.Visible = False
If Len(Text4 & vbNullString) > 1 Then
Me.Text4.Visible = True
End If
End Sub
The problem: Any row containing at least one label with 4 print lines pushes the next entire row of three labels down one line, throwing off the spacing of the labels. If I set line 3's can shrink to yes, then the label following the four-line label never has its text4.visible turned to yes, and the other problem (pushing next row down one line) persists. These labels were originally set up via the labels wizard (Access 2010).
How can I keep it from overflowing from one label to push down the next line? This just shouldn't be this hard!
I created a form with a continuous default view and created labels in the page header of the form. When I view the form, I can see the data from the form detail, but the lables in the page header do not appear. Why can't I see the labes in the page header ?
View 3 Replies View RelatedI am trying to change the button color on a subform if a related form data changes.Main form is products with a continuous subform with serial numbers of products i.e, serial number, location, price and a button to add addtional issues if there are any for this particular serial number (this will open up another form related to the serial number so I can add an issues if there are any).The reason I would like the button to be a different color is so I can quickly see if there are any additional notes been added to the serial number. Just in case you may ask why not add the field to the continuos form is that the issues and be quite lengthy and there may be lots of serial numbers on the form
2346 location warehouse price 29.99 (button - green)
2347 location shop price 29.99 (button - red)
I have the following code:
Dim FrmGraphObj As Object
Set FrmGraphObj = Forms![frmE Weekly Efficiency]![gph_WeeklyEfficiency].Object.Application.Chart
FrmGraphObj.Axes(xlValue).TickLabels.NumberFormat = "0%"
I continually receive a runtime error 1004 " unable to get tick labels property of the axis class"
if I remove this code, then I error on the following code:
Dim FrmGraphObj As Object
Set FrmGraphObj = Forms![frmE Weekly Efficiency]![gph_WeeklyEfficiency].Object.Application.Chart
If FrmGraphObj.SeriesCollection(2).HasDataLabels Then
also a runtime 1004: "unable to get the seriescollection property of the chart class" on the last line above
searched this forum and found:
If your chart is in a form (or report), you have to:
1) refer to the form (or report) name (Form_Charts)
2) refer to the name of the object frame holding your chart (.Graph1)
3) refer to the object within the frame (.Object)
4) refer to the application that created the object (.Application)
5) refer to the actual chart itself (.Chart)
6) refer to the axes collection and select the axis you want to reference - in this case the category, or X-axis (.Axes(xlCategory))
I made the assumption, that I would just replace xlCategory with xlValue for the Y-axis. So I'm back to:
Set FrmGraphObj = Forms![frmE Weekly Efficiency]![gph_WeeklyEfficiency].Object.Application.Graph
With FrmGraphObj.Axes(xlValue)
.TickLabels.NumberFormat = "0%"
End With
Same error....
Looked in the Microsoft Graph Visual Basic Reference and it indicated:
"Tick-mark label text for the value axis is calculated based on the MajorUnit, MinimumScale, and MaximumScale properties of the value axis. To change the tick-mark label text for the value axis, you must change the values of these properties."
I reset my code to call these 2 functions prior to changing the number format.....
Public Sub txtMaxPercent_AfterUpdate()
Dim FrmGraphObj As Object
Set FrmGraphObj = Forms![frmE Weekly Efficiency]![gph_WeeklyEfficiency].Object.Application.Chart
FrmGraphObj.Axes(xlValue).MaximumScale = txtMaxPercent
End Sub
Public Sub txtMinPercent_AfterUpdate()
Dim FrmGraphObj As Object
Set FrmGraphObj = Forms![frmE Weekly Efficiency]![gph_WeeklyEfficiency].Object.Application.Chart
FrmGraphObj.Axes(xlValue).MinimumScale = txtMinPercent
End Sub
now I am receiving error 1004 again, this time it states "Unable to set the minimumscale property of the axis class" erroring on this line....
FrmGraphObj.Axes(xlValue).MinimumScale = txtMinPercent
debug.Print me.txtMinPercent
0.51
I have a form that launches a query. The results are displayed in a continuous form called ParentForm. On the ParentForm is a combobox which selects a singleform called a ChildForm that displays the details of the selected record. I placed a command button on the ChildForm. This button simulates a circular triple state toggle switch. By clicking this switch the form goes from ReadOnly to Edit to Add modes. The form properties AllowEdits , Allow Additions and DataEntry are adjusted accordingly. These properties when they are changed seem to initiate requery of the underlying data source. Here is the code. I am looking for a way to avoid requery of the data when the mod is changed.
Code:
Private Sub ModeBt_Click()
'-------------------------------------------------------------------------------
' Circular toggle button to change display mode of the form
' ReadOnly - Edit - Add
'-------------------------------------------------------------------------------
Select Case Me.Mode
Case "Edit Mode"
Me.AllowEdits = False
[code]....
Ok, so I was wondering if there was a way that only certain text boxes show up in a form based on the record.
For example, in my products form there is hardwood cost, trim cost, fireplace cost, but only some products apply to each of those. How do I do it so that if the record refers to a fireplace all you see is the fireplace cost textbox and not the other two?
Is it better to have seperate tables? But they are all products so I thought they all go in one table.
Also, I would like a box named retail on the form which is basically the cost x2, I know how to build the expression but I would like it if it would multiply the hardwood cost by 2, if there is no hardwood cost then it chooses the trime cost, and so forth for the fireplace cost. Also, sometimes there is a retail price that does not need any calculations at all..how do I incorporate this?
Is any of this possible?
thanks very much in advance for any help.
I have a field in my database that list the number of personnel folders a person has, I would like to print labels for each folder for that person. For example, if a person has 4 folders I would like to print 4 of the same label at once by clicking the command button I have set up to print the label. The default is set to 1 label but I need the number of labels to change according to the number of folders listed. Can this be done and if so how?I will be using Avery 4031-20 labels
View 2 Replies View RelatedA few years back I saw a program which helped with database changes. I want to change names of fields and tables, queries etc. in a rather complex database. Does anybody know where I can get this tool or program to run through the database and change it in all corners and crevices on a search and replace basis?
Thanks