Search results

  1. X

    Query totals loses decimal amounts

    I've removed all the formats in the currecy columns and it seems to work properly. To be honest I don't understand why!
  2. X

    Conditional Formatting

    Try: [NewLineDesc]<>"#1" Or [NewLineDesc]<>"#2"
  3. X

    Can we change the tab color or icon with "tabbed document" forms?

    Simple database with some code that simulates to color the tab control label depending on the page selected. It could be possible with a similar approach to insert icons and change them depending on the page selected.
  4. X

    Solved problem opening a .csv file in excel - dates all messed up

    I don't know if this can help. When I import a CSV File to an Excel spreadsheet, I use some code similar to this one generated by ChatGPT where you can specify the type and date format of each column. (Not tested) Sub ImportCSVToExcelWithFormatting() Dim xlApp As Excel.Application Dim...
  5. X

    Format number with condition

    Instead of using the format property, I'd use the switch command and the format() function in the controlsource property to set the desired numeric format in the query.
  6. X

    How to read IP Address of 'actually used' lan nic?

    Perhaps you can get this information using PowerShell (by ChatGPT): Write-Host "Equipo local: $env:COMPUTERNAME`n" # Obtener adaptadores físicos que estén activos $adapters = Get-NetAdapter -Physical | Where-Object { $_.Status -eq 'Up' } foreach ($adapter in $adapters) { $name =...
  7. X

    Can we change the tab color or icon with "tabbed document" forms?

    I don't think it's a good idea to do this, but it's possible to create a blinking form caption using the form timer event. Tested only for fun! ;-)
  8. X

    No Options in File - Access Runtime 2021

    I use these utilities: https://www.accessribbon.de/en/?Trust_Center:Trusted_Locations
  9. X

    Database Properties - Did you know

    Thanks tvanstiphout, I've updated it to VBA7 to use it in 64 bit MS Access..
  10. X

    Can we change the tab color or icon with "tabbed document" forms?

    You can add an Unicode character to the form caption when a form is active. For example: Form1 selected: Form2 Selected
  11. X

    Database Properties - Did you know

    Yes! she is: https://web.archive.org/web/20180313165355/http://thatlldoit.com/Pages/default.aspx look at this link: http://www.youtube.com/user/LearnAccessByCrystal
  12. X

    Database Properties - Did you know

    It seems that it's by Crystal and crew.
  13. X

    Solved How to reinitialize a form with a fresh data-entry view?

    Perhaps something like this: Dim strRecordSource As String strRecordSource = Me.RecordSource Me.RecordSource = "Select * From [name of the table] Where 1=2" Me.Recordset.Requery Me.RecordSource = strRecordSource
  14. X

    Coloring checkboxes and option group buttons when selected with classes.

    This is an example of how to use a simple class to color selected labels in checkboxes and optiongroup controls. Example:
  15. X

    Solved Access Database Locking Issue

    Is MS your Access Updated? Do all the computters have the same MS Access version? This behaviour you have explained was an ACCESS bug that happened 1 or 2 years ago!
  16. X

    How to see the UN and PC Name of locked Records

    This video can help you to avoid records locked in editing mode:
  17. X

    Solved Adding Items to Combobox, but They aren't showing up

    I've tested your code and it works fine. The database names are added to the combobox and displayed
  18. X

    Conversion to 64-bit

    The API is similar to this other one: Public Declare PtrSafe Function GetFileInformationByHandle Lib "kernel32" Alias "GetFileInformationByHandle" (ByVal hFile As LongPtr, lpFileInformation As BY_HANDLE_FILE_INFORMATION) As Long so I guess the VBA7 version would be: Public Declare PtrSafe...
  19. X

    New Outlook

    If you use CDO, you can archive the full message as an *.eml file after sending it.
  20. X

    Solved How to send multiple attachment with CDO Gmail in MS Access VBA

    For example, if you want to send two attachments you can have two TextBoxes: Attachment1 and Attachment2, and for sendirng both files, you have to change the code: With Newmail If Not isNull(Me.Attachment1) Then .AddAttachment Me.Attachment1 Endif If Not...
Back
Top Bottom