Boton Guardar en formulario Independiente ...

Enlaza los controles en sus propiedades>Datos>origen a los campos de una consulta o instruccion sql o bien usa:
PARA MODIFICAR.............................................................
Private Sub Modificar()
Dim sSQL As String
Dim db As DAO.Database
Dim rs As DAO.Recordset
Set db = DBEngine.Workspaces(0).Databases(0)
sSQL = "UPDATE Constructora SET Constructora.NombreConstructora = 'Perico'
WHERE Constructora.IdConstructora=" & Texto0
Set rs = db.OpenRecordset(sSQL)
Set db = Nothing
End Sub
============================================================
Nota
Lo anterior si IdConstructora tipo numerico.
Si IdConstructora tipo texto entonces... 
sSQL = "UPDATE Constructora SET Constructora.NombreConstructora = 'Perico'
WHERE Constructora.IdConstructora='" & Texto0 & "'"
 ============================================================
 
PARA ANEXAR..........................................................................
 
sSQL="INSERT INTO Constructora.NombreConstructora, Constructora.IdConstructora )
SELECT Constructora.NombreConstructora, Constructora.IdConstructora
FROM Constructora
WHERE Constructora.NombreConstructora='Jorge' AND Constructora.IdConstructora=6"

sSQL="INSERT INTO Constructora.NombreConstructora='Jorge', Constructora.IdConstructora=6 
SELECT Constructora.NombreConstructora, Constructora.IdConstructora
FROM Constructora"