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!

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

Search results for query: *

  • Users: mwheads
  • Content: Threads
  • Order by date
  1. mwheads

    Copy / Re-Create Outlook PST with folder / subfolder structure only

    Hi All I am looking for some VBA code to copy all folders (no emails) to a new pst file. i.e. copy entire folder structure and subfolders to a new pst file with no data. I have a user with a very complex folder/subfolder structure in a 16GB PST. I want to start this user with exactly the same...
  2. mwheads

    Copy / Re-Create Outlook PST folder structure only

    Hi All I am looking for some code to copy all folders (no emails) to a new pst file. i.e. copy entire folder structure and subfolders to a new pst file with no data. I have a user with a very complex folder/subfolder structure in a 16GB PST. I want to start this user with the same structure in...
  3. mwheads

    Change excel sheet name programmatically

    Hi All Does anybody know the command to change the sheet name. I have a csv file which i convert to an excel file with the following code but I specifically require the sheet name to be "Sheet1" for sql import purposes Dim oEx oEx = CreateObject("Excel.Application")...
  4. mwheads

    Exporting an ntext field to excel

    Hi All (this is a small excerpt of what i'm trying to do) rs = oData.OpenRecordset("select convert(nvarchar(4000),substring(FREE_TEXT,1,15000)) from tblTable") oExcel = CreateObject("Excel.Application") oBook = oExcel.Workbooks.Add oSheet = oBook.Worksheets(1)...
  5. mwheads

    Activate all items in Outbox in "send mode"

    Hi All I have a bulk email process that Saves all of the messages to Drafts. I prefer it like that because I can spot check a few of the files before I send them. When the mail items are moved to Outbox, Send/Receive does not send the items because they are not marked in Italics and ready to...
  6. mwheads

    Mass emailing of snapshot reports

    Hi All Does anybody have any idea how to send each page of a report (as a snapshot attachment) to bulk email recipients. I have a report of 500+ pages (1 page per client), each with an individual report and specific email address, and I would like to send all in one routine. Is anybody...
  7. mwheads

    For Each...Next query

    Hi all I've been trying to execute a FOR...NEXT for a an AccRef field in the tblBuildingdetails table but it won't work. The min and max range of the AccRef is 0005 to 9999 but only about 300 of the AccRef's are in the table. I managed to export 9994 txt files when I only want the 300 that...
  8. mwheads

    No Text Qualifier for Delimited Export

    Hi All I have been trying to code a Delimited Export of a query with TransferText but I specifically need that Export with a Text Qualifier of <none>. If I do a manual export, I can release the file as I need it but a macro or coded version defaults the Text Qualifier to "". My code currently...
  9. mwheads

    Modulus 10 question (sum strings, don't carry 10)

    Hi All We have to produce a Hash total at the end of a banking export that sums strings but not carry 10 on any digits. i.e. +444444 (A1) +190807 (A2) =534241 (Result A3) I need to create a VBA function that can run down the column, using a NEXT function. The strings are actually all 32...
  10. mwheads

    Count instances of a character in a string

    Hi all I would like to know how to count instances of a character within a string. The character is always ">" The way i did it in excel that worked for me was: =LEN(A1)-LEN(SUBSTITUTE(A1,">","")) I need something similar (or better) for Access. thanks
  11. mwheads

    Isolate text within a string

    Hi All I would like to know how to isolate cetain text within a long string. e.g. If my full field is: "CHEQUE DEPOSIT J C BLOGGS BAWGE123" All I need to isolate in the query is the "BA" and the characters after that. All of our references start with a "BA" and the remaining is a definate...
  12. mwheads

    delete query (delete months that are &gt;=25 months old)

    Hi All What criteria do I use in a delete query if I want to keep a stock of 2 years and delete anything that is 25 Months+. Field name is Month I can get it right in days but not in months. Thanks
  13. mwheads

    Round up/down complication access/excel

    Hi Everyone Does anybody know why access rounds a differnent way to excel. I have an access query (with 2 decimal rounding and all amounts are certainly 2 decimals) that when outputted to excel will often give a total that is 0.01 difference from the same datasource. It is more of an irritaion...
  14. mwheads

    Warn user if Duplicate Exists

    Hi All I have got a BANKACCOUNT field that I don't want to make a indexed field but I want to warn the user with a messagebox (on exit of the BANKACCOUNT textbox) that the field exists for CONTRACTOR or list thereof. The user could then choose to use the existing record with a CASE Y/N or see...
  15. mwheads

    Find where Referencial Integrity Violation is?

    Is there any routine to isolate where a Referencial Integrity Violation error has occurred? I am trying to link two tables that were never linked before (with referencial integrity and cascade delete) but there is a violation somewhere. There are over 5000+ entries in both tables so its not...
  16. mwheads

    Delete record in 2 tables

    Hi All I would like a button to run code to prompt the user (InputBox) for a reference and then delete the record in the first table and then all records with that reference in the 2nd table. Field - SupplierReference tblTranactions - no duplicates (so only one to delete) tblLedgerPosting -...
  17. mwheads

    F = Date(YEAR(F)+1,MONTH(F),DAY(F))) will not work

    Hi Everyone I cannot get Date(YEAR(F)+1,MONTH(F),DAY(F))) to work in VBA but it works fine as a formula on a sheet. I am trying to use it in VBA: Sub RollOver() If Range("E1") = 12 Then Dim F As Object For Each F In Range("B1:B12") F = Date(YEAR(F)+1,MONTH(F),DAY(F)))...
  18. mwheads

    Prevent users closing application with X i.e must use switchboard

    Hi Everyone Is there a way with options (disable X) or VBA of preventing users from closing the application with the X. I want my users to only use the switchboard to enter and exit the database. thanks Paul
  19. mwheads

    Using a textbox to calculate like an excel cell

    Hi Everyone I would like to be able to use an unbound textbox to do a calcuation exactly the same way as an excel cell, before it is posted it to a bound textbox on a form. Is there a way? I.e. I would like to enter "=50+100-20+600" and it to calculate that string as excel would. PS. if I don't...
  20. mwheads

    Prohibit Special Characters in textboxes

    Hi Everyone I would like to prohibit my users from capturing special characters in textboxes (afterupdate)?? especially(',"=) I do a lot of delimited exports to excel and the use of these characters can really corrupt my entire batch. Thanks in advance Paul South Africa

Part and Inventory Search

Back
Top