Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

Register Log in
  • Congratulations Rhinorhino on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Recent content by darinmc

  1. darinmc

    Excel, checking a column and doing a calculation

    Thx I have done that now... Didnt really think about it.. Would have liked to see a macro, bit more flexibility and maybe try a bit of different programing. Any suggestions on finding good examples or samples? Thx darin
  2. darinmc

    Excel, checking a column and doing a calculation

    Hi I have no experience at macros in Excel. I would imagine i need to use the lookup function, but no idea in creating a macro and then formatting the colours! Col C - holds Invoice Date Created Col D - I would like to be the number of days since Inv created. When I run the macro, i would like...
  3. darinmc

    Removing specific text using chkBox

    Thx, i looked up the replace and found a simple example... Code below works Private Sub chkTsh_Click() If Me.chkTsh = True Then Me.tInvNote = "t/s " & Me.tInvNote Else Me.tInvNote = Replace(Me.tInvNote, "t/s ", "") End If End Sub Sample code found 'Dim MyString ' A binary comparison...
  4. darinmc

    Removing specific text using chkBox

    That wont work as i have 2 check boxes 1 inserts "t/s " the other inserts "e/t " these can be in any order, therefore i need it to find the specific keywords to remove Thx DArin
  5. darinmc

    Removing specific text using chkBox

    Hi I have a check box, that when clicked it inserts "t/s " at the beginning of a text box keeping other comments that may be in already... When I uncheck the box, I dont want the text box to be null, I want it to remove just the specific part, "t/s " Is this possibe? and how? Private Sub...
  6. darinmc

    Access Query Export - Append to Excel

    Hi I have a query and am using the below Dim StrFileName, StrFile StrFileName = "TEST100" StrFile = "\\Lynxserver\lynx\Payroll\NewEmployeesSAGE\" & StrFileName & ".csv" DoCmd.TransferText acExportDelim, , "SAGE UnionTEST", StrFile, False The csv file always has the same name How do I get the...
  7. darinmc

    Creating a CSV file from access - Using (full stop)

    Is there a way of exporting from access directly into the template, CSV file? I have been thinking of an easier solution and more practical one... Within a week, there could be between 1 and 15 + employees, what would be ideal is: When exporting from access, if i could do it directly into the...
  8. darinmc

    Creating a CSV file from access - Using (full stop)

    Hi Its a query I have in the database, I then click a command button to export as a txt file without headers. I would like to export it as a csv file with headers. The code is: (using the docmd.transfertext) Private Sub cmdNewEmptxt_Click() Dim StrFile, StrFileName, StrEmpNo, StrEmpName '---...
  9. darinmc

    Creating a CSV file from access - Using (full stop)

    Hi I have sort of asked this question before and was just wondering if it is possible at all??? I'm trying to get the data into a Sage Payroll CSV file, one of the problems is that the field name is: Contact Telephone No. in the query below, part of the code is: Null AS [Contact Telephone...
  10. darinmc

    InputBox - Validating

    Hi I have an InputBox and am trying to validate it... How do I force the user to ONLY type in numbers I.E. like an input mask? ##/##/## InpValue = InputBox(InpMsg, InpTitle) Dim InpTitle, InpMsg, InpDefault, InpDt Dim InpValue As Date InpMsg = "PLEASE ENTER INVOICE DATE - E.g. 23/05/07"...
  11. darinmc

    CSV file - Date

    Thx I tried the above but it didnt seem to do anything different... I'm trying to get the data into a Sage Payroll CSV file, one of the problems is that the field name is: Contact Telephone No. in the query below, part of the code is: Null AS [Contact Telephone No], I have tried quite a few...
  12. darinmc

    CSV file - Date

    Hi, I have this code to create a csv file Private Sub cmdTestCSV_Click() Dim StrFile StrFile = "\\Lynxserver\lynx\test" & ".csv" DoCmd.TransferText acExportDelim, , "SAGE EmployeeDetailsTemplate", StrFile, False End Sub Below is the query in Access... The field in BOLD/RED is a bank sort...
  13. darinmc

    Conditional Format, Continuous Forms

    The below code is taken from the module Public Sub setFrmInfo() Dim rs As DAO.Recordset Dim lngCount As Long Dim lngID As Long Dim strType As String DBEngine.SetOption dbMaxLocksPerFile, 20000 Set rs = CurrentDb.OpenRecordset("qryUtable", dbOpenDynaset) Form Load I have included...
  14. darinmc

    Conditional Format, Continuous Forms

    ok, I realise you put those commands [strFormInfo] = "OldOdd" into the conditional format... I will continue playing around with this as its starting to take shape now. Thx for the moment :-) Darin
  15. darinmc

    Conditional Format, Continuous Forms

    Hi Thx for that response.. I have rebuilt another form.. This works a lot quicker. I created the txt box [strFormInfo] and sized it along the row and with conditional format, the colour is now ok. [strFormInfo] = "OldEven" (yellow on yellow) [strFormInfo] = "OldOdd" (white on white) i'm...
See more

Part and Inventory Search

Back
Top