getallen in kolom moeten negatief zijn

[Archipel]

Hallo Forumleden, Ik heb even een vraag over een flinke kolom met positieve getallen (bijv. 1234). Nou kom ik tot ontdekking dat deze getallen negatief moeten zijn en worden voorzien van een - teken (bijv. -1234).

Gemakshalve kun je alle getallen 1 voor 1 voorzien van een -teken, maar dan ben je nog wel even bezig. Misschien weten jullie hier wat op. De uitkomst van de cel is niet verkregen d.m.v. een formule.

M.v.g. A

 

[edmoor]

Met een simpele macro:

Sub Negatief()
    For i = 1 To Range("A1").End(xlDown).Row
        Cells(i, 1).Value = Cells(i, 1) * -1
    Next i
End Sub

 

[Senso]

Celeigenschappen aanpassen? Getal en daar de juiste notatie kiezen.

 

[Archipel]

Hoe moet dat dan? eerst de kolommen selecteren en dan?

 

[Senso]

Kolom selecteren > RMK = rechtermuisknop > Celeigenschappen > Getal > Kies Notatie > Negatieve getallen:
evt. Decimalen en Scheidingsteken aanpassen

Even met een hulpkolom

=B1*-1

en doortrekken.
Oude kolom verwijderen.

Bekijk bijlage Map1 met macro getallen pos naar neg.xlsm

Tabblad > Ontwikkelaars > Macro's > Negatief > Uitvoeren en klaar

Edmoor is geniaal en zijn salaris is 70 miljoen per jaar, daar kan ik niet tegenop.:d:d:d

 

[Haije]

OF zo:

zet in een willekeurige lege cel: -1
selecteer deze cel en druk op ctrl+c
selecteer nu de cellen met de getallen die negatief moeten worden
klik met rechter muisknop ergens in die selectie
kies plakken speciaal > plakken speciaal > vermenigvuldigen
klik OK

 

[Archipel]

Geweldig mensen, ik ben weer professioneel geholpen. Dank aan allen voor de snelle hulp.