Morning all, I'm trying to hide a column of a datasheet in a subform I have... if I run the form and right click and hide the column, it doesen't save that the next time I load it (wasn't sure if it was suppose to, but after reading http://office.microsoft.com/en-us/a...2362201033.aspx it would appear so) I'm using SQL Server 2000, not 7 so I would think that problem shouldn't come up for me yet it is, I need to hide a couple columns from the user (mostly ID columns) while they are entering in data, anyone have any advice they could throw my way?
The second column onward denotes Years-Quarters. Where I need help is in hiding columns I don't need to show if outside of the range the user's chosen: for example, if user chooses Jul-04 to Mar-05 then I'd like hide columns 2 and 6.
For whatever reason I can't get the monthly values to line up with the Yr-Qtr columns, but I hope you all know what I mean :o, i.e., 2004/07-2004/09 lines up with 2004-3, 2004/10-2004/12 with 2004-4, and so on.
As always, any help provided would be greatly appreciated.
The problem at hand for me is to be able to hide columns in a subform wherever "#Name?" appears. My VBA experience is minimal to non-existent, but if a not so complex sample code exists out there then I'd appreciate any suggestions you may have.
I have attached a print screen document that shows the result of a query in the subform I just talked about. My anticipated thanks for your help.
I want to use VBA to hide columns in a subform based on what is checked in a multi value look up field.
I am creating this DB for use with sharepoint as a web database, which is why I am using the lookup field to begin with. There will be a client DB to use with some VBA code
So what I have is a lookup field with tests "Test 1, Test 2, etc" on form sample.
There is a subform called results, and I want to hide certain columns based on what tests are performed.
I tried using an If Then statement (code is being run on subform load)
If Me.Parent.fieldTest = "Test 1" Then Me.Test1Col.ColumnHidden = False Else Me.Test1Col.ColumnHidden = True
That is basically the code I was trying to use. I am getting an error 13, which I assume is because fieldTest can not = something since it is a multi value look up field.
I've got a main form with two lists boxes. I want to show the visible columns in my subform (which is a datasheet) in one listbox and show the hidden columns in the other. Also I want to allow the user to hide / show columns using right or left arrow buttons between the list boxes. My subform is bound to a stored procedure using ADO.
What I have: I have a main form with 3 subforms viewed as datasheets.
I have read the post about hiding columns by using me.<object>.columnhidden = True and that kind of works. Once the user goes to resize the columns they can get the hidden columns back. This is a problem if I'm trying to hide a priority column only admins should see.
Is there a way to specify the width of a column and restrict the user from resizing it? That way the user can not resize and get hidden columns back.
If there is a better way if doing this please let me know. Ultimately, I just don’t want the user resizing or unhiding columns I have sized and hidden.
I was working on my database and opened one of my tables in datasheet view and noticed that I was missing some columns. I switced to design view and all of the fields are there. So, why doesn't datasheet view show all of my columns (fields)? Is there a setting somewhere that hides them?
I cant get my subform to hide. Main form is called 'frm_main_add' and the subform is called 'tbl_transaction_subform'.I am rying to get it to hide the subform (tbl_transaction_subform) if a field in the main form(frm_main_add) is null but its doing nothing.....
I put this code in the 'on current' and 'on load' in the frm_main_add and nothing..If (Expense_Name = Null) Then tbl_transaction_subform.Visible = False Else tbl_transaction_subform.Visible = True
I am pretty new to VBA and I am having the same problem of hiding and un-hiding columns on a datasheet of a split form. I am building a system that will be used in front of customer and therefore wish to hide columns that contain cost sensitive data. The same forms need to be able to show the Sales Rep the hidden columns simply by ticking a box. Basically a toggle on and off of hidden columns.
I have been playing around with the code below (which i found in another forum) to hide the Field called COO when I click the tick box called chkHIdeFields check box. This works on a Single form but not on a datasheet of a split form.
Private Sub chkHideFields_Click() ' Note: vbTrue = -1 If Me.chkHideFields = vbTrue Then Me.COO.Visible = True Else: Me.COO.Visible = False End If End Sub
I have been able to hide the column of my split form by using the ColumnHidden property of the On Load event just as a proof of concept that the ColumnHidden property actually works to hide a column, which it does. This is the code that im using to hide the column called COO.
Me.COO.ColumnHidden = True
However if I then set it to = False and then close and open the form, it doesn't unhide the column. the only way I can unhide the column is to do it from the Form view via the un-hide dialogue pop up box.
I have two issues here, the first one is getting the form to recognize when to hide and when to show the column of the datasheet on the split form and the second is to get the code to for the check box method.
Lastly once I get it working for 1 field I need to be able to define a list of 7 or 8 other fields all at the same time.
Ok this is a bit long winded and I will try to explain,
I have a main form, with a title at the top, then a row of buttons underneath and underneath the buttons I have a sub form.
Some of the buttons can have a dual function (or multiple function) so rather than open up another form I have hidden text below the button, so that when the mouse moves over the button, the text becomes visible. this gives the impression of a drop down menu off that button.
However I cannot get the text to appear over the top of the subform, it only appears behind it.
To give an example of what the buttons and drop downs are for, one of the buttons is a reports page, rather than open another form I can have a list of the differnt reports I wish to run (currently they are text boxes with an on click event).
any advice woudl be much appreciate and even an alternative to what I am doing if anybody has one.
I want to hide the scollbars on a subform. I selected "neither" for scroll bars under properties, and it works. However, the formatting is ugly. I have a blue background but get grey boxes where the scroll bars are supposed to be. Can I get rid of this and have the area blend in with the background?
I am displaying table records in access form Datasheet view. While business users accessing that form, they are hiding and rearranging some columns for their use. So it will be hard for other users to access. I just want to know any settings are avaible in MS Access or can we accomplish this using any events or macro or modules??
I have a form and a datasheet subform in Access. A form has person info and datasheet subform has 4 fields: QuestionID, QuestionNumber, QuestionName and Answer fields. The Answer field is a dropdown field and has 3 items: Yes, No and N/A. If QuestionNumber from 3 to 6 the answer was Yes or No then lock the Answer field in Question 7. Any idea how to do it?
I have a form (Main) with a subform (MainSub) set as a datasheet.
The main form holds details of employees and the subform holds targets and dates for the employees.
the subform has 4 fields, Target, StartDate, EndDate, AchieveDate.
What i would like to do, is show the date of the target that was achieved last on the main form.
For example,
Joe Young has 3 aims, 2 of which are complete and 1 which is still ongoing. Joe achieved his targets on 31/11/04 and 31/12/04. On the main form I would like to show a control called 'LastTargetAchieved' as 31/12/04.
If I am not making myself clear I will see if I can get a sample uploaded, otherwise, thanks for any help.
I have a subform which is basically a datasheet, I want to be able to update the items in the data sheet using vba, how would I go about doing this.
basically I have a combo in which the user selects a value I take that value and add it as a where clause in a select statement which returns a set of records, I want then take these records and populate the subform data sheet. I already have the select statement and know how to from a Filtered RowSource, i just not sure on what the call is to populate the subform. For a chart I've been using this
I have a small issue with the before update event, it is triggered for every record of my subform in datasheet view rather than just once when the user leaves the subform.
I have a module which is called from my form and all the subforms. It tells the user that changes have been made to the record and gives them the option to undo. This is to prevent accidental editing when viewing records. This works fine, but sometimes the user must enter a number of records in a subform and so they must answer the message box every time.
Is there any relatively straightforward way to accomplish the warning and undo when the user leaves the subform rather than the individual record in it?
A quick attempt at lost focus and before exit demonstrated that these were not the way to go.
For reference, here is the before update code and the module
Option Compare Database Option Explicit
Private Sub Form_Before Update(Cancel As Integer) On Error GoTo Err_Handler
Public Sub Confirm_Change() On Error GoTo Err_Handler
Dim Msg, Style, Title, Response
Beep
'Define message box Msg = "You have made changes to this record. " & Chr(13) _ & Chr(13) & "Click 'Yes' to save changes " & Chr(13) _ & Chr(13) & "Click 'No' to undo changes " Style = vbYesNo + vbExclamation + vbDefaultButton1 Title = "Record changed - Confirm save" '
'Check which button pressed Response = MsgBox(Msg, Style, Title) If Response = vbYes Then MsgBox "Record has been updated with your changes", vbOKOnly, "Record saved" Else DoCmd.RunCommand acCmdUndo End If
is ther any way to send the filtered subform's data to an Excel sheet?, I did som searching, but i can't locate anything specific to what i am trying to do.
I have currently this code, but it is a huge dump of the database, and none of the form filters, my current MDB has the main form and it narrows down the search by clicking on the next forms links. and on the last open form it will show a filtered result in a datasheet. this is what i am trying to export to Excel.
Code:Private Sub Command17_Click()Dim strqur As StringDim wurds As Stringwurds = "D:Documents and SettingsMy Documentsdownloadsmyfile.xls"strsql = "sortedby"DoCmd.TransferSpreadsheet acExport, acSpreadsheetTypeExcel9, strsql, wurds, TrueEnd Sub
is there any way to snd the filtered results to Excel? my brain hurst from scouring the forums.
I have been handed an Access database (Access 2002-2003 file format) to clean up and update as necessary. Currently I am trying to add new rows to a datasheet that is in a subform. I have had no trouble in the past adding rows and for some reason now I can't.
In some instances I can update an existing row but never add a new one. Also, the records options are greyed out in the ribbon except for a select few that are not useful (refresh all, totals, more). Can't add new record from their either. I am in the main form that contins the subform which contains the datasheet, in form view.
I have recently added a subform to a form and wish to display the subform in Datasheet view. Whilst I can get the proper data and headings to display, I cannot figure out how to get the column widths to persist. I can adjust the column widths while in (main) form view right on the subfirm columns themselves but after I save and reload the main & subform form, the widths revert to some sort of default value.
I have also tried adjusting the columns in the subform's associated data table itself as well as adjusting the text box widths when the subform is displayed in Form view but it does not affect the column widths when the subform displays Datasheet view.
What is more annoying is that I have another subform in which I was able to make the Datasheet view column widths persist but I don't seem to be able to properly recall how I did it.
