Støv, fibre og metalliske partikler kan påvirke både uptime, levetid og driftssikkerhed. Derfor arbejder flere datacentre systematisk med contamination control.
Denne kode deler byerne ud i kolonne B og C så de skal være ledig.
Sub split() Dim x, y, z For x = 1 To ActiveSheet.UsedRange.Rows.Count For y = 1 To Len(Cells(x, 1)) If Mid(Cells(x, 1), y, 1) = " " Then z = y Next Cells(x, 2) = Left(Cells(x, 1), z) Cells(x, 3) = Right(Cells(x, 1), Len(Cells(x, 1)) - Len(Cells(x, 2))) 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.