Ok,
But the last "1" of the string "Wc1F1C1" does not multiply it: it remains after applying ToExpression.
In[1425]:= {ToExpression["Wc1F1C1"], ToExpression["1Wc1F1C1"],
ToExpression["2Wc1F1C1"], 2 ToExpression["2Wc1F1C1"],
ToExpression["2Wc1F1C1"] 2, ToExpression["2Wc1F1C1"]*2}
Out[1425]= {Wc1F1C1, Wc1F1C1, 2 Wc1F1C1, 4 Wc1F1C1, 4 Wc1F1C1,
4 Wc1F1C1}
Thanks.