Mate, you are simply amazing. You pulled it off in such a simple manner. Much appreciate your help.
Cheers
AK
Note: Using Access 97 for back end A2002 for front end.
I have following data in a table and would like to split it into two field so that I have a field with all alpha and the other with numerals (last two digits)only. Could someone kindly give me a formuala to achieve this?
Type
BABY ACCESSORIES 8
BOOKS 4
CAMPING 1
CANDLES 1
CARDS & WRAP 26...
Yes I am aware of this but I have specfic requirements for the extract one of which is not to repeat values in the first two columns which I had to manage through a report. A query tends to produce full list. I need something like a pivot table with grouping of fields.
Cheers
AK
Note...
I have a report whose contents I use to export as csv data. In this report, I have a couple of fields with their Hide Duplicates property set to yes to meet my export data requirements. When I export the report, it works fine except for the fact that where there was a page break within the...
Thanks a lot John. I somehow missed your response and discovered only today that a neat solution was waiting for me. I appreciate your help and aplogise for belated appreciation.
Cheers
AK
Note: Using Access 97 for back end A2002 for front end.
Thanks PHV. Your first solution applies the right condition but does not produce any result. I have blank column. Perhaps you cannot apply the 'less than 10' condition when you enclose 10 in quotes. The second option applies globally and I need to restrict so that I only amend the data where...
I am using the following query to extract certain records in a table based on a text field:
SELECT tblCategoryBayCode.MasterNo, tblCategoryBayCode.BayCode, IIf(Left([Baycode],2)<10,"0"+[Baycode],"") AS Expr1
FROM tblCategoryBayCode;
The sample data is something like as under:
MasterNo...
I am exporting data from a query in Access which I need to upload to another system. Data extract looks like this:
9006 RECIPE BASES 1 9Y
9006 RECIPE BASES 2 9K 9K
9006 RECIPE BASES 3 9K 9K 9K
9006 RECIPE BASES 4 9K 9K 9K 9K
Unfortunately the system this data is...
Thanks. On a slightly different note, is it possible to use functions as part of the class module (that is triggered by 'on click' event on the form). I am hoping to use the same code to link to a number of command buttons on a form to export several extracts with different file names.
Cheers...
Thanks for the tip. If I may ask you or VBSlammer, my output is showing all column headings in addition to the header I wanted to show. Is there some way this can be turned off?
Cheers
AK
Note: Using Access 97 for back end A2002 for front end.
Thanks a lot. Even after adding ref, there was a compile error. But then your alternative solution worked. Much appreciate your help.
Cheers
AK
Note: Using Access 97 for back end A2002 for front end.
Thank you for your help. I tried to run the function but the following two declarations are causing problem as these are probably user defined. I am getting compile error that user defined type not defined.
Dim fso As New Scripting.FileSystemObject
Dim io As Scripting.TextStream
Could there...
I am exporting a query in text format using following command.
Sub ExpPricePoints()
DoCmd.TransferText acExportDelim, "Export Specification", "qPricePoints", "\\nhomadgffs002\Design\04 Revit Server\Price Points.txt", True
End Sub
I need to be able to show following text...
I have had to maintain an Access 97 version of DB which I later convert for certain Access 2002 version users. I need to prevent users from moving the form. Access 2002 has a form property 'Movable' which can do the trick but since I need to convert my DB from Access 97, I wonder if there is a...
...sfrm As Form, prp As Property
Set sfrm = Me!Schedule.Form
Set prp = sfrm!DateOpen1.Properties("Visible")
If sfrm!Dev_Code Like "*N*" Then
prp = True
Else
If Screen.ActiveControl.Name = "DateOpen1" Then
sfrm![PM].SetFocus
End If
prp =...
...met and put the code on current event. Something similar to the one shown below:
Private Sub Form_Current()
If [Schedule].Form![Dev_Code] Like "*N*" Then
Me![Schedule].Form![DateOpen1].Visible = True
Else
Me![Schedule].Form![DateOpen1].Visible = False
End If
End Sub
It works well but if...
Thanks Richard.
I am slightly better than basic user. So understand the need for PK. There is a PK in the underlying table.
I guess the code I had in the form had something to do with this as when I closed down the whole application and Access, and came back, this was fixed. For some reason...
I have created a form based on a single table. Nothing special, just an ordinary form to capture some details on issues raised.
I have noticed that when right clicking the scroll button to add a new record, not only that that the new record is saved without any addition to the record but if I...
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.