Dansk Regneark Forum
  Hjælp Hjælp  Søg i forum   Arrangementer   Opret ny bruger Opret ny bruger  Log ind Log ind


Emne lukketAt ændre tal

 Besvar Besvar
Forfatter
larsJensen Se dropdown
Bronze bruger
Bronze bruger


Medlem: 28.Mar.2016
Land: Denmark
Status: Offline
Point: 72
Direkte link til dette indlæg Emne: At ændre tal
    Sendt: 18.Nov.2016 kl. 07:03
Tusind tak for svar begge to, men jeg har ikke haft tid til at kigge på det, og jeg fik heller ikke en mail om, at der har været indlæg.
Jeg har "desværre" en travl hverdag, men jeg vil kigge på jeres svar; da de ikke involverer VBA, er jeg fortrøstningsfuld. Wink
Til top



Til top
Bjarnehansen Se dropdown
Platin bruger
Platin bruger
Avatar

Medlem: 20.Nov.2011
Land: DK
Status: Offline
Point: 5509
Direkte link til dette indlæg Sendt: 13.Nov.2016 kl. 18:35
Så kan han selv arbejde videre med arket, men så har han også et ark han bare kan kopiere også bare ændre årstallet i A1

Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK
Til top
BQardi Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 11.Nov.2016
Land: Danmark
Status: Offline
Point: 100
Direkte link til dette indlæg Sendt: 13.Nov.2016 kl. 18:02
Exactly lige præcis:
Citat: Bjarnehansen Bjarnehansen skrev:

prøv at se på denne:
har lavet formelerne i D2-D6, E2, F2 og E40
det er i fanen beregning_2015 det er lavet.
Til top
Bjarnehansen Se dropdown
Platin bruger
Platin bruger
Avatar

Medlem: 20.Nov.2011
Land: DK
Status: Offline
Point: 5509
Direkte link til dette indlæg Sendt: 13.Nov.2016 kl. 17:28
prøv at se på denne:
har lavet formelerne i D2-D6, E2, F2 og E40
det er i fanen beregning_2015 det er lavet.

uploads/397/vagtskema_2016-11-13_11-32-00_bj.xlsx


Husk, at trykke på [Tak], hvis du kan lide et indlæg.
Husk, at trykke på [Accepteret Svar], hvis du kan bruge et løsningsforslag.
Med venlig hilsen - Bjarne Hansen - Microsoft 365 DK
Til top
BQardi Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 11.Nov.2016
Land: Danmark
Status: Offline
Point: 100
Direkte link til dette indlæg Sendt: 13.Nov.2016 kl. 12:08
Kan du ikke bare lave en søg/erstat?
søg efter "kalender_2017" og erstat med "kalender_2018"
og det samme med "beregning_2017" erstat med "kalender_2018"???

Ellers kan du kigge på formlen INDIREKTE og f.eks bruge celle A1 som reference til korrekt ark:
F.eks. i celle F34 kan du indsætte denne formel i stedet for den der allerede er der:
=INDIREKTE("beregning_"&A1&"!F34")

Hvis værdien i A1 = 2017 svarer det til denne formel:
=beregning_2017!F34
Hvis værdien i A1 = 2018 svarer det til denne formel:
=beregning_2018!F34

Det er umiddelbart slet ikke nødvendigt med VBA...

Er det sådan noget du er ude efter?
Til top
larsJensen Se dropdown
Bronze bruger
Bronze bruger


Medlem: 28.Mar.2016
Land: Denmark
Status: Offline
Point: 72
Direkte link til dette indlæg Sendt: 13.Nov.2016 kl. 11:44
uploads/1652/vagtskema_2016-11-13_11-32-00.xlsx

Jeg gør det, jeg kopierer/indsætter arkene, som jeg så tilretter.
Hvis du ser i arkene kalender_2018 & beregning_2018 under selve kalenderen, ser du en masse formler direkte fra arkene kalender_2017 & beregning_2017.
Som det er nu, bruger jeg noget tid på at rette 7-tallet i 2017 til 8-tallet i 2018; jeg skriver altså ikke noget 4-cifret tal.

Jeg tænkte så på, om noget kode kunne "se" 2017 eller 2018 o.s.v. og rette til det næste år.
Kan det i det hele taget lade sig gøre? Confused
Til top
BQardi Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 11.Nov.2016
Land: Danmark
Status: Offline
Point: 100
Direkte link til dette indlæg Sendt: 12.Nov.2016 kl. 21:03
Selvfølgelig:

1) Højreklik selve fanen og vælg "Vis kode" (mener det er det den hedder, sidder med en Engelsk version af Excel lige nu og der hedder det "View code")
2) Indsæt koden i det vindue der kommer frem (dette er hvad kaldes VBE = Visual Basic Editor)

That's it...

Når du herefter taster et 4 cifret tal ind i en hvilken som helst celle, ændres tallet til tallet + 1.
Når du indsætter flere værdier (kopieret andet steds fra) går koden igennem alle cellerne og ændrer tilsvarende.
Bemærk at ALLE 4 cifrede tal ændres, dvs. hvis du har et tal, som f.eks. et beløb eller et postnummer ændres disse også!
Koden ændrer kun tal hvor hele cellens indhold er et 4 cifret numerisk tal, dvs. hvis cellens indhold er f.eks. "Jeg er 1000 år gammel" ændres 1000 IKKE...
Hvis det er sådan noget du er ude efter må du lige sige til, så kan jeg ændre koden...
Hvis du vil have flere restriktioner på, f.eks. kun at ændre i kolonne "A" eller kun ændre tal mellem 2000 og 2099, må du ligeledes sige til...

HUSK ALTID AT TESTE KODEN PÅ ET EKSEMPEL ARK FØRST!
Til top
larsJensen Se dropdown
Bronze bruger
Bronze bruger


Medlem: 28.Mar.2016
Land: Denmark
Status: Offline
Point: 72
Direkte link til dette indlæg Sendt: 12.Nov.2016 kl. 12:50
Tusind tak for din respons, men VBA-kodning er for mig mere sort end sort. Ermm

Vil du være venlig at fortælle mig, trin for trin, hvad jeg skal gøre.
Til top
BQardi Se dropdown
Bronze bruger
Bronze bruger
Avatar

Medlem: 11.Nov.2016
Land: Danmark
Status: Offline
Point: 100
Direkte link til dette indlæg Sendt: 11.Nov.2016 kl. 20:28
Hvis du prøver at kopiere formler får du nok uventede resultater, så ved brug af denne kode må du altid indsætte kopierede data som værdier

Indsæt koden i ark-modulet for det ark hvori dine data skal kopieres til og ultimativt have ændret årstallene:

Private Sub Worksheet_Change(ByVal Target As Range)
Dim tgt As Range
For Each tgt In Target
    If tgt.Value Like "????" And IsNumeric(tgt.Value) Then
        Application.EnableEvents = False
        tgt.Value = tgt.Value + 1
        Application.EnableEvents = True
    End If
Next tgt
End Sub
Til top
larsJensen Se dropdown
Bronze bruger
Bronze bruger


Medlem: 28.Mar.2016
Land: Denmark
Status: Offline
Point: 72
Direkte link til dette indlæg Sendt: 04.Okt.2016 kl. 14:51
Er det muligt automatisk at rette et tal (f.eks. årstal), når man indsætter noget fra et andet ark?
Som det er nu, må jeg rette tallene manuelt, og taget over flere ark giver det ret mange rettelser.

Jeg kom så til at tænke på, om man kan skrive noget kode, som retter "2018" til "2019" og "2019" til 2020" og så fremdeles.
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

© 2010 - 2024 Dansk Regneark Forum - en del af Excel-regneark.dk