Search results

Bob, Everything works good in the full version of ACC but now I'm having problems with Runtime. I get 429: ActiveX Can't create opbject. I tried to look up possible fixes but all of them seem be old fixes from 2-3 years ago. Any ideas for me? I just got Acc 2010, but have not installed it...

Bob, you're awesome. You make everything look so simple. It worked great! Thanks again.

As an amature programmer I trying to follow what this means, but am at a loss, sadly. Bob, Can you give me example code for this?

Thanks again. It worked great. But then the next thing I run into is how do I get past this code if the user does not open AccDB2. How do I check to see if AccDB2 is open at all and ignore this close code if it is not?

Thanks for your explaination. I'll give it a try.

Thanks Bob, you're a great source of information. I have a question about your code. When opening, the AccDB2 is declared in the OpenAcc(path to AccDB2). I'm clear about this. When closing, how do I know that I won't close AccDB1. I guess I'm hung up about 'closeCurrentDatabase'...

From time to time I have needed to open a second Access database to achieve the function I want. Example: to place a form on a second monitor (extended desktop). I don't know how to do this using a single instance of Access and am open to suggestions if you know how to open a form on a...

Can someone help me understand what is wrong with this array code? Dim myray(1 to 10) as string Dim strRay as string strRay = "1-2-3-4-5-6-7-8-9" myray() = split(strRay, "-") Dim y as integer for y = 0 to 9 msgbox y & ":" & myray(y) next y I'm trying to start my array at '1'. So why...

Thanks for the great advice.

Thanks, I'll give it a try. Great Idea.

If the field is set to "" after I press key 'Delete', then I should be able to: If myfield = "" Then msgbox "Field is empty" End If However, the field is not "". It just passes over this code. I've tried the same with IsNull(myfield) and myfield is not null. Any thoughts?

If I have a string in a field, select the whole field, then press the delete key, what is the value of the field? "", Null, or ?

Thanks Bob, you made me think in a different way, but this code works now. Private Sub cmdClose_Click() Dim retnForm As Form Set retnForm = Forms(Me.zForm) Dim Response If Me.zText <> Me.OrigText Then Response = MsgBox("Confirm Note Change" & vbCrLf &...

Isn't Me the opened formTextZoom? I want to return the text to the original form, then name of the form is in me.zForm. Can you explain?

Okay, I was able to get the Form!textZoom to load correctly with this code in a module. Public Sub OpenTextZoom(retForm As String, retField As String, OrigText As String, Optional zType As String) DoCmd.OpenForm "TextZoom" Forms!TextZoom.zText = OrigText...

Gemma, the down side of using the cmdZoomBox is that the text is all selected and if someone deletes the whole text then its a big problem, unless you can get the cursor to the end of the text with this method. This is why I've tried my own textZoom form..so I can get some control. Bob, It's...

Thanks Bob for your reply. I'm still stumped on how to pass the name of the form to the Public Sub. My form is 'ChartNotes' and the field is 'Notes'. So is this correct using the format that you have? Public Sub TextZoom(retForm As Form, retField As Control, zText As String, Optional zType...

I have created a textZoom form to be used like zoombox. I want to be able to set up a Public Sub textZoom(anyform as form, anyfield as field) so that I can use it with any form and any field, allow it to be edited or not, and then pass any changes back to the original field. I can't seem to...

No Change. I haven't seen it open a 2nd instance of word if that is what you mean. It just doesn't close the system file that is related to the template doc.

Okay I narrowed it down to this line: Set WordDoc = WordApp.Documents.Open(strDocName) But....If I run the code up to it and then step thru it, it doesn't open a system file. But If I run the code thru it to the next line, it opens the system file. Any ideas anyone?