Search results

  1. GohDiamond

    Add a PseudoINDEX to ODBC Linked Tables in MS Access

    When you link a an ODBC table to MS Access you are asked during the process to Select a Unique Record Identifier. If you do not select one of the fields then the table will not be updateable. Why didn't you select a field? Perhaps you don't know which one to select, OR You may know that...
  2. GohDiamond

    Network Printer - Locked Print

    Hello, I'm working with several network printers. I'm trying to get access to Printer Properties to set up the Locked Print option as some reports are to be sent to SPECIFIC Printers, not the user's default printer. I'm trying to set this programmatically using VBA. The Locked Print function...
  3. GohDiamond

    Access.Application connection to WorkGroup Secured Database

    :banghead:I'm trying to connect to a 2nd MS Access database in order to get to the Forms collection When I'm connecting to a 2nd database with no security, no password, I can use: strPath = "C:\Path\To\remote\Database.accdb" Set appAccess = CreateObject("Access.Application")...
  4. GohDiamond

    Strange results on Join

    Hello ALL, Using Access 2013 here. I have 2 tables tbl_Profile - with UserIDs, User Names, and User Related data tbl_Assets - with AssetIDs, Asset Names, Asset OwnerID and Asset Related Data Asset OwnerIDs will always be one of the Profile UserIDs When running a query to get the NAME of...
  5. GohDiamond

    Downloading Alert when Opening a Workbook Programmatically

    I have an issue when opening an excel workbook programmatically. I'm using MS Access 2013 on Windows 8.1 Dim objExcel As Excel.Application Dim objSheet Set objExcel = CreateObject("Excel.Application") objExcel.DisplayAlerts = False objExcel.ScreenUpdating = False...
  6. GohDiamond

    Append to Sharepoint List

    Hello to All you SharePoint & Access Users, I'm trying to append a couple of records to a SharePoint list. I have all the necessary permissions to Read/Write(Contribute) to the List. One of the fields in the List is what SharePoint refers to as "Person or Groups" apparently a "multivalue" or...
  7. GohDiamond

    Print Current Record from Recordset

    Is there a way to print the current record from a dao.recordset? This is an exercise to compare data content. I have a table with 30 fields and thousands of rows (rs1). I'm comparing it with a copy of the same table (rs2) that has the same number of fields and the same rows and almost the same...
  8. GohDiamond

    INSERT ADO Recordset into Currentdb Table

    Function Write_rstADO_to_CurrdB_Table() 'Assumes you have already setup a DSN to your Server 'Assumes YOURDESTINATIONTABLE is the same structure as your SERVER.TABLE Dim cnnADO As ADODB.Connection Dim wkspDAO As DAO.Workspace Dim rstADO As ADODB.Recordset Dim rstDAO As DAO.Recordset ' Dim...
  9. GohDiamond

    Listing Field Properties with VBA

    Hello again, Is there a way to gain access to the Field Properties using VBA? I'm trying to loop thru the Tables in a database and find out the Fields that are indexed in each table. I can loop through the table Defs to get each table name and a list of Fields but I can't seems to get to the...
  10. GohDiamond

    Access.References Name or Description

    Is there a way to get the Full Name of Access.References programmatically? I can get the short name using: Function CheckReferences() Dim ref As Reference Dim refName As String For Each ref In Access.References Debug.Print ref.Name & " " & ref.FullPath & " " & ref.Major & "." & ref.Minor Next...
  11. GohDiamond

    When one criteria is NULL

    When one criteria needs to be NULL Hi guys, I'm stuck on a Query criteria. I'm trying to use a single query to display two recordsets. One is a subset of the other. I have a Managing Director and a a few Hiring Managers . They are associated with a number of job positions (60 Total). All of...
  12. GohDiamond

    Create Customized Shortcut Menu with commands that run customized functions

    I was about to ask a question then I stumbled on this code which I tried. It worked and so I thought I'd share it to save somebody else some pain or to inspire creativity. Sub CreateSimpleShortcutMenu() Dim cmbShortcutMenu As Office.CommandBar Dim cmbControl As...
  13. GohDiamond

    Question MS Access 2010 on Ent 7 - Database doesn't always open

    Hi, I'm wondering if anyone else has encountred this and maybe has some advice. I have a shared accdb, split FE/BE, BE resides in a LAN Directory with permissions limited to just a few users. The FE is on my desktop. The dB in it's location had been Trusted and Enabled. Nothing changed since the...
  14. GohDiamond

    Network User Name from VBA to SQL

    VBA: Public Function myNetUSER() myNetUSER = Environ("username") End Function SQL: SELECT myNetUser() AS NetworkID; Practical Usage: SELECT "Profile edited by: " & myNetUser() & " on " & Format(Date(),"m/d/yyyy") AS Authorized; Result Today: [ AUTHORIZED ] Profile edited by...
  15. GohDiamond

    Tip Changing Numbers to Strings(Text)

    This is primarily for my own benefit so I won't lose the knowledge. To convert a number to a string in MS Access SQL: NumbertoText: Cstr([Your Numeric Field]) If the Number is masked(Formatted) and you want to preseve the format Take for example a % between 0% and 100% Convert Percentage to a...
  16. GohDiamond

    Extract Names from Full Name

    I don't want to lose these. Model Full Name: "Jones, John P." (this was the one not in MS' examples) Last Name Extract = Jones lastN = IIf(InStr(1,[Model Full Name],",")=0,"",right([Model Full Name],len([Model Full Name] - (InStr(1,[Model Full Name],",")+2))) First Name Extract = John firstN...
  17. GohDiamond

    Remove HTML and RTF Tags from String

    Hiya, I'm using Access 2010. I'm trying to do something stupid so I'm getting stupid results, naturally. But I thought I'd run this by youz guyz and see what you think. I'm trying to append some text to a field used for comments for a Team Member profile. I don't really want to create a...
  18. GohDiamond

    Programmatically HIDE the Navigation Pane

    Is there a way to programmatically HIDE the Navigation pane? Something in the line of : Application.Currentdb.Options("NavPane").Display = False Thanks for your help Goh
  19. GohDiamond

    What's Funny about Access?

    Funny AS in Funny/HA HA, OR Funny/interesting, OR even Funny/wierd... I'm sure WITH all our LOVE/HATE RELATIONSHIPS WITH this APPLICATION we've still retained a MODULE of humor, or so we've been told after following the PROCEDURE to TRANSFER ouselves out of the asylum... Anyway, here's a...
  20. GohDiamond

    Edit Description in Table Properties in 2010

    Hey Folks, I'm working on converting a client's databases from version 2000/2003 to Verson 2010. I finally found the way to display the creation/modification dates. HOWEVER; I can't Add/Edit the Table Properties Description of the Linked Tables. I want to type/paste in the new path to the BE...
Top Bottom