Here is how you refer to subforms and controls on it. Let's assume:
Subform name: "sfSubForm"
Label on the subform: "lblLabel"
Your code to hide label on the subform should be:
Code:
Me!sfSubForm.Form!lblLabel.Visible = False
hjozinovic
Last Activity: Oct 2 '17, 09:11 AM
Joined: Oct 16 '07
Location:
-
hi HiGu,
Here is how you refer to subforms and controls on it. Let's assume:
Subform name: "sfSubForm"
Label on the subform: "lblLabel"
Your code to hide label on the subform should be:
Change False to True if you want to show the label. -
@NeoPa
I had problems simulating this situation because Access kept crashing down. I looked up the explanation in Help and here is what I found:
"You can use the RecordsetClone property to refer to a form's Recordset object specified by the form's RecordSource property. Read-only.
Remarks
The RecordsetClone property setting is a copy of the underlying query or table specified by the form's RecordSource property....Leave a comment:
-
Amy,
you are having problem with using RecordsetClone property.
This property is Read-only. That is why you can't update your data.
You should use Recordset property instead. Try this:
Code:Set rst2 = Forms![frmMain]![subfrm_tblOverkeyDataBatchID].Form.Recordset Set rst1 = Forms![frmMain]![subfrmgd_tblPrimaryDataBatch].Form.Recordset
Leave a comment:
-
As far as I know all rows will have the same height in forms.
Different heights effect could be achieved only in reports where your textBoxes would have CanGrow property set to Yes.
h.Leave a comment:
-
stateemk,
I would first create such field in query and then take it out to a text file.
To create such field you can use expression in your query like this:
Please note here that i'm using symbols ; and , as it is adjusted to my local settings (Croatia)Code:FinalString: [EMP_ID]&Format(Fix([dedamt]) & Right(Format([dedamt];"#,00");2);"00000000")
You might need to replace some of those with...Leave a comment:
-
hi Busbait,
You probably want to be able to show/hide columns on your subform.
To do this you could use a code like this:
...Code:Dim ctl As Control Dim ctlName As String Private Sub Combo5_Enter() Me!Combo5.RowSource = "" For Each ctl In Me!sfTable1.Form.Controls If ctl.ControlType = acTextBox Then Me!Combo5.AddItem ctl.Name End If Next ctl End Sub Private
Leave a comment:
-
As I said above I'm trying to experiment here and create something new and useful.
Double click event will do the trick. I just wanted a visual 'sign' for the users thata specific text box has more to offer.
I guess, this thread can be closed...
Thanks for your suggestions guys.
h.Leave a comment:
-
flyboy,
I'm glad you made. Good luck with you DB.
h.Leave a comment:
-
Linq,
I'm sure you used date picker which appears next to the control formatted as i.e. 'ShortDate'
When you click on it a calendar control shows up allowing you to select a date.
What I want to have is almost the same:
When I enter the control a little button (or label or whatever) shows on the right side.
When I click on it, it opens a search form I created.Leave a comment:
-
hi flyboy,
Are you trying to write date and time at the moment check box is clicked?
you can do that in after update event of the checkbox.
write a code there similar to:
Code:If Me![CheckBoxName]=True Then Me![TextBoxName] = Date End If
Leave a comment:
-
Datasheet view allows selecting entire column and copy/pasting from excel.
column width can be resized...looks better etc.
I could live without it, but this is more like en experiment. That feature is something useful and I would like to use it in this and my future projects.Leave a comment:
-
Date Picker simulation
hi all,
This is the desired scenario:
-User opens a form in Datasheet view.
-When TextBox1 is entered (on enter event) a button should appear next to it.
-When clicked the button opens a search form.
-User double clicks an item from result list on the search form and data is entered into the TextBox1.
I accomplished this using a label as 'button that shows up' but this method requires Form... -
aBheE,
The problem here must be in the way you join your tables.
If you want you could attach a sample DB here or send it to me directly and I could help you with that right now.Leave a comment:
-
Hi H:
Sorry I have not seen your e-mail until now. Yes, I could use some help with my DB and I will be happy to send you a copy with my questions. I have been working on it for last 4 months and getting stuck. My deadline is Sep 30 and I am very nervous. If you are still available to help me with this project, please let me know.
Your kind offer of help is greatly appreciated.
Thanks and regards. M -
hi there,
i was looking for the same solution today and i found this working example. It was great for me, so i hope it will help you too.
Here is the linkLeave a comment:
-
Hi MNNovice,
I sent you PM on this matter, check it out!Leave a comment:
-
Hi MNNovice!
Your question with grant tables and echo draws seems a bit too complicated for solving online. i have some free time and if you want to send me the database i could help you with the proper design of your tables. If you want me to help you like this you can email me at: hjozinovic@gmai l.com
regards,
h. -
This should not be that hard. The combo box menus should be based on queries that have the appropriate combo boxes in their criteria section.
Like this:
1. Department box is based on query which is including all the departments.
2. User combo box must be based on a query that includes all the users WHERE Department ID = DepartmentCombo Box
3. the same goes for others...
Let us know how it's going with this.Leave a comment:
-
hi deewe,
I tried to get the same results and find a solution for you. In short... try moving all the fields you don't want to be visible to the form's footer area.
Then make that footer area invisible by setting it's Visible property to false.
Try it out and tell us if this works. If not, we will find something else :-)Leave a comment:
-
hi ebasshead,
You should use Hasdata property for this.
For a control that sums the expences subreport set a recordsource like this:
Code:=iif(SubReportName.Report.HasData = False ; 0 ; SubReportName.Report.TotalFieldName)
Leave a comment:
No activity results to display
Leave a comment: