Oprettet man. d. 14. januar 2013 kl. 11:23:55

fleron
fleron (25.955 point. Point ude: 460)


Flytte reference ved hjælp af regning

Jeg skal flytte en reference 7 pladser i samme kolonne.

Jeg har en reference der hedder: ='El-Produktion - 2013'!D7
Nedenunder har jeg et tilsvarende felt, men det skal være lig D14.
Jeg har ikke lyst til at sidde og oprette hele året manuelt, så jeg tænkte om man ved hjælp af +? kunne få referencen til at flytte sig, således man bare kan trække formlen ned over cellerne.

Når man skriver +7 lægger den bare 7 til værdien i D7, den flytter ikke referencen.

Jeg har også prøvet med ='El-Produktion - 2013'!$D$7, men uden held

Er der en venlig sjæl der kan løse dette?

Skrevet man. d. 14. januar 2013 kl. 12:02:35| #1

store-morten
store-morten (40.330 point)
I en tom kolonne:

='El-Produktion - 2013'!D7
7 rækker under
='El-Produktion - 2013'!D14

Marker fra ='El-Produktion - 2013'!D7 og 6 rækker under ='El-Produktion - 2013'!D14

Fyld ned så langt du behøver.
Med markering --> Søg og vælg --> Gå til speciel --> Vælg "Tomme celler" --> OK

Højreklik på den nye markering og vælg --> Slet. Vælg --> "Ryk celler opad" --> OK

Skrevet man. d. 14. januar 2013 kl. 12:40:57| #2

dkhanknu
dkhanknu (48.039 point)
Måske:

=FORSKYDNING('El-Produktion-2013'!$D$1;7*RÆKKE(2:2)-1;;;)

Skrevet man. d. 14. januar 2013 kl. 12:42:10| #3

dkhanknu
dkhanknu (48.039 point)
Om igen:

=FORSKYDNING('El-Produktion-2013'!$D$1;7*RÆKKE(1:1)-1;;;)

Formlen kopieres nedad.

Skrevet man. d. 14. januar 2013 kl. 16:59:00| #4

fleron
fleron (25.955 point)
Hej Begge

@Store-morten: Din løsning virker, omend den stadig er manuel med sletning af rækker :-)

@dkhanknu: Din formel er ikke helt korrekt - den virker ikke :-(
Prøvede selv med denne: =OFFSET('El-Produktion - 2013'!D7;7;0;1;1), men når jeg kopiere den nedad så skifter D7 til D8, D9, D10 o.s.v. hvor jeg gerne ville at den skiftede til D14, D21, D28 o.s.v. - Den skal blot lægge 7 til referencetallet.

Skrevet man. d. 14. januar 2013 kl. 17:08:47| #5

dkhanknu
dkhanknu (48.039 point)
Er du ikke lige lovlig skråsikker i din konstatering af, at det ikke virker?

Hans

http://gupl.dk/690115/

Skrevet søn. d. 20. januar 2013 kl. 13:45:22| #6

store-morten
store-morten (40.330 point)
Måske med en Makro?

I en tom kolonne:

='El-Produktion - 2013'!D7

Marker cellen, kør Makro: "Indsæt_formel"
Sub Indsæt_formel()

Start = ActiveCell.Address

Antal = InputBox("Indtast antal kopier")
If Antal = "" Then Exit Sub
Spring = InputBox("Indtast antal spring")
If Spring = "" Then Exit Sub

Application.ScreenUpdating = False

For i = 1 To Antal
    ActiveCell.Copy Destination:=ActiveCell.Offset(Spring, 0)
    ActiveCell.Offset(Spring, 0).Select
    Next i
   
Slut = ActiveCell.Address

Range(Start & ":" & Slut).SpecialCells(xlCellTypeBlanks).Select
Selection.Delete Shift:=xlUp
Range(Start).Select

Application.ScreenUpdating = True
End Sub

Skrevet man. d. 25. februar 2013 kl. 20:54:41| #7

fleron
fleron (25.955 point)
Hej igen.
Der kom lige noget privatliv ind over - så derfor blev mit excel problem nedprioriteret.

@Hans - Jeg kan få din løsning til at virke - smid et svar :-)
@Store-Morten - Jeg har ikke afprøvet din formel, og da jeg ikke kan gennemskue den = finde ud af at rette i den (hvis det behov skulle opstå) så vælger jeg at sige tak for input :-)

Mvh
Finn Fleron

Skrevet man. d. 25. februar 2013 kl. 21:11:14| #8

store-morten
store-morten (40.330 point)
Hej Finn.

#4
"@Store-morten: Din løsning virker, omend den stadig er manuel med sletning af rækker :-)"

Måske med en Makro?
I en tom kolonne:
='El-Produktion - 2013'!D7
Marker cellen, kør Makro: "Indsæt_formel"

Denne makro udfører det "Manuelle" med sletning af rækker.

Skrevet tir. d. 26. februar 2013 kl. 06:30:26| #9


Skriv et indlæg




Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] [img]link til billede[/img]
Web- og emailadresser omdannes automatisk til links

Log ind

   


Seneste spørgsmål

Opslag i kolonne, men kun indenfor rækker angivet ved...

Oprettet den 29. juli 2014 kl. 13.58
nyhavn18 giver 100 point for svar | Giv et svar »

Graf farve på søjler alt efter værdi (vba)

Oprettet den 29. juli 2014 kl. 10.20
kim1a giver 30 point for svar | Giv et svar »

Tæl hvis unikke forekomster over 2 kolonner hvis kriterie...

Oprettet den 29. juli 2014 kl. 09.28
KenneyD71 giver 200 point for svar | Giv et svar »

Seneste guides

Undgå reklamerne på iPad
Malwarebytes version 2.0





Computerworld

Teaser billede

Stortest af 23 programmer: Her er den mest sikre antivirus-løsning

En test af 23 antivirusprogrammer fortæller dig, hvor du får den bedste beskyttelse mod de trusler, du møder på nettet.

CIO

Teaser billede

Derfor ender store softwareprojekter som det rene juks

Store softwareprojekter ender alt for ofte i store problemer - og kan ligefrem true virksomhedens eksistens. Her er forklaringen.

Comon

Teaser billede

Masser af plads: Ny harddisk fra WD på seks terabyte

Western digital kommer nu med en ny harddisk i WD Red-serien på hele seks terabyte beregnet til NAS og målrettet mellemstore- og større virksomheder.

Channelworld

Teaser billede

Erklæret tilhænger af fastansatte har købt ... et freelancekonsulenthus

Scott/Tiger, som er svoren tilhænger af fastansatte konsulenter, har netop købt freelancekonsulenthuset Dana Consult kontant. Men det giver god mening, siger direktøren.

White paper

Teaser billede

Modernisering af legacy-it

Læs hvordan automatiserede værktøjer fra BluePhoenix kan understøtte modernisering af it, applikations- og databasemigrering samt test.



Udgiver · © 2014 Computerworld A/S · Hørkær 18 · 2730 Herlev · Tlf.: 77 300 300 · Fax: 77 300 301 · Brug af personoplysninger