Kolom telt niet op

[snarf54]

Heb bestand met getallen gekopieerd uit in html bestand door kopieren en plakken.

Wat ik ook die mbt de notatie autosom werkt niet.
Tilk ik het getal over dan doet ie dat wel.

Zie soms wel eens icoontje rechts vsan de cel dan kan je tekst omzetten naar getal.
Maar dit icoontje is niet zichtbaar.

Is hier een oplossing voor ??

Alvast bedankt.

 

[CorVerm]

De getallen zijn geïmporteerd als tekst en tekst kun je niet optellen.
Kijk hier even hoe je tekst kunt converteren naar getallen.

 

[snarf54]

Hoi Cor
Bedankt
Maar plakken speciaal/vermenigvudigen en tekst naar kolommen werken niet.
Betreft hiet 2007 versie en kan de beoogde optie extra enz niet vinden.

Daar plakken special en tekst naar kolommen niet werken denk ik dat er toch iets "ingebakken" zit wat het omzetten naar werkelijke getallen tegenhoudt.

Mocht je nog andere ideeen hebben dan zijn ze welkom.

M.v.g.

 

[danny147]

Beste snarf54

Het probleem zit hem in de cel, omdat er achter elke waarde een spatie staat.
Stond deze er niet dan kon je de volgende formule gebruiken:

=A1*1 , maar deze doet het niet omwille van de spatie.

Dus dan maar met een formule om de waarde uit een tekst te halen, met deze :

=1*DEEL(A1;VERGELIJKEN(WAAR;ISGETAL(1*DEEL(A1;RIJ($A$1:$A$52);1));0);AANTAL(1*DEEL(A1;RIJ($A$1:$A$52);1))+1)

Afsluiten met SHIFT + CTRL + ENTER.
en slepen naar beneden.

Zie bestandje.

Groetjes Danny. :thumb:

 

[snarf54]

Wat een wijsheid allemaal.

Maar ik krijg het (nog) niet voorelkaar.
Bereik is van K18 t/m K38298
Dus heb ik A1 en A52 vervangen door resp K18/K38299
Dan heb ik nu staan
{=1*DEEL(K18;VERGELIJKEN(WAAR;ISGETAL(1*DEEL(K18;RIJ($K$18:$K$38298);1));0);AANTAL(1*DEEL(K18;RIJ($K$18:$K$38298);1))+1)}
Maar dan verschijnt dit als tekst.
Haal ik de { en } weg dan krijg ik fout in formule.
Snap nl niet goed hoe je afsluit met Shift + Ctrl + Enter.

 

[snb]

selecteer kolom K,
Menubalk/Data/Tekst naar kolommen
In hulpscherm
Gescheiden /volgende/volgende/datum /voltooien

Groen: knoppen
Blauw; keuzerondjes

 

[danny147]

Beste snarf54 :thumb:

Wat een wijsheid allemaal.

Snap nl niet goed hoe je afsluit met Shift + Ctrl + Enter.

Druk op SHIFT toets en tergelijkertijd op de CTRL toets en ENTER toets.
Alle drie tergelijkertijd indrukken.

Groetjes Danny. :thumb:

 

[popipipo]

=LEFT(A1;LEN(A1)-1)*1

Heb je hier iets aan?

 

[snarf54]

De oplossing van popipipo wekt !
Klasse.

Moest even nadenken hoe de opdrachten in het NL zijn (left kwam ik wel uit hoor...).

Nu nog 1 aanvullende vraag.

Wat zou de toevoeging moeten zijn er een cel is met geen waarde of als je deze zelf invult met nul ?

Nu geeft ie nl #waarde weer.

Zoveel lege cellen zijn er niet dus dat is ook nog wel een beetje manueel op te lossen maar ja als het in dezelfde formule kan dan zou dat mooi zijn...

 

[Ginger]

Het probleem is character 160...

Nog niet helemaal tot het einde, maar zo heb je in elk geval wel waardes staan die kan vermenigvuldigen met 1.

Sub VerwijderCharHonderdzestig()

    With Columns(1).SpecialCells(xlCellTypeConstants)
        .Replace What:=Chr(160), Replacement:=""
        .NumberFormat = "0.00"
    End With

End Sub

Groet, Leo

 

[popipipo]

als cel 'leeg' of 'nul' is kun je deze formule gebruiken:

=IF(OR(A1="";A1=0);"";LEFT(A1;LEN(A1)-1)*1)

=ALS(OF(A1="";A1=0);"";LINKS(A1;LENGTE(A1)-1)*1)

 

[snarf54]

@popipipo

Ga ik morgen even proberen.
Ben heel veel wijzer geworden...
Thx allen !

 

[Ginger]

...met een formule (ipv mijn VBA-voorstel) zou het dus ook zo kunnen...

NL     =SUBSTITUEREN(A1;TEKEN(160);"")*1

ENG    =SUBSTITUTE(A1;CHAR(160);"")*1

Groet, Leo