========================================================================
 NetroTalk Meeting button for Outlook (Desktop)  —  works with ANY account
 (Gmail, Yahoo, IMAP, your own mail server — no Microsoft 365 needed)
========================================================================

This is an Outlook VBA macro. It adds a one-click "NetroTalk Meeting"
button that drops a fresh meeting link into the appointment you have open.

------------------------------------------------------------------------
STEP 1 — Open the macro editor
------------------------------------------------------------------------
  1. Open Outlook (the desktop app).
  2. Press  Alt + F11   (this opens the "Visual Basic" editor).

------------------------------------------------------------------------
STEP 2 — Paste the code into a MODULE (important!)
------------------------------------------------------------------------
  3. In the editor top menu click:  Insert  >  Module
     (a blank window titled "Module1" opens — this is the RIGHT place.
      Do NOT use "ThisOutlookSession" — macros there won't show up.)
  4. Paste EVERYTHING between the COPY lines below into Module1.
  5. Press  Ctrl + S  to save (it saves "VbaProject.OTM"). Close the editor.

------------------------------------------------------------------------
STEP 3 — Allow macros, then RESTART Outlook (do this BEFORE Step 4)
------------------------------------------------------------------------
  6. In Outlook:  File > Options > Trust Center > Trust Center Settings
     > Macro Settings  >  choose "Enable all macros" (simplest) or
     "Notifications for all macros"  >  OK.
  7. Fully CLOSE Outlook and re-open it. If a security bar/box appears,
     click "Enable Macros".
  8. Quick check: press  Alt + F8.  You should now see
     "AddNetroTalkMeeting" in the list. If you do, Step 4 will work.
     (If the list is empty, macros are still disabled — redo step 6+7.)

------------------------------------------------------------------------
STEP 4 — Add the button
------------------------------------------------------------------------
  9. File > Options > Quick Access Toolbar.
 10. In "Choose commands from", pick  Macros.
 11. Click  Project1.AddNetroTalkMeeting  >  Add >>  >  OK.

------------------------------------------------------------------------
HOW TO USE
------------------------------------------------------------------------
 - Open or create a Calendar appointment.
 - Click the NetroTalk button on the toolbar (top-left).
 - A NetroTalk meeting link is added to the invite. Send it as usual.


==================  COPY FROM HERE  ====================================

Sub AddNetroTalkMeeting()
    Dim insp As Outlook.Inspector
    Dim appt As Outlook.AppointmentItem
    Dim room As String, url As String, i As Integer

    Set insp = Application.ActiveInspector
    If insp Is Nothing Then
        MsgBox "Open a new Calendar appointment first, then click the button.", vbExclamation, "NetroTalk"
        Exit Sub
    End If
    If insp.CurrentItem.Class <> olAppointment Then
        MsgBox "This only works on a Calendar appointment.", vbExclamation, "NetroTalk"
        Exit Sub
    End If
    Set appt = insp.CurrentItem

    Randomize
    room = "ntalk-link-"
    For i = 1 To 12
        room = room & LCase(Hex(Int(Rnd() * 16)))
    Next i
    url = "https://netroapply.com/netrotalk/meet/" & room

    If Len(Trim(appt.Location)) = 0 Then appt.Location = url
    appt.Body = appt.Body & vbCrLf & vbCrLf & _
        "Join the NetroTalk meeting:" & vbCrLf & url
    MsgBox "NetroTalk meeting link added!" & vbCrLf & vbCrLf & url, vbInformation, "NetroTalk"
End Sub

==================  COPY TO HERE  ======================================