Cómo eliminar un usuario de todas las bases de datos en SQL Server (con script completo)

USE master;
GO

DECLARE @UsuarioAEliminar NVARCHAR(128) = N'NOMBRE_USUARIO_AQUI'; -- Cambia esto por el nombre del usuario
DECLARE @SQL NVARCHAR(MAX);
DECLARE @DBName NVARCHAR(128);
DECLARE @ErrorMsg NVARCHAR(MAX);

-- Tabla temporal para registrar los resultados
IF OBJECT_ID('tempdb..#Resultados') IS NOT NULL DROP TABLE #Resultados;
CREATE TABLE #Resultados (
    BaseDeDatos NVARCHAR(128),
    UsuarioExiste BIT,
    AccionTomada NVARCHAR(MAX),
    MensajeError NVARCHAR(MAX)
);

-- Cursor para recorrer todas las bases de datos (excepto las de sistema)
DECLARE db_cursor CURSOR FOR
SELECT name
FROM sys.databases
WHERE state = 0 -- Solo bases de datos en línea
  AND is_read_only = 0 -- Excluye bases de datos de solo lectura
  AND name NOT IN ('master', 'tempdb', 'model', 'msdb'); -- Excluye bases de datos del sistema

OPEN db_cursor;
FETCH NEXT FROM db_cursor INTO @DBName;

WHILE @@FETCH_STATUS = 0
BEGIN
    SET @ErrorMsg = NULL;
    
    -- Script dinámico por cada base de datos
    SET @SQL = N'
    USE [' + @DBName + N'];
    IF EXISTS (SELECT 1 FROM sys.database_principals WHERE name = ''' + @UsuarioAEliminar + N''')
    BEGIN
        INSERT INTO #Resultados (BaseDeDatos, UsuarioExiste, AccionTomada, MensajeError)
        VALUES (''' + @DBName + N''', 1, ''Intentando eliminar usuario'', NULL);
        
        BEGIN TRY
            -- Transferir propiedad de esquemas a dbo
            DECLARE @SchemaSQL NVARCHAR(MAX) = '''';
            SELECT @SchemaSQL = @SchemaSQL + ''ALTER AUTHORIZATION ON SCHEMA::'' + QUOTENAME(name) + '' TO dbo; ''
            FROM sys.schemas
            WHERE principal_id = USER_ID(''' + @UsuarioAEliminar + N''');
            
            IF LEN(@SchemaSQL) > 0
            BEGIN
                EXEC(@SchemaSQL);
                INSERT INTO #Resultados (BaseDeDatos, UsuarioExiste, AccionTomada, MensajeError)
                VALUES (''' + @DBName + N''', 1, ''Propiedad de esquemas transferida a dbo'', NULL);
            END
            
            -- Eliminar usuario de roles
            DECLARE @RoleSQL NVARCHAR(MAX) = '''';
            SELECT @RoleSQL = @RoleSQL + ''ALTER ROLE '' + QUOTENAME(r.name) + '' DROP MEMBER '' + QUOTENAME(''' + @UsuarioAEliminar + N''') + ''; ''
            FROM sys.database_role_members rm
            JOIN sys.database_principals r ON rm.role_principal_id = r.principal_id
            JOIN sys.database_principals m ON rm.member_principal_id = m.principal_id
            WHERE m.name = ''' + @UsuarioAEliminar + N''';
            
            IF LEN(@RoleSQL) > 0
            BEGIN
                EXEC(@RoleSQL);
                INSERT INTO #Resultados (BaseDeDatos, UsuarioExiste, AccionTomada, MensajeError)
                VALUES (''' + @DBName + N''', 1, ''Usuario eliminado de roles de base de datos'', NULL);
            END
            
            -- Eliminar el usuario
            DROP USER [' + @UsuarioAEliminar + N'];
            
            INSERT INTO #Resultados (BaseDeDatos, UsuarioExiste, AccionTomada, MensajeError)
            VALUES (''' + @DBName + N''', 1, ''Usuario eliminado correctamente'', NULL);
        END TRY
        BEGIN CATCH
            INSERT INTO #Resultados (BaseDeDatos, UsuarioExiste, AccionTomada, MensajeError)
            VALUES (''' + @DBName + N''', 1, ''Error al eliminar usuario'', ERROR_MESSAGE());
        END CATCH
    END
    ELSE
    BEGIN
        INSERT INTO #Resultados (BaseDeDatos, UsuarioExiste, AccionTomada, MensajeError)
        VALUES (''' + @DBName + N''', 0, ''El usuario no existe en esta base de datos'', NULL);
    END';
    
    BEGIN TRY
        EXEC sp_executesql @SQL;
    END TRY
    BEGIN CATCH
        SET @ErrorMsg = ERROR_MESSAGE();
        INSERT INTO #Resultados (BaseDeDatos, UsuarioExiste, AccionTomada, MensajeError)
        VALUES (@DBName, NULL, 'Error accediendo a la base de datos', @ErrorMsg);
    END CATCH
    
    FETCH NEXT FROM db_cursor INTO @DBName;
END;

CLOSE db_cursor;
DEALLOCATE db_cursor;

-- Mostrar los resultados
SELECT BaseDeDatos, 
       CASE WHEN UsuarioExiste = 1 THEN 'Sí' WHEN UsuarioExiste = 0 THEN 'No' ELSE 'Desconocido' END AS UsuarioExiste,
       AccionTomada, 
       MensajeError
FROM #Resultados
ORDER BY BaseDeDatos;

DROP TABLE #Resultados;