12. januar 2012 - 08:45Der er
12 kommentarer og 1 løsning
Konvertere tekst til tal
Jeg har et ark, hvor jeg har importeret nogle informationer fra en tekst fil.
Når informationerne er indlæst er de opdelt i forskellige kolonner. I kolonne 1 er der tal som er formateret som tekst. Disse "tekst" tal vil jeg gerne have konverteret til TAL, så jeg kan begynde at lave formler på tallene.
Jeg kan klikke på fejlkontrol og vælge "konverter til tal" ud for hver celle. Men jeg vil meget gerne have det automatiseret.
Jeg har prøvet at optage denne konvertering med makrooptager, men den viser ingenting.
Er der nogen der kan hjælpe mig med en VBA kode der konvertere alle celle i kolonne A til TAL.
Hvis I skal teste i jeres eget system er det blot at: 1. formetere en celle til tekst 2. skrive et tal
og efterfølgende se om I kan konvertere til et tal istedet for en tekst.
Gå ind her: Filer Indstillinger Avanceret . . . Visninger i dette regneark Fjern flueben i linien "vis et nul i celler, der indeholder nulværdi tryk OK
Marker hele kolonnen ( tryk på overskriftlinien ) Højreklik på en tilfældig celle i den markerede kolonne Tryk på formater celler... Vælg første faneblad "Tal" Tryk på "Tal" Nu kan du vælge hvor mange decimaler du vil have Tryk OK
Synes godt om
Slettet bruger
13. januar 2012 - 06:21#8
Prøv for eksempel følgende (der med enkelte modifikationer stammer fra en person ved navn Dave Peterson):
Sub Add_Zero() Set Rng = Range(Cells(1, "A"), Cells(Rows.Count, "A").End(xlUp))
Dim myHelperCell As Range Dim myRng As Range
Set myRng = Range(Cells(1, "A"), Cells(Rows.Count, "A").End(xlUp))
With ActiveSheet Set myHelperCell = .Cells.SpecialCells(xlCellTypeLastCell).Offset(1, 1) End With
With myRng .NumberFormat = "General" myHelperCell.Copy .PasteSpecial Operation:=xlAdd
Ingen point til mig. Jeg har kun copy/pasted. Hans
Synes godt om
Ny brugerNybegynder
Din løsning...
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.