Hat er fertig gerechnet? Mein knapp 10 Jahre alter PC braucht etwa eine Minute:
In[1]:= Timing[NSolve[0.95 Log[w+4160.26] + 0.05 Log[w] == 11.46, w]]
Out[1]= {63.7576,{{w->90897.3}}}
und liefert es auf Wunsch auch genauer: 90897.274716928353539785823452701722...