Replies

Wendell,

Thanks for the followup.  Yes, there is VBA Code.   I have 7 references in the VBA project, and all appear to be there.  For the sake of expediency I added a module in VB to update the field using the ‘Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’ and looping through the recordset. 

Very strange.  FYI I am using Access 2003 SP3.

Thanks again.

Ken

Wendell,

Thanks for the followup.  Yes, there is VBA Code.   I have 7 references in the VBA project, and all appear to be there.  For the sake of expediency I added a module in VB to update the field using the ‘Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’ and looping through the recordset. 

Very strange.  FYI I am using Access 2003 SP3.

Thanks again.

Ken

Wendell,

Thanks for the followup.  Yes, there is VBA Code.   I have 7 references in the VBA project, and all appear to be there.  For the sake of expediency I added a module in VB to update the field using the ‘Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’ and looping through the recordset. 

Very strange.  FYI I am using Access 2003 SP3.

Thanks again.

Ken

Wendell,

Thanks for the followup.  Yes, there is VBA Code.   I have 7 references in the VBA project, and all appear to be there.  For the sake of expediency I added a module in VB to update the field using the ‘Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’ and looping through the recordset. 

Very strange.  FYI I am using Access 2003 SP3.

Thanks again.

Ken

Wendell,

Thanks for the followup.  Yes, there is VBA Code.   I have 7 references in the VBA project, and all appear to be there.  For the sake of expediency I added a module in VB to update the field using the ‘Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’ and looping through the recordset. 

Very strange.  FYI I am using Access 2003 SP3.

Thanks again.

Ken

For some reason I get the following message when trying to run a query with “SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)” as the Field to append to a table:

“Function is not available in expressions in query expression ‘SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’.”

Any ideas what would cause this?

Thanks,

Ken

For some reason I get the following message when trying to run a query with “SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)” as the Field to append to a table:

“Function is not available in expressions in query expression ‘SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’.”

Any ideas what would cause this?

Thanks,

Ken

For some reason I get the following message when trying to run a query with “SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)” as the Field to append to a table:

“Function is not available in expressions in query expression ‘SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’.”

Any ideas what would cause this?

Thanks,

Ken

For some reason I get the following message when trying to run a query with “SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)” as the Field to append to a table:

“Function is not available in expressions in query expression ‘SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’.”

Any ideas what would cause this?

Thanks,

Ken

For some reason I get the following message when trying to run a query with “SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)” as the Field to append to a table:

“Function is not available in expressions in query expression ‘SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’.”

Any ideas what would cause this?

Thanks,

Ken

For some reason I get the following message when trying to run a query with “SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)” as the Field to append to a table:

“Function is not available in expressions in query expression ‘SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’.”

Any ideas what would cause this?

Thanks,

Ken

For some reason I get the following message when trying to run a query with “SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)” as the Field to append to a table:

“Function is not available in expressions in query expression ‘SSN: Left([Field4],3) & Mid([Field4],5,2) & Right([Field4],4)’.”

Any ideas what would cause this?

Thanks,

Ken

Awesome.  Just another function (InStrRev) that I was not aware of.

THANKS! ! ! 

This worked.

Dim i As Integer

For i = 1 To Len(FileName)
[indent]    If Left(Right(FileName, i), 1) = “” Then
[/indent][indent][indent]        strFilenameonly = Right(FileName, i – 1)

        i = Len(FileName)

[/indent][/indent][indent]    End If
[/indent]Next i

Thanks

> Where do you find documentation for things like that?

In the Access VBA help.

> I am trying to actually get the tab itself to have the focus and not the first field on the tab. Is that possible?

Don’t think so.

Hans,

I tried setting the focus to a control on the form header, then Me.TabCtl0.Value = 3. Voila’, I get the results I want. I don’t know why, but it works.

THANK YOU for putting me on the right path.

Ken