Search results

I changed up how I loaded it to this and it works like I want: Private Sub ComboBox1_Click() Dim vArray As Variant Dim i As Integer, s As String Dim cn As New ADODB.Connection Dim rst As New ADODB.Recordset ChDir "s:" With cn .Provider =...

I use docmd.open form... when I code in MS Access... but it doesn't seem to work with Excel... or maybe I don't have some reference loaded... IDK... FYI: I've coded many years in VBA in MS Access, but I have only been coding in excel for a very short time... When I looked up how to open forms...

I am populating a listbox from a query, whose criteria (i.e. where clause) comes from the OnClick event of a combobox, within Excel. Everything works fine when there's more than one record in the query's output. But if there's only one record my listbox wraps or stacks the two columns, instead...

I tried that, but it didn't work... it said "Object required" This worked though: Public gintSEARCH_CRITERIA As String Sub Button6_Click() gintSEARCH_CRITERIA = "COMMUNITY" Load frmCommunity frmCommunity.Show End Sub Thanks for the response, it made me think about when I need to...

Public gintSEARCH_CRITERIA As String Sub Button6_Click() Load frmCommunity gintSEARCH_CRITERIA = “COMMUNITY” frmCommunity.Show End SubWhenever I click on button6 I expect two things to happen: 1) my global variable gets set to "COMMUNITY" 2) the frmCommunity opens As it stands...

I have a similar issue... I was wondering if I could loop through a dataset within a Memo field and grab text values line by line... My problem is I don't know how to code for hard returns or lines... like how do I code to look for (or move to) the next line, take whatever is on that line and...

Yes, thanks... I appreciate your help, but I know what the SQL code looks like, for a subqeury. Although it might have read like that, that's not really what I was looking for. Writing this stuff down is a difficult thing sometimes. What I am asking is: can "one" use a recorset (RS) that has...

Let's say I have a recordset that looks something like: rsItem.open("Select ItemID from tblItem") Once I have established this recorset, is there a way I can make another recordset using the above recorset, but as a subquery? Something like rsMain.open("SELECT * FROM tblMAIN where ItemID...

Is there any way to modify the progress bar so instead of saying "running query" it states the name of the query? Like: Running Query [qryFRED] <progress bar> Thanks, Gary

Hmm... I just ran an ascii check using ASC() and it gave me the value 160... which is some weird symbol. So if I look for a value of chr(16) within Left([String],1) that does the trick.

I am having an issue with some imports. As you will be able to see from the attached Db file, some fields import into MS Access with a leading space in front. The problem is, Access doesn't seem to see it. For example, (in Query_1) I try to find the leading space with a Left and a Mid function...

I figure there's probably no way to do this, but I'll ask anyway... As I am moving through my code, I'd like there to be a pop-up box which asks the user to choose from a list of dates. This list of dates only resides in a filtered recordset in the background. Once the date is chosen, then my...

Yeah, I think I found the issue... there's a bunch of subforms connected to this form and layered ontop of each other... almost like a tab control... so how does the open form event work with multiple subforms? Do all the bound subforms have to make their connections before the On Open event of...

Yeah, good thought, but there's no autoexec macro... and the strange thing is that I can open other forms and nothing happens, but this form seems to kick off a bunch of underlying queries that run and run and run (even though it doesn't seem to have any bound table or query itself... Seems to...

So I have this database that has been passed over to me. It basically opens without the Objects Frame visible. I hit F11 and it shows... I am told there's a main form that kicks off the application. When I open this form it looks like a gazillion queries kick-off in the background... the...

After rereading this and looking at his Query... I think this version might be better... Dim db As Database Set db = CurrentDb Set rs = db.OpenRecordset("Corporate_Rate", dbOpenTable) If rs.RecordCount > 0 Then rs.MoveFirst Do While Not rs.EOF If...

UGh... yeah Thanks, I was trying to take out some comments as I was writing...in order to cut it down to the bare minimum...but I cut out any movement through the recordset... Yikes! Maybe this'll work... maybe not... Writing the code without the database is kind of like trying to play a game of...

I'll give it a shot... sorry if I miss something (I am sure the big Brains will catch it if I do). In your form (design mode) right click your "Second Tier Supplier Name" and choose properties. In the "On Change" area of the properties section, click the drop down arrow to the right and...

I saw this on the web: http://support.microsoft.com/kb/111304 It basically says change some text fields to memo fields. I saw another thread where the guy was having the same issue. They said the same thing to fix it (i.e. change text to memo), but that guy said when he changed all of the text...

Yep I understand... I am not splitting any database. I am baiscally chopping the table in half (meaning half of the columns are in one table (with a PK) and half in the other (with a PK) because when I attempt to run my process Access blows up to 1G and says "File too Large" So I run two...