Zahlenformat nach Textimport

ich mache einen textimport mit Dezimalzahlen ,
da bei Stnadart mir die Zahlen gerundet werden habe ich
hier Text ausgewählt.
Nach dem Import ändere ich das Format der Spalten
mit Columns("E:E").Select
Selection.NumberFormat = "0.0000"
nur das Format wird nur übernohmen wenn ich in die Zellen
mit Doppelklick gehen und dann mit enter bestätige.

Wo liegt hier das problem.
Thanks Jörg