From a info sheet on RTB Using the Add, Clear, and Remove methods, you can dynamically populate the control with embedded objects at run time. Can those 'embedded objects' be controls, e.g. list boxes, labels etc ?
View RepliesHow to copy the time automatically to text box to become time as data (rich text) when entering data to a form.
View 2 Replies View RelatedI am new to access and have been staring at the same Run-time error for 3 days (pathetic I know). I cannot for the life of me figure out why it does not like my Dlookup. Esentially, I want and After Update event in my combo box to populate a Rich text textbox in my form. After reading DLookup is the easiest way to make this happen. Here is my code:
Me.emailbody.Value = DLookup("[Escalation_1]", "Status_Emails", "Status_Emails.Status =" & (cboStatus.Value))
My error reads: "Syntax error (missing operator) in query expression 'Status_Emails.Status = LOCATION NEED MORE INFO'.
LOCATION NEED MORE INFO is the value in my criteria cbostatus.value.
Hi,
I've just installed Stephen Lebans Rich Text Control as I have a a couple of memo fields on a form on a 2003 database where the user needs to be able to bold parts of the memo. I've installed it fine, and put the text control onto a form and it doesn't seem to do what i need (i.e. the Bold button isn't even enabled on the toolbar). I've downloaded the sample database that he has on the site and this works fine suggesting ive installed it correctly and i am going through the properties of the control with a fine tooth comb but havent found anything different yet to what i am doing on my trial form.
Any ideas what I've missed?
Hi,
Is it possible to simulate a control array in MS Access?
I’m using a restricted version of Access 2000. I can use all normal features but some Active X controls are not licensed and it will not be possible to licence them in time I have available for my project.
I have a form which has 14 combo boxes and 24 text boxes to allow user to choose shift type and enter start and end times of shift. I know in VB 6 I have used control arrays which has vastly simplified the whole code.
I have experimented with treating the text boxes as objects and trying to create a string with the first part of the name and using numbers to differentiate between the textboxes but Access does not seem to like this.
The code I have tried is below:
Dim obTextBox As TextBox
Dim str As String
str = "Forms!frm_Shift_Entry_3!txtFST2"
‘Set obTextBox = Forms!frm_Shift_Entry_3!txtFST
'Set obTextBox = str
obTextBox.Name = "txtFST2"
obTextBox.Value = Format("12:35", "Short Time")
'b = 7
'obTextBox.Name = "txtFST" & b
'obTextBox.Value = Format("17:12", "Short Time")
commented out sections are other options I have tried.
Can anyone point out any mistakes I’m making or advise whether this is possible in Access?
Thanks
Frozbie
I'm trying to create a simple embedded macro for a checkbox control on a form [Company?]. The default value for this checkbox is No.
I want to write an If statement that basically says "If[Company?] = Yes, then GotoControl[CompanyorNameCombo], Else GotoControl[CustomerFN]
Although the checkbox field label and the control itself IS named [Company?] in the table and set as a Yes/No field, when I try to write the If statement I get an error that says "Microsoft Access cannot find the name 'Company?' you entered in the expression"
That's the name of the control and it is included in the table and shows in the field list.
Could I change my unbound textbox (txtperiod) on the Report to display the time period.i.e.
Weekly, Monthly, Quarterly
Criteria is BeginDate and EndDate on main form.
I have an access form with tab control pages each with embedded forms.In one page I have a list of records as a datasheet form with the record identifier field configured as a hyperlink. When I click on this it passes its value to a form field in the form in the following tab page (works without the hyperlink but its a useful way of highlighting which field to click) which is a display/edit form of the details of the individual record. The Subroutine which does this sets the focus on this field it is passing the value to on the other form and the 'On Got Focus' event in that triggers the query that fills the editor form.
When I click back on the following tab to select another record to view/edit, the identifier value of the other record is passed to the other form but the data displayed in the rest form doesn't change. I understand this is because the field with the 'On Got Focus' never lost focus and so the query function was not called. To correct this I tried adding the same function call to the 'On Change' event however this does not work (the field is a text box set to 'locked' if that is relevant).I can get the form to do a new query properly if I click on a different field in the form before going back to the list tab or (as this is removing the focus allowing the On Got Focus to work again) if I click on a button to select a different record (which just takes me back to the list form).
Is there any way I can get this to work without having to manually remove the focus from the problem field? I have tried setting its On Got Focus event to move the focus to another field after the query function call however this prevents the Setfocus line in the code in the previous form from working. Here is a snippet of my code below.This code is for the list form and passes a value to the editing form:
Private Sub SalesID_Click()
Forms!Mainform.Requery
Forms!Mainform!Sales_Admin_Form!Sales_Admin_SalesI D.Value = SalesID.Value
Forms!Mainform!Sales_Admin_Form.SetFocus
Forms!Mainform!Sales_Admin_Form!Sales_Admin_SalesI D.SetFocus
[code]....
When I changed the memo field from plain text to Rich Text, I got the below divs and slashes. Is there any way to get rid of them?
<div>GC in process - EB1.</div>
<div>Â </div>
I had only "GC in process - EB1" in plain text.
We need to move rich text from an Access memo field to a Word text box. So far the best Ive been able to come up with is in the code below. In this code pprs!What is a record set field of a table memo field that is bound to a text box enabled for rich text. The rich text seems to be stored as html as so I can get word to convert it by enclosing it in html tags.
Dim What As Word.Shape
Set What = doc.Shapes.AddTextbox(msoTextOrientationHorizontal , doc.PageSetup.LeftMargin, 225, 534, 0)
Dim sPath As String
sPath = "G:Temp.html"
Open sPath For Output As 1
Print #1, "<HTML>" & pprs!What & " </HTML>"
Close #1
What.TextFrame.TextRange.InsertFile (sPath)
Is there a way of searching a rich text box for any text which is highlighted and then deleting that text? I cannot find an answer to this anywhere..
View 2 Replies View RelatedI have this code in a button on my Patient Form:
Code:
DoCmd.OpenForm "frm_Admissions", acNormal, , , acFormAdd, , "NHS Number|" & Me.[NHS Number]
And this in my Admissions form LoadEvent:
Code:
Private Sub Form_Load()
'Use this version if the ID is a number
Dim x As Variant
[Code]....
The expression you entered refers to an object that is closed or doesn't exist
Borrowed code from: [URL]
I am trying to search on EmployeeID field and populate corresponding data like EmployeeName, EmployeePay in other text boxes in the same box .
In my Unbound Form I have three unbound Text Boxes and one Command button:
txtEmpID
txtEmpName
txtEmpPay
cmdFind
In my table EMPLOYEE i have three fields
EmpID -- Autonumber
EmpName -- Text
EmpPay -- Text
I have a form with two text boxes and a button. I want to be able to type a value into the first Text box click the button and the second text box to be filled with the value which is stored in the Table.
The first Textbox is called barTxt, The second Textbox is called CustTxt The button is called SearchBtn and the Table is called BookInTable. I have been trying to use the code.
Code:
Private Sub SearchBtn_Click()
DoCmd.FindRecord Me.BarTxt.Value, , True, , True
CustTxt.Value = "SELECT BookInTable.Customer FROM BookInTable " & _
" WHERE Customer = """ & Nz(Me.BarTxt) & """" & _
" ORDER BY Customer"
End Sub
This however instead of displaying the Value for customer which is stored in the BookInTable. Displays The code SELECT BookInTable.Customer FROMBookInTable " & _ " WHERE Customer = """ & Nz(Me.BarTxt) & """" & _ " ORDER BY Customer"
I am wanting to populate a control in a form based off of two different fields in one table. Is that possible?I have a table called tblEmployeeMaster and it has a LastName column and a FirstName column in which I need to have both first and last name show up in one box on my form?
View 6 Replies View RelatedI have a form that contains a subform. On the main form, there are 3 fields: [IncidentNumber], [OpenDate] and [OpenTime]. The subform, [CtrlLog Detail] , contains the log entry details for each incident number. Every incident number can have many log entries. Two of the fields on the subform are [EntryDate] and [EntryTime]. The fields work correctly and the forms are fine.The issue Im having is when a new incident number is created the [OpenDate], [OpenTime] and [EntryDate], [EntryTime] MUST be equal because of some filter queries for statistics. Right now the user must physically type in the date/times in these 4 fields when they create a new incident number, which means I'm having lots of data entry errors.
Using default value on either [EntryDate] or [EntryTime] on the subform doesnt work because it doesnt create a primary key for the underlying table and the subform will not allow any other entry (due to some other linked values) until that PK is created. The forms are based on tables linked by [Activity_ID] as the primary key. I want to create some VBA code to see that if the Incident number is a new number (meaning the user must type in the new incident number creating the primary key for [Activity_ID]), that access will automatically populate the [EntryDate], [EntryTime] fields to match the [OpenDate], [OpenTime] fields on the main form. The user will manually populate the [OpenDate], [OpenTime].
If the number is an existing number (and the user is simply adding a log entry to the incident number) then I want [EntryDate], on the subform to default to the system date/time ([EntryTime] should remain blank for user entry) while keeping [OpenDate], [OpenTime] unchanged. When the [EntryDate], [EntryTime] fields are populated on creation of a new incident number, I want the PK for the underlying table ([Log_ID]) to be generated.
I have a database of books. I have a combobox listing 3 different status W M R.
W is for Whats next to read, M is for more books too read and R for books read or reading now. I can enter a new book by calling up the add a book form from any of those 3 forms.
If I forget to enter a letter in the combo box then the book is lost to those 3 forms as what they see depends on that status letter and I have to go to the table and enter a letter from there.
I want to know if I can auto populate the field (W M R) depending on which form opened the add a book form.
I have a .csv (MS Excel) file I need to import, but one of the fields contains rich text format text.
Is there anyway to clean this up before or after it is imported?
Thanks,
T.J.
I'm currently building my first database for a research project. When we enroll a participant, we need to have an enrollment date/time as well as an activation date/time (and they are not allowed to be the same because, rules). I was able to figure out how to auto-populate the current date/time when we've marked a person as enrolled. What I'm wondering is if it is also possible to auto-populate another field with the date/time, ten minutes in the future?
View 3 Replies View RelatedHi,
I have created forms in MS Access.. Now i want to attach Rich Text Format with each of the Text Box or Text Area... How can i do that...
I was trying to search for a plugin which would get attached with MS Access and then while creating the forms it would get attached with the Text Box and Text Areas..
Kindly please help me in getting a solution to this problem..
Thanking you,
with regards,
Kapil Sharma
how to make a line break in a rich textbox in access 2007? Chr(13) & Chr(10) worked until I changed the textbox to rich, which is necessary because certain words in the textbox need to be bold.
View 2 Replies View RelatedI have a table called Neutron2015. I want the current date and time to complete when entries are made in two other fields. So I am looking for this date and time to populate in EXLStart when an entry is made in Processed By, and also the current date and time to appear in EXLEnd when an entry is made in Completed By with the bold word being the field names.
Is this possible, and how difficult is it?
In my form's text box I have noticed that I can;t write paragraphs ie use the TAB key to start a new line. If I use rich text I assume this will be possible. But are there any disadvantages to using rich text?
View 1 Replies View RelatedI have 4 fields that are unbound on a form. img1 img2 img3 img4..When these are entered they are all combined and autofill another unbound textbox = imagename.. what i would like to do is from this unbound textbox 'imagename' ..i would like to populate a textbox that IS bound called FileName
[Event Procedure]
Private Sub imagename_Click()
Me.imagename = Me.FileName
End Sub
Hi..
I am using RTF2 ActiveX Control which enables me to include the Rict Text Controls in my Access Form.
I want to generate a doc document out of the information which i type in the RTF2 Area on the Access Form. And whatever Rich Text Format information i have written there (for eg in Bold, Italics, Indentation, Tables created, Bullets n Numbering etc), is retained as it is on the Doc document which i am generating with the help of bookmarks.
Please help in how do i do that 'coz i am not able to do it using the Rich Text Format...
Thanking you,
with regards,
Kapil Sharma
Can anyone help?!
We are trying to export some reports into a Rich Text format using Access on Office 2003 on a Win XP op system. When doing this on Win 98 the Rich text document was slightly out of line but not too bad. Now we are doing it on XP it is completely out of line and unusable. Does anyone have any suggestions please?
Regards
Richard