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


Emne lukketsammenstille data

 Besvar Besvar
Forfatter
BGE Se dropdown
Forum Begynder
Forum Begynder


Medlem: 31.Jan.2019
Land: DK
Status: Offline
Point: 5
Direkte link til dette indlæg Emne: sammenstille data
    Sendt: 31.Jan.2019 kl. 10:40
Hej
Nogen der har en ide til hvordan jeg samler data fra 2 regneark ud fra et ens felt.
Eksempel:
Regne ark 1: kolonne med tal(varenummer) samt 4 andre kolonner med data
Regne ark 2: Kolonne med tal(varenummer) samt 4 andre kolonner med data(forskellig fra ark 1)
 
Jeg vil gerne danne nyt ark hvor de 4 kolonner fra ark 2 tilføjes ark 1. Der er ikke nødvendigvis de samme varenumre i ark 1 og 2, så jeg har brug for en metode hvor jeg kan måle på varenummer.
 
På forhånd tak for svar.
Til top



Til top
Mads32 Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 26.Feb.2016
Land: Danmark
Status: Offline
Point: 1317
Direkte link til dette indlæg Sendt: 05.Feb.2019 kl. 10:07
Hej

Her er et eksempel på hvordan det kan gøres.

Til top
BGE Se dropdown
Forum Begynder
Forum Begynder


Medlem: 31.Jan.2019
Land: DK
Status: Offline
Point: 5
Direkte link til dette indlæg Sendt: 07.Feb.2019 kl. 20:04
Hej
Tak for løsningsforslag.
Jeg vil dog gerne have exel til at "sammenligne" varenumre, således at når samme varenummer findes på ark 1 og 2 skal data smides over i kolonne under det konkrete varenr i ark 1.
Jeg har prøvet at illustrere det i vedhæftede ark, hvor det er ark 1 og 2 som sammenstilles i ark 3 - her har jeg gjort det manuelt med copy, men findes der lettere metode?
Mappe1.xlsx
Til top
Skemalægger Se dropdown
Bronze bruger
Bronze bruger


Medlem: 27.Okt.2013
Land: Danmark
Status: Offline
Point: 92
Direkte link til dette indlæg Sendt: 08.Feb.2019 kl. 14:20
Hej,

En enkel version er at lave et skema, hvor alle numre og alle felter står fortløbende (Tilføjet her på ark 2)
Du kan så slå op i de to skemaer og trække varerne over.
Det efterlader dig dog med varenumre uden tilhørende oplysninger. dem har jeg sat til  at være lysegrå i skriftfarven. Du kan også vælge at fjerne vha filterfunktionen.

med VBA kode kunne man nemt skrive en udgave, der kun medtager de numre, der er oplysninger for.
Det kan sikkert også skrives uden VBA, men det kan jeg ikke lige gennemskue :0)

Var det sådan noget, du havde tænkt på? Hvis du kan løsningen, skal opslagsmatricer selvfølgelig ændres til noget større.

Mvh Skemalægger

Til top
BGE Se dropdown
Forum Begynder
Forum Begynder


Medlem: 31.Jan.2019
Land: DK
Status: Offline
Point: 5
Direkte link til dette indlæg Sendt: 10.Feb.2019 kl. 20:15
Hej Skemalægger.
Tak for svar.
Det bliver dog alt for omfattende i forhold til antallet af varenumre.
Jeg har aldrig benyttet VBA.
//bge
Til top
Skemalægger Se dropdown
Bronze bruger
Bronze bruger


Medlem: 27.Okt.2013
Land: Danmark
Status: Offline
Point: 92
Direkte link til dette indlæg Sendt: 10.Feb.2019 kl. 21:46
Hvor mange numre har du og i hvilket interval?

Den model, jeg lavede til dig kan suppleres med at man sletter alle de tomme linjer med en formel (eller med filtrer) , så man kun har de linjer tilbage med indhold.

Har jeg forstået problemet rigtigt?

Mvh SkemaLægger
Til top
Mads32 Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 26.Feb.2016
Land: Danmark
Status: Offline
Point: 1317
Direkte link til dette indlæg Sendt: 11.Feb.2019 kl. 21:36
Hej

Jeg har lavet et eksempel, hvor jeg anvender dine 2 dataark. og har optaget nogle makroer som jeg så har samlet i en makro der eksekveres ved at taste på en af knapperne på ark1 eller ark2.

Du kan indsætte flere data på arkene. Ialt 500 linjer på hvert ark. Data skal indsættes i de nu anvendte kolonner. Du må ikke ændre på ark-navne, eller flytte data til andre områder. Gør du det virker makroerne ikke som de skal.

Jeg hører gerne din reaktion.


Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5412
Direkte link til dette indlæg Sendt: 12.Feb.2019 kl. 07:47
Din kode er lidt lang (Tip: Brug ALDRIG .Select)
Koden kan kortes ned til:
Sub Samle_data_paa_ark4()

' Kopierer data fra ark1 og ark2 på ark4, og sorterer i stigende orden på varenummer.

Ark4.Range("B3:G2003").ClearContents
Ark1.Range("B3:E502").Copy Destination:=Ark4.Range("B3")
Ark2.Range("B3:E502").Copy Destination:=Ark4.Range("B" & Range("B" & Ark4.Rows.Count).End(xlUp).Row + 1)
     
With Ark4.Sort
    With .SortFields
          .Clear
          .Add Key:=Ark4.Range("B3:B1002"), SortOn:=xlSortOnValues, Order:=xlAscending, DataOption:=xlSortNormal
    End With
    .SetRange Ark4.Range("B3:G1002")
    .Header = xlGuess
    .MatchCase = False
    .Orientation = xlTopToBottom
    .SortMethod = xlPinYin
    .Apply
End With

End Sub
Med ovenstående kode opnår du osse den fordel, at du gerne må omdøbe dine regneark til, at hedde noget andet, da koden benytter arkenes kodenavne og ikke brugernavne.

Og, bemærk, især, hvordan jeg på intet tidspunkt benytter .Select Geek
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.
Til top
Mads32 Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 26.Feb.2016
Land: Danmark
Status: Offline
Point: 1317
Direkte link til dette indlæg Sendt: 12.Feb.2019 kl. 15:23
Hej Exelgaard.

Tak for dit indlæg.

Jeg er ikke så skrap til VBA, så når jeg skal bruge noget laver jeg nogle optagelser og kombinerer dem sammen,

De 2 første linjer er til at forstå, og til dels også linje 3. med koden der beskriver hvortil der skal kopieres fatter jeg ikke. Jeg må prøve at lege lidt med den.

Hvad er betydningen af With kommandoerne. 

Jeg håber at spørgeren BGE, kan bruge dit indlæg. Jeg markerer ikke med TAk, så vil spørgsmålet jo blive opfattet som lukket. Det overlader jeg til BGE









Til top
EXCELGAARD Se dropdown
Platin bruger
Platin bruger


Medlem: 27.Dec.2012
Land: Denmark
Status: Offline
Point: 5412
Direkte link til dette indlæg Sendt: 12.Feb.2019 kl. 15:48
Du lukker ikke spørgsmålet ved at give et 'Tak' Smile

Linje 3 i min kode indsætter så ment blot fra første tomme linje i arket.

With...End With benyttes til, at fortælle , at alt, hvad man benytter mellem With og End With skal ske på/med/i samme objekt...
...i dette tilfælde på sorteringsobjektet i 'Ark4'.
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.
Til top
BGE Se dropdown
Forum Begynder
Forum Begynder


Medlem: 31.Jan.2019
Land: DK
Status: Offline
Point: 5
Direkte link til dette indlæg Sendt: 15.Feb.2019 kl. 13:34
Hej
Problemet er at jeg har mange linier.
Jeg har fået et VBA forslag som jeg lige er ved at kigge på.
Tak for dine svar.
//bge
Til top
BGE Se dropdown
Forum Begynder
Forum Begynder


Medlem: 31.Jan.2019
Land: DK
Status: Offline
Point: 5
Direkte link til dette indlæg Sendt: 15.Feb.2019 kl. 13:55
Hej Mads32
Det var lige det jeg havde brug for.
Tak for det.
//bge
Til top
Mads32 Se dropdown
Guld bruger
Guld bruger
Avatar

Medlem: 26.Feb.2016
Land: Danmark
Status: Offline
Point: 1317
Direkte link til dette indlæg Sendt: 15.Feb.2019 kl. 20:46
Hej BGE


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. Dette for at lukke spørgsmålet
Til top
 Besvar Besvar

Skift forum Forum tilladelser Se dropdown

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