Search results

Hi, first the bad news - you won't be able to get the data to show on a dataasheet form - the closest you will get is to build on continuous form and size the fields so that it almost mimicks the look of a datasheet. Your button will then show. For the subform you shouldn't need a wizard i...

Hi Aj, unfortunately access won't accept having a string passed in like that as part of a where clause - it will accpet having values but not "yyy OR xxx". As a side note you a WHERE caluse should take the form of WHERE (((Table1.CustID)=1) Or ((Table1.CustID)=2)) rather than just WHERE...

Hi moose, the easiest way, if it suits would be to put on command button with SendKeys "^(f)" in its on_click event which will open up the standard office search box, alternatively you could ask your users to press ctrl-f HTH Drew

Hi MissC, at a blind guess you may have caused a namespace clash by using Count which is kind of reserved by Access. You also don't seem to have declared dbs anywhere. If that isn't it please post back which line is highlighted in blue when the function is called. I also noticed that there...

I agree with what charity posted above but wanted to post an alternative anyway... You can call your private var by making a public property in your form Dim intInt As Integer Private Sub Form_Open(Cancel As Integer) 'or whatever you are doing to ste the value of your var intInt = 23...

Hi aziz, by default VB passes arguments/parameters by reference ( you can also make this explicit if you want, which is a good idea for maintainance ), anything you do to the var in your function will directly alter the one you passed in - they are pointing to the same piece of memory, HTH Drew

Hi Philip, you could try 'if IsNull(Me.[TreatmentID])'instead, but are you sure that the field is null? if it's a string it may be "" instead, in which case you need 'if Me.[TreatmentID]=""'. As an ID ( integer? ) field it could also be 0, in which case 'if Me.[TreatmentID]=0' H some of TH, Drew

hi db, I've run the below and it seems to work okay - gets a bit slower on big memos ( ran it for 15,000 chars and had to wait a bit... ). I guess you may be able get it to go quicker if you just moved the data into another box or play about with strings, but this does at least work... Dim x...

Hi db, i don't think you're going to be able to do this with StrConv. You'll probably need to read the value of the field ( changing the first letter to UCASE ) and then hunt out ( instr() ) each . ( chr(46) ). Once you've found that '. ' read the following characters, as soon as you get to...

ahhh, of course! I was missing the background bit too. Thanks guys - my users will be most pleased [This message has been edited by KDg (edited 06-07-2001).]

Hi Tal & DT, what was the solution? can you post the relevant code - there's many times i've wanted to use a 'mouseover' but the closest i've come is a hideous mousemove that flashes with every twitch... many thanks Drew

Hi Again, to your second question - yes you can use that field to validate whatever you like. for the first, sorry you're right it will change all the records in your box and i don't believe there is any way around it. It shouldn't permanently change the settings though, unless you've gone...

Hi Harmony, if you drop the Active field into your combo box ( set it's width to 0 if you dont want to see it ) you can use something like Private Sub YourCOmboBox_AfterUpdate() If Me.YourCOmboBox.Column(1) Then Me.YourCOmboBox.FontItalic = False Else...

Hi down, if you've directly copied that code from your module then it's almost certainly the Dim intOption As Intege that's giving you a problem. Access is expecting you to have defined Intege as a data type somewhere, if you just drop an r on the end you should be sorted, HTH Drew

Hi d, you should be able to use FileCopy source, destination from within VBA, no need to shell HTH Drew [This message has been edited by KDg (edited 06-06-2001).]

Hi arage, this should probably be in the excel section but the answer is that the first with applies to the cell and the second to the font of the cell ( which is a property of the cell and behaves as its own object ). The details of the font are then set before the font with is exited and...

hmm, which version of Access are you on? it works on '97 - if you're on 2k then what you're looking for is Remove Filter/Sort, it used to be off the Records menu. You should just be able to change the 2 'r's to whatever it is now. If it's not the version then you'll need to get up the menu...

Hi ragc, if you go to http://www.access-programmers.co.uk/ubb/Forum7/HTML/001155.html it has most of the options on it, if not post back HTH Drew

I don't know to be honest, but you can see them by doing something like dim x as integer for x=1 to 50 debug.print environ(x) next there seem to be 46 on my pc but i guess it varies so you may need to up it from 50. The name you can call each of them with is then to the left of the =.

Hi arage, you need a for each loop like Dim ctl As Control Dim frm As Form Set frm = Me For Each ctl In frm If ctl.ControlType = acTextBox Then 'check for nulls/empties 'do whatever you wanna do End If Next if you have...