Sub IndsaetVaerdi() Application.Calculation = xlCalculationManual Dim c As Range For Each c In Selection c = c.Value Next Application.Calculation = xlCalculationAutomatic 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.