You could try formatting with MakeBoxes (or maybe with Format). So here f[x,u] is the expression you type and the expression in the FullForm expression, but an InterpretationBox is used to specify the Output form of the expression. The InterpretationBox is applied to a List where the first expression gives the box formatting and the second expression gives the internal expression. (This is done because InterpretationBox has the Attribute HoldAllComplete and we may want to compute things to put in the first expression.) So, for example:

MakeBoxes[f[x_, u_], form : StandardForm | TraditionalForm] :=
 InterpretationBox[#1, #2] & @@ {StyleBox[
    ToBoxes[f[x] + B[x] Style[u, Red], form], 20, Bold], f[x, u]}
f[x, u]
% // FullForm 

You can turn off the formatting with:

MakeBoxes[f[x_, u_], form : StandardForm | TraditionalForm] =.
f[x, u]

Attachments:

Thanks for your reply!

I already tried it with Collect[], unfortunatly I have two input variables U = {F, p} and I dont know how to collect only those results containing U. Collecting F(x) is no issue, I set F and p to zero, but I relly don't know how to collect my Matrix B -> xdot = F(x)+B(x)U I somehow need to erase the other terms for collecting B, its too large for copy, paste it... Btw my system has order 8.

For any advice I would be very grateful