CIO Tech Eksperten IT-JOB IT-Kurser Events Podcast Søg

Log ind eller opret profil

Du kan også logge ind via nedenstående tjenester

no-shit Nybegynder

02. maj 2005 - 15:42 Der er 9 kommentarer og
2 løsninger

En lille macro til udligelse af tal.

Jeg har brug for hjælp til en macro som gør følgende.

Mine tal står således i Excel:

-1500
-1200
-1000
-800
-100
100
150
500
1200
1500

Dem vil jeg gerne have "parret" således at hvis et negativt tal også findes i positiv skal det rykkes op ved siden af i en ny kollone. Så tallene kommer til at stå således:

-1500 1500
-1200 1200
-1000
-800
-100 100
150
500

Er der en som hurtigt kan hjælpe mig med at lave en macro til dette?

Synes godt om

kabbak Professor

02. maj 2005 - 17:09 #1

Sub Test()
For Each c In Selection
For Each T In Selection
If c < 0 Then
If T.Value - T.Value - T.Value = c.Value Then
c.Offset(0, 1) = T.Value
T.Value = ""
End If
End If
Next
Next
End Sub

der hvor den posigtive værdi var, bliver der en tom celle.

Kan du selv klare resten

Synes godt om

kabbak Professor

02. maj 2005 - 17:09 #2

marker alle dataceller inden kørsel

Synes godt om

kabbak Professor

02. maj 2005 - 17:15 #3

hvis du ikke har andre date der hører til, vil denne fjerne de tomme også

Sub Test()
For Each c In Selection
For Each T In Selection
If c < 0 Then
If T.Value - T.Value - T.Value = c.Value Then
c.Offset(0, 1) = T.Value
T.Delete Shift:=xlUp
End If
End If
Next
Next
End Sub

Synes godt om

oyejo Nybegynder

02. maj 2005 - 17:39 #4

Hei kabbak, jeg er imponert over hvor enkelt og elegant ting kan gjøres
.....
T.Value - T.Value - T.Value
er vel det samme som
T.Value * -1
oye

Synes godt om

kabbak Professor

02. maj 2005 - 17:40 #5

ja, såden kan det også skrives

Synes godt om

oyejo Nybegynder

25. maj 2005 - 08:28 #6

Heisann no-shit :-)
fikk du benyttet den flotte løsningen fra kabbak?
mvh
oye

Synes godt om

oyejo Nybegynder

01. august 2005 - 09:04 #7

Heisann kabbak.
jeg har lurt til meg 100 points på din flotte løsning :-)
http://www.eksperten.dk/spm/635687
Ettersom du ikke har fått noen points her kan vi dele.

oye

Synes godt om

oyejo Nybegynder

01. august 2005 - 09:06 #8

pointene ligger å venter her :

http://www.eksperten.dk/spm/636420

Synes godt om

no-shit Nybegynder

18. august 2005 - 16:01 #9

Ja fik det løst... Hvem vil have point?

Synes godt om

kabbak Professor

19. august 2005 - 22:08 #10

brugte du min løsning, så tak, ellers skal jeg ikke have nogen. ;-))

Synes godt om

kabbak Professor

25. januar 2006 - 22:52 #11

marker mit navn og tryk accepter, hvis det virkede

Synes godt om

Ny bruger Nybegynder

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.

Følg dette spørgsmål

Opret Preview

Excel kurser

Vi har et stort udvalg af Excel kurser. Find lige det kursus der passer dig lige her.

Se alle Excel kurser

Flere spørgsmål fra Excel kategorien

Titel	Indlæg	Oprettet	Seneste aktivitet
Betinget formatering Af Ninna i Excel	1	23/07/202413:03	23/07/202419:56
Opdater et ark Af lurup i Excel	2	22/07/202422:23	23/07/202416:41
Dato skema Af Ninna i Excel	7	22/07/202414:58	23/07/202419:55
Betinget formatering Af boro23 i Excel	2	22/07/202410:58	23/07/202407:14
Problem med beregning af alder udfra cpr-nummer; formel giver talfejl pga. nul i CPR Af HR Excel-bruger i Excel	6	16/07/202416:31	17/07/202408:36

Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten

Seneste artiklerRSS