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

fleron
fleron (26.370 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 (41.060 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.584 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.584 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 (26.370 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.584 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 (41.060 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 (26.370 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 (41.060 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

Hvorfor er knap altid foran tekstboks?

Oprettet den 18. oktober 2014 kl. 07.57
contici giver 30 point for svar | Giv et svar »

Formel til bestemmelse af intervalværdi i celle A1

Oprettet den 17. oktober 2014 kl. 22.24
MC3390 giver 30 point for svar | Giv et svar »

Hjælp til formel

Oprettet den 17. oktober 2014 kl. 18.13
r.l giver 30 point for svar | Giv et svar »






Computerworld

Teaser billede

Slut med at vedhæfte filer til e-mails? Her er Microsofts nye løsning

Microsoft vil have e-mail-brugerne til at vedhæfte færre filer og i stedet udveksle dokumenterne på en anden måde.

Comon

Teaser billede

Apple-launch i aften: Nyt liv til iPad'en eller comeback til Mac'en

Apple er igen på trapperne med nye produkter, men hvad skal vi forvente?

Channelworld

Teaser billede

Apple-præsenterede nye ultra-tynde iPads og en ny pixel-verdensmester

Tyndere, skarpere og hurtigere. Aftenens iPad-præsentation var en Apple classic.

White paper

Teaser billede

Få overblik over it-ressourcerne

Med ERP for IT® fra Efecte opnår du fuld styring over it-driften, leverandører inkl. outsourcing og bliver agil i forhold til forandringer.



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