| Forfatter |
 Emne Søg  Emne funktioner
|
mqu 
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
 Emne: Hvordan sammenfletter jeg to ark?
Sendt: 28.Jun.2017 kl. 14:13 |
|
Jeg har to ark, hvor ark A indeholder 3600 rækker, mens ark B har 800 rækker.
Ark B indeholder rettelser på 800 rækker i ark A.
Hvordan sammenfletter jeg lettest de to ark, så jeg ikke skal gøre det manuelt?
Dvs. hvordan får jeg rækkerne fra ark B over på de tilsvarende pladser i ark A?
|
 |
|
|
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
 Accepteret svar
Sendt: 29.Jun.2017 kl. 11:18 |
Yeps - du kan ikke ændre i faste værdier med formler - du er nødt til at bruge en makro... ...men, som du (forhåbentligt) kan se i den makro, som jeg allerede har lavet til dig, så er det egentligt meget simpelt, når først man lige kender syntaksen (og, den rigtige problem stilling  )
|
|
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.
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Sendt: 29.Jun.2017 kl. 08:26 |
|
Jeg ville lave en hurtig makro, der gennemløber alle celler i 'UsedRange' i 'Ark B', og kopiere celle indholdet over i 'Ark A'.
|
|
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.
|
|
mqu
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
Sendt: 29.Jun.2017 kl. 08:30 |
|
Tak, det lyder meget godt, men hvordan laver jeg så denne makro? :)
Jeg bruger btw Excel 2010.
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Sendt: 29.Jun.2017 kl. 09:13 |
Prøv med denne her:
Sub Flyt_Fra_Ark_B_Til_Ark_A()
' * ' Initialize
On Error Resume Next
' * ' Define variables
Dim Fra As Excel.Worksheet
Set Fra = Sheets("Ark B")
Dim Til As Excel.Worksheet
Set Til = Sheets("Ark A")
Dim Celle As Excel.Range
' * ' Move all data in 'UsedRange'
For Each Celle In Fra.UsedRange.Cells
If Celle.Value <> "" Then Til.Range(Celle.Address).Value = Celle.Value
Next
ES: ' End of Sub
Set Fra = Nothing
Set Til = Nothing
Set Celle = Nothing
End Sub |
Se her, hvordan du indsætter makroer i dine egne regnearksfiler: www.excelgaard.dk/Bib/Makroer/Indsaet/ www.excelgaard.dk/Bib/Makroer/Indsaet/
|
|
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.
|
|
mqu
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
Sendt: 29.Jun.2017 kl. 09:28 |
|
Nu har jeg oprettet ovenstående makro, men hvordan gør jeg så det sidste; Hvordan får jeg så data fra ark B over til Ark A?
Skal jeg markere noget eller hvordan?
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Sendt: 29.Jun.2017 kl. 09:40 |
Jah, du skal jo køre makroen Under båndet, 'Vis', skulle der gerne være en knap, yderst til højre, der giver dig mulighed for at køre makroer. Vær opmærksom på de to steder i koden, hvor jeg sætter de to regneark - jeg har blot antaget, at de har navnene, 'Ark A' og 'Ark B'. Hvis de hedder noget andet, så skal du naturligvis huske, at ændre dette i makro koden.
|
|
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.
|
|
mqu
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
Sendt: 29.Jun.2017 kl. 09:44 |
|
Jeg er næsten i mål nu.
Sidste problem er, at de 800 rettelser fra ark B fortrænger de første 800 pladser i ark B...
Kan jeg løse det ved at indsætte 800 blanke felter i ark A eller giver det nye problemer? :)
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Sendt: 29.Jun.2017 kl. 09:50 |
 Sidste problem er, at de 800 rettelser fra ark B fortrænger de første 800 pladser i ark B... |
Jamen, det er vel også det, som du beder om:
| hvordan får jeg rækkerne fra ark B over på de tilsvarende pladser i ark A? |
Men, jo, du kan blot indsætte det antal rækker, som du ønsker skal udgøre det samme antal rækker fra kilde arket.
|
|
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.
|
|
mqu
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
Sendt: 29.Jun.2017 kl. 10:04 |
|
Hmm tror ikke jeg har været tydelig nok...
Jeg har i ark A eksempelvis følgende
Indhold i celle (cellenavn):
x (A1), y (B1), z (C1), Jens Jensen Automobil ApS (D1), Jens Jensen (E1), Mekaniker (F1), elbil-værkstedet (G1), Kongevejen 500 (H1), Ågerup (I1), 4000 (J1), Roskilde (K1), Danmark (L1).
I ark B derimod er der en adresseændring, så det nu ser ud som følger:
x (A1), y (B1), z (C1), Jens Jensen Automobil ApS (D1), Jens Jensen
(E1), Mekaniker (F1), elbil-værkstedet (G1), Kongevejen 410 (H1), Ågerup
(I1), 4000 (J1), Roskilde (K1), Danmark (L1).
I stedet for at sidde og taste alle adresseændringerne søger jeg en makro, der kan gøre det for mig, dvs. overskrive en række i ark A med en rettet udgave som kommer fra ark B.
Med den nuværende makro står både den originale adresse og den rettede adresse der, hvilket ikke er meningen.
Håber du kan hjælpe for din hjælp indtil videre har bragt mig et langt stykke af vejen :)
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Sendt: 29.Jun.2017 kl. 10:26 |
|
Det som du beder om, er jo netop, hvad makroen gør: Overskriver samme celle i 'A' med indholdet i 'B'...
...så, hvis 'B' har ændret sig, vil 'A' komme til at få indholdet af 'B'.
Forudsat, at tingene står i samme celler - hvilket dit eksempel jo viser, at de gør.
Så?!?
|
|
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.
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Sendt: 29.Jun.2017 kl. 10:44 |
Alternativt er du nødt til at uploade et regneark, med følgende faneblade: Ark A med dine originale data. Ark B med dine rettelser. Ark C som du forventer Ark A skal se ud, efter makroen er kørt.
|
|
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.
|
|
mqu
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
Sendt: 29.Jun.2017 kl. 10:45 |
|
Problemet er, at de 800 rækker, der skal ændres og som er i ark B, står spredt i ark A, der indeholder i alt 3500 rækker.
Jeg vil godt have flettet eksempelvis række 1 i ark B ind på række 42 i ark A på en automatisk måde, da det tager lang tid at opdatere manuelt...
Samme virksomhed optræder med flere personer, så man kan kun identificere den rigtige række ved at kigge på både kolonne D (virksomhedsnavn) og E (modtagernavn). Det er derfor jeg leder efter en anden måde at gøre det på end ved at bruge en af Excels eksisterende funktioner...
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Sendt: 29.Jun.2017 kl. 10:48 |
Jamen, se det er jo en helt anden snak - det var jo slet ikke, hvad du skrev - og, for øvrigt, heller ikke, hvad du gav som eksempel... Men, som jeg skrev: upload et regneark, med følgende faneblade:
Ark A med dine originale data.
Ark B med dine rettelser.
Ark C som du forventer Ark A skal se ud, efter makroen er kørt.
|
|
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.
|
|
mqu
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
Sendt: 29.Jun.2017 kl. 10:49 |
Beklager i så fald. Jeg kan ikke uploade arket pga. fortrolighed med nogle af adresserne, så jeg må prøve videre på egen hånd. Tusind tak for hjælpen :)
|
|
mqu
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
Sendt: 29.Jun.2017 kl. 10:51 |
|
Men er det jeg ønsker egentlig muligt?
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Sendt: 29.Jun.2017 kl. 11:10 |
|
Ja
|
|
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.
|
|
mqu
Forum Begynder
Medlem: 28.Jun.2017
Land: Danmark
Status: Offline
Point: 9
|
Sendt: 29.Jun.2017 kl. 11:11 |
|
Foregår det så også via makroer?
|
|
EXCELGAARD
Platin bruger
Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5479
|
Accepteret svar
Sendt: 29.Jun.2017 kl. 11:18 |
Yeps - du kan ikke ændre i faste værdier med formler - du er nødt til at bruge en makro... ...men, som du (forhåbentligt) kan se i den makro, som jeg allerede har lavet til dig, så er det egentligt meget simpelt, når først man lige kender syntaksen (og, den rigtige problem stilling )
|
|
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.
|
|
Forum start
Forummets regler
Sådan uploader du filer
Del dine regneark
Excel-regneark.dk
Hvordan sammenfletter jeg to ark?