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

MortenL Juniormester

18. juni 2018 - 14:11 Der er 5 kommentarer og
1 løsning

Hent reference 1 gang og ikke opdatere

Hej ComputerWorld

Prøver at forklare mit spørgsmål så præcist som muligt :)

Eksempel: Når der tastes en dato ind i A5, vil jeg gerne der i B5 hentes data ind fra A1. Når der så tastes data ind i A6, skal den så igen hente data ind i B6 stadig fra A1. Men hvis så data i A1 ændres, vil jeg gerne at det ikke ændres i B5, B6 osv. Men hvis jeg så taster en ny dato ind i A7, skal der i B7 hentes de nye data i A1...

Er det muligt at løse således når først data er hentet skal den ikke opdatere data..

På forhånd tak for hjælpen

Synes godt om

kim1a Ekspert

18. juni 2018 - 14:51 #1

Kun via vba

Synes godt om

jens48 Ekspert

18. juni 2018 - 14:53 #2

Prøv med:

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A5:A100")) Is Nothing Then 'ret A100 hvis nødvendigt
Target.Offset(0, 1) = Range("A1").Value
End If
End Sub

Synes godt om

MortenL Juniormester

26. juni 2018 - 07:47 #3

Tak for hjælpen.
Er det muligt en af jer vil kode det i et excel ark og sende det pr. mail f.eks.?
Jeg har ikke styr på VBA osv.. :(

Synes godt om

jens48 Ekspert

26. juni 2018 - 09:42 #4

Prøv selv først. Kopier hele koden fra #2, højreklik på fanebladet, vælg Vis Koder og indsæt koden der. Så skulle det virke.

Synes godt om

1 synes godt om dette

MortenL Juniormester

29. juni 2018 - 14:26 #5

Tak for det Jens, det virkede.
Hvis min A1 i stedet er placeret i et andet ark/fane, er det så muligt?

Synes godt om

jens48 Ekspert

29. juni 2018 - 21:28 #6

Se rettelsen i linje 3

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, Range("A5:A100")) Is Nothing Then 'ret A100 hvis nødvendigt
Target.Offset(0, 1) = Worksheets("Sheet2").Range("A1").Value ' ret Sheet2 hvis nødvendigt
End If
End Sub

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
Identificér og hent del af tekststreng Af TheLibrarian i Excel	1	I går 16:49	I går 21:00
Ændre nuller til ovenstående tekst Af boro23 i Excel	4	20/11/202410:44	20/11/202412:08
HVIS med datoer Af HHA i Excel	6	20/11/202408:31	20/11/202412:51
Numerisk liste Af AND i Excel	8	19/11/202414:05	19/11/202423:31
Ændre nuller til ovenstående tal Af boro23 i Excel	3	19/11/202409:39	19/11/202411:51

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