Print side | Luk vindue

Skifte årstal i indtastningsark

Udskrevet fra: Dansk Regneark Forum
Kategori: Hjælp til regneark.
Forum navn: Formler
Forum beskrivelse: Hjælp til formler i regneark og/eller brugen af disse.
Web-adresse: https://forum.excel-regneark.dk/forum_posts.asp?TID=542
Udskrevet den: 05.Maj.2024 kl. 23:18


Emne: Skifte årstal i indtastningsark
Besked fra: Jens Jørgen
Emne: Skifte årstal i indtastningsark
Posteringsdato: 27.Nov.2011 kl. 16:41

Hej

Jeg har en indtastningsside, hvor der indtastes månedsresultater.

Jeg har lavet et ark hvor resultaterne flyttes hen, her kunne jeg godt tænke mig at der på forsiden var
en formel eller knap, hvor jeg kunne skifte årstal og flytte resultaterne til resultatarket, men nu til kolonnen
2012, kan man det og hvordan.

Jeg kører med excel 2010 Dansk



Svar:
Besked fra: Allan
Posteringsdato: 28.Nov.2011 kl. 10:27
Hej Jens Jørgen,
 
Jeg vil tro det kan lade sig gøre.
Har du mulighed for at uploade dit ark her til forummet?
 
//Allan


Besked fra: Jens Jørgen
Posteringsdato: 28.Nov.2011 kl. 18:35
Hej

Her er et let redigeret ark.
Indtastnings deler er Ark Anlæg, Ark Diagram Anlæg siger sig selv, Ark Sammentælling Anlæg er det ark hvor
diagrammerne henter sine data.
Du/I er meget velkommen til at komme med alle ændringsforslag

Vh.
Jens Jørgen

uploads/404/produktionsoversigt_A&B.xls" rel="nofollow - uploads/404/Produktionsoversigt.xlsm" rel="nofollow - uploads/404/Produktionsoversigt.xlsm


Besked fra: Allan
Posteringsdato: 28.Nov.2011 kl. 20:39
Hej Jens Jørgen,
 
Jeg kan ikke rigtig gennemskue hvad der skal kopieres over.
Nævn hvad knappen præcis skal gøre
 
F.eks.: Kopier indholdet af C4:C15 til arket Sammentælling Anlæg i cellerne H27:H38
 
//Allan


Besked fra: Jens Jørgen
Posteringsdato: 28.Nov.2011 kl. 20:49
Hej
C4:C19 skulle gerne være stedet hvor indtastning skal foretages, nu går indtastningen til G10:G21 "knappen" skulle gerne flytte data til H10:H21 og når vi når til 2013, så er det I10:I21

Jeg håber at svaret kan hjælpe

Jens Jørgen


Besked fra: Allan
Posteringsdato: 28.Nov.2011 kl. 21:26
Hej Jens Jørgen,
 
Prøv denne, jeg tror den virker som du ønsker.
uploads/1/Produktionsoversigt_2.xlsm - uploads/1/Produktionsoversigt_2.xlsm
 
//Allan


Besked fra: Jens Jørgen
Posteringsdato: 28.Nov.2011 kl. 23:07
Hej Allan

Det er lige sådan det skal være, TAK for det.
Jeg har godt nok et par tillægsspørgsmål til dine koder, jeg skal jo have dem kopieret til de andre indtastnings steder.
Kan jeg ikke få dig til at forklare mig hvordan nedenstående virker, jeg er klar over at nederste linie læser fra mit indtastningsark celle c4, men hvad c.Offset(-16,0) betyder er jeg ikke klar over
Øverste linie er jeg klar over er mit sammentællingsark, men hvordan du får A26:P26 til at gøre noget, forstår jeg ikke
 
For Each c In Ark2.Range("A26:P26").Cells
        If c.Value = År Then
            ÅrKol = c.Column
            c.Offset(-16, 0).Value = Ark4.Range("c4").Value

Venligst
Jens Jørgen


Besked fra: Jens Jørgen
Posteringsdato: 28.Nov.2011 kl. 23:48
Hej Igen Allan

Nu har jeg snart kikket mig skeløjet, men jeg har set noget af lyset, jeg har gennemskuet hvad A26:P26 gør, jeg har også gennemskuet hvad c.Offset(-16, 0 gør i forhold til A26:P26
Så langt så godt, er der så en "let" måde at kopierer makroer på
Venligst
Jens Jørgen


Besked fra: Allan
Posteringsdato: 29.Nov.2011 kl. 10:48
Hej igen,
 
Denne version vil registrere dem alle.
Måske ikke særlig elegant, men det gik hurtigt og det virker Wink
uploads/1/Produktionsoversigt_3.xlsm - uploads/1/Produktionsoversigt_3.xlsm
 
//Allan


Besked fra: Jens Jørgen
Posteringsdato: 29.Nov.2011 kl. 15:47
Hej Allan

TAK, MANGE TAK
Det er lige som det skal være, det er jo let at være mig, nu skal jeg bare have det givet et flot layout.

Igen MANGE TAK, jeg er meget taknemlig

Jens JørgenClapClapClapClapClapClapBig smileLOLSmile


Besked fra: Allan
Posteringsdato: 29.Nov.2011 kl. 18:32
Velbekomme Jens Jørgen og tak for din tilbagemelding.Big smile
 
//Allan


-------------
MVH

Allan
https://www.excel-regneark.dk" rel="nofollow - Excel-regneark.dk - Gratis skabeloner til Excel
Få over 120 ekstra funktioner med Danmarks bedste add-in



Print side | Luk vindue