virker ikke med sammenkøde tabellen

Set db = DAO.OpenDatabase("dit db navn")

db navn på backend ?
men den ligger ikke sammested hos alle og hedder ikke det samme hos alle brugere hvordam  løser jeg så problemet

og den skriver at handlingen er ugyldig

Hvad er det egentlig, du vil?
Ændre datatypen på feltet "Sec nummer" i tabellen "tbl_journal" til Text?

Hvorfor skal det gøres via kode? Hvis du retter det én gang manuelt i backenden, så gælder det jo for alle frontends!?

Eller har jeg misforstået problemet?

Jeg bruger følgende funktio til at returnere navnet på den tilknyttede datafil.
Handling ugyldig - det kan jeg ikke lige svare dig på. Jeg bruger metoden meget intenst når jeg opdaterer frontends hos mine kunder til en ny version der kræver oprettelse af nye felter eller tabeller i mine backends.

Public Function fhpLinked_MDB_Name() As String
' -----------------------------------------------------------------------------------
' Purpose      : Retrieve absolut filename of file containing first linked table
' Called from  :
' Returns      :
' Remarks      : If no linked tables found, current databasename is returned
' -----------------------------------------------------------------------------------
  Dim intX As Integer                                      'Testvariable
  Dim strTemp As String                                    'Tablename
  Dim dbs As DAO.Database                                  'Database variable
  Set dbs = CurrentDb                                      'Current database
   
  strTemp = ""                                              'Initialise tablename
  For intX = 0 To dbs.TableDefs.Count - 1                  'Loop all tables
    If dbs.TableDefs(intX).Connect <> "" Then              'If an linked table
      strTemp = dbs.TableDefs(intX).Connect                'Find datafile name
      strTemp = Mid(strTemp, (InStr(strTemp, "=") + 1), Len(strTemp))
    End If
  Next intX
 
  If strTemp <> "" Then                                    'If found a table name
    fhpLinked_MDB_Name = strTemp                            'Linked table found
  Else
    fhpLinked_MDB_Name = dbs.Name                          'No linked tables
  End If
 
  Set dbs = Nothing                                        'Release object
 
End Function

Hvad er det egentlig, du vil?
Ændre datatypen på feltet "Sec nummer" i tabellen "tbl_journal" til Text?

SVAR JA TAK.
MEN DET KAN JEG F.... IKKE FÅ TIL AT FUNGERE

Lige det at ændre en datatype tror jeg rent faktisk ikke at du kan !

You can NOT alter the data type for linked tables.

When you go into design view dont you get a message saying that some properties CAN NOT be modified?

you may be able to automate Access opening the other dB and altering the type, but I have NOT tried this myself.