I will try and keep this brief. I have a paragraph of text, I have to paste it into a system which allows me 75 characters in a line and 208 in a page.
I have code which creates text boxes dynamically based on the total amount of characters/208 - this gives me how many textboxes need creating. I also have code which then populates those textboxes 208 characters at a time. I now need to alter it so it puts a line break every 75 characters.
Code:
Private Sub btnsubmit_Click()
DoCmd.OpenForm "NoteForm", acDesign
Dim x As Integer
Dim ctrl As Control
Dim y As Integer
[Code] ....
So I've achieved almost what I want, I just need to amend it so it starts a new line after every 75 characters...
When UseDDelivery is checked the three textboxes should be disable and when the form is opened UseDDelivery is set to be checked by default so the textboxes should be disabled when the form opens but they aren't. the two different ways of doing it are shown below.
Elements specific to my system :UseDDelivery = checkbox AltDeliveryAddress = textbox1 AltDeliveryTown = textbox 2 AltdeliveryPostcode = textbox3 Solution 1:
This is a bit of vba a friend wrote for me quickly, it includes all three textboxes but the checkbox enables them instead of disables.
solution 2:
Code: Private Sub UseDDelivery_AfterUpdate() If AltDeliveryAddress.Enabled = True Then AltDeliveryAddress.Enabled = False Else AltDeliveryAddress.Enabled = True End If End Sub
With this bit of vba I found the checkbox enables the textbox instead of disabling it and I can't figure out how to include the other two textboxes
In Access 2007, I'm using labels as buttons because they can be made pretty. Since labels can't have focus, the focus is not shifted from whatever textbox users are in on button press. The value in that textbox is not considered updated when the macro runs, and things get messy from there.
I had been using a setfocus between two textboxes to work around this, but that seems like a copout. I now have a simple form with just a textbox and a button, so this seems like a good time to learn the right way to do this.
I need to add trim to all text boxes in my database. Any easier way than to add it to the afterupdate event of every text box or a complete list of all trims on buttons that save the records?
I want to check to see if ALL textboxes are blank, then issue a message. My "Select Case" statement and "If" statement does not work. How can I accomplish this ? Below is what I have.
Blank = Null Select Case Blank Case strChartOfAccts1, strChartOfAccts2, strChartOfAccts3, strChartOfAccts4, strChartOfAccts5 & _
I want to know a way of populating unbound textboxes with data from a table without using the easy assigning data in the property of the box. I want it to be all done with code, which to me isnt a huge deal but I've yet to find answers on the web pertaining to this issue.
for example:
Say i was searching a primary key in one box and based on what ever is typed in i'd like it to populate the rest of the textboxes.
I have multiple reports that use similar IIF statements as the controlsource for four textboxes. Naturally, I don't want to have to update twelve controlsources if any of the calculations change, so I thought I'd make this a public function. However, I don't know how to pass along multiple textboxes as variables. Here's what I have so far:
Code: Option Compare Database Public Function txtColor(ByRef textbox As Control) Dim str1, str2, str3, str4 As String 'The IIf statement is simplified for this example. It's not important. str1 = "=IIf(IsNull([Inquiry start date]),'W',IIf([txtInquiry]<1 And IsNull([Inquiry end date]),'R'))"
[Code] ....
And this is in the report (where ??? is what I'm asking about)
Code: Private Sub Report_Load() Call txtColor(???) End Sub
L=Letter , X=number. Examples consisting of three parts (it can be more than three).
1. LLLLXXXXXX_LLLLXXXXXX_LLLLXXXXXX OR 2. LLLLXXXXXX LLLLXXXXXX LLLLXXXXXX OR 3. LLLLXXXXXX&LLLLXXXXXX&LLLLXXXXXX OR 4. LLLL_LLLLXXXXXX&LLLLXXXXXX OR 5. LL LLLLXXXXXX&LLLLXXXXXX
I would like to develop a function that takes a string that is made up of three parts or more and each part is separated by an underscore "_", space, or "&". There is no character that takes precedence over the other. It will always be only a single character which seperates the parts.
The check will always be done from the left. It should carry out the following actions:
1. Display all characters from the left until it reaches the first seperator "_" underscore OR "space" or "&" 2. Check only Part1 if it is made up of 4 letters and the rest 6 numbers (see 1-3 above). If that is the case only return part 1. 3. If part one only has letters and no numbers (see above 4-5) return all parts. Part one can consist of two letters or more.
I have started the function for step 1 above that searches for the character "_" underscore and display all characters until the first "_" is reached. I would like to include the same for "Space" or "&" in this function.
Once that is done I would like to do step 2 and step 3.
Code: Function SearchforChar(strTest As String) As String Dim test2 As String Dim strUntil As String strUntil = "_" test2 = Left(strTest, InStr(1, strTest, strUntil) - 1)
[Code] ....
Answer3: Full name with all parts should be returned for all above four cases under situation 3.
I have a program that has been working for a year or so, it imports records form a text file created by a web site. Someone has entered a hex("1A", "A8" in a name field. It is shutting my program down. I tried a alphanumeric check to replace it and a length check to try and skip the record but the program thinks it is at the end of the file and quits reading records. Is there a way to get rid of characters like this in vba?
"5407 MUYF3I23 GIS..LE "
Here is what I have tried
Code: If Len(strread) <> 591 Then MsgBox "Invalid Record Read " & strread GoTo Skip_Loop End If If AlphaNumeric(CStr(Trim(Mid(strread, 32, 11)))) Then !HT_FName = CStr(Trim(Mid(strread, 32, 11)))
In attached file i am updating the YU field in YABANCI_UYRUKLULAR table where CALISMA_IZIN_NO fields is matching from YU table. But there is a problem after update i see one of the record's YU field is 10 character, it must be 11 character as in the YU table.
I've got a string variable with a value that could be typically
"ABCD|123|R"
The string needs to be split into its three parts, the pipe symbol being the separator. Then the middle numeric string must be converted back to a long.
I know i could do a loop which identifies each character in turn, but my question is:
Is there a VBA function that can pick out the position in the string of the "|" characters, so i dont need a loop ?
We have a spreadsheet that i upload onto a table, i use on of the fields to build a file path but if there is a special character it causes problems,i need to replace the below with spaces if they are in my field called path
ok i have a invoice form with Subform. Pesently i am doing somthing like this.
Ihave placed a code on the OnEnter event of the subform as such,
If isnull (Me.CustomerId) or me.CustomerID = "" then msgbox "Please Enter A Valid Customer ID",vbokonly,"Customer ID Needed" me.customerID.Setfocus End if
Now what i want is to ammend this code so that before entering inthe Invoice subform the code should check that CustoemrId, CustomerName and Employee Name is not blank. There should be some data in them. How can i make the code checks for the three textboxes instead of one.
I have a form with a bunch of Count totals in the footer.
There are 12 different areas with a number of projects in each area. So, I'm counting the total projects, and then I'm counting the instances of an area in the area column...12 times. In the query, I have 12 different Count fields, and in the footer of the form, I have Sum([Count]) for each area and one normal Count field for Total Projects. It works fine, until I have about 11 or more text boxes summing counts. Then I get #Error for all of them.
What's the magic Access limit for form-based functions like this? What's a better/faster/sleeker way of doing this?
I want to distribute an app that provides password access for a 6 month period after which time a new password has to be issued by me to the end user for them to continue. This means that I don't lose control of the programme.
Is this possible or are then other ideas to protect the app - I have looked at upsizing to MySQL but it is way beyond me, also I have looked at splitting the app and putting the back end on FTP - but apparently this doesn't work (albeit a good idea as I don't need any other programming skills). Any solution needs to be fairly simple please.
Hey guys, I asked a question before but not sure it's the right place and was difficult to explain anyway so I'll just upload my stuff here.
Basically its a school assignment that's making me so frustrated. progress was fast with tables and forms and reports but there are a few requirements i just dont KNOW how to do, not sure what to search for it the way of google either so it's making life hard.
so requirements are: Gold memebers can book a max 7 classes, silver 4 and bronze 2. Members cannot book 2 classes on the same day Classes cannot be over booked. must make in some form or other something that displays how many classes taken and how many classes are left to each member.
I know all this stuff probably falls under some very simple functions that I'm just not using correctly or have no idea exist but I've made no progess in days and it's such a horrible feeling! Please any help! I'm not asking you to complete my assignment I'm just asking you to shine the light my way!
ps, no code please, we havent got to that stage yet.
I have two queries combined into one query. The first query shows a sales summary by part number. No problem so far. The second query shows inventory by part number. No problem with that. Now, I combine the queries, and get only those results that appear in BOTH queries. In other words, if there is no inventory, I do not get zero in the inventory column, the entire result for that part number is skipped. How do I still display the results of the first query if there is no match in the second query?
I've happily been working with my new switchboard only to find it tells me I am limited to 8 entries. How does one get round this - create switchboards which link to switchboards, different pages of switchboard...I've got a bit lost and would much aprreciate any advice.
Hey guys, Was wondering, what is the recommended maximum size for Access databases? I've heard that for very large databases that oracle is preferred. Would Access be appropriate for something on the scope of 5000 records of roughly 6 text and 2 number fields? Do people ever notice performance effects on databases of that size?
Also are there any ways to help reduce the size of the database? Do you recommend change the default field sizes where appropriate and would this have a noticeable effect on a database of this size? Any other suggestions to help keep the database manageable, and functioning?
I'm basically trying to figure out if there's much to worry about here, before I start importing my data. Thanks.
