Marker dine tal og kør makro - test lige på en kopi først
Sub Konverter() For Each c In Selection c.Value = Application.Substitute(c, ",", "") c.Value = Application.Substitute(c, ".", ",") c.Value = CDec(c) c.NumberFormat = "#,##0.00" Next End Sub
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.