Search results

Add: DoCmd.Maximize To the Form_Load() of whatever form you have set to autoopen. As to opening, I'd prefer: Private Sub Button_Click() Dim appAccess As Access.Application Set appAccess = CreateObject("Access.Application") 'Open database in Microsoft Access window...

When I copy a back end or a front end database from a storage medium to my harddrive, it doesn't end up as read only. So, I'm going to guess that it must be related to how you copied it or something.

+ literally combines the two 5 + 6 = 11 & concatenates the two -- it adds one to the end of the other 5 & 6 = 56

What do you mean, "as one record"? Anyway try this Private Sub StringDelimiter(aString as String, aDelimiter as String) Dim tempArray as Variant Dim i as Integer tempArray = Split(aString, aDelimiter, -1) For i = 0 to UBound(tempArray) 'Do whatever you need to do with 'each i, which is...

How do I tell which row was last selected in some record? I see that, when looking at a table/form based on a table/subform based on a query/etc., there is a black arrowhead next to the last row that had focus. How do I tell which one this is? And, more importantly, how do I reference...

StudentInfo ----- StudentNum StudentName etc. InstructorInfo ----- InstructorNum InstructorName etc. ClassInfo ----- StudentNum (related from StudentInfo) Name Grade StartDate EndDate Classes ----- InstructorNum (related from InstructorInfo) Name StartDate EndDateClasses will have rather...

Yes, you need to set the Visible property to something, either True or False. One of the two: .Visible = True .Visible = False I'm not sure what it is that you're trying to do. What populates the list box if it's completely unbound? What do you have its RowSource property set to? How do you...

I have a form based off my main table -- each record has its own number. If a person attempts to add a new record that has the same number as another record, normally Access just pops up the message noting that and stops the update. I'd like it to check such as soon as the person is done...

What sort of updating are you looking to do? And, if you're using Access to open and update the Excel sheet, why not use Access to update an Access table and base the form off that?

How do you test to see if the other form is open?

Oh, I always type my queries in straight SQL. I've never really gotten the hang of that grid thing and it always seems somewhat limiting. I put the public function in it's own module and it's all working fine now.

In the main table [App Info], the field [App Type] is a lookup to the table [App Types], which consists of a column of possible types. I added a second column to table [App Types] which I named QAR. In QAR, I added 11 rankings for 11 of the types. I now use the following SQL to pull up what I...

I have a list of people, all with types: Qual <-Lowest Pre A Pre B Pre C <-Highest "Pre *" is the highest, Qual is the lowest ranking. I'd like a SQL statement to to Order By: Reverse alphabetical order if it starts with a P, then alphabetical order for the rest. Something like this: ORDER BY...

What do you mean, "Add a new column to the query grid"? The SQL query is being created in VB -- it's not shown on the Queries list.

Where you putting that code in the query window (while looking at the query in SQL form)? I was putting it into the code for my main form. I tried to get this code to go with my query, but the Combo Box is still empty. stringORDERBY = " ORDER BY CleanName([App Info].[Last Name]);" & vbCrLf &...

I need to display the names as they are. O'Neal needs to appear as O'Neal, not as ONeal. But, those non-letter characters need to be ignored as far as sorting. So, the names should be sorted like this: ONeal, Barry O'Neal, Jack ONeal, William Jack should fall between Barry and Willam and the...

I'm not passing in the string to be replaced ByVal as I don't want to change the original string in the database -- if I was going to pass it ByVal, then I'd change this from a Function to a Sub. I'm also using one function, I think it will be slightly faster this way. What do you mean, "Use...

In a SQL query, I something like (going from memory): SELECT * FROM [App Info] ORDER BY Replace(Nz([App Info].[Last Name]), ' ', ''), Replace(Nz([App Info].[First Name]), ' ', '') I'd essentially like to use a Regular Expression in the SQL Replace, like: ORDER BY Replace(String...

Can more complex statements be put in Replace()? For instance, say: replace all / or . with ^ in someString or replace 67 with 59 in someString unless there's a 4 after the seven replace 67 with 59 unless it's 674, then don't touch it replace 67[!4] with 59?

I'm so sorry, Pat. My apologies.