Avatar billede Heiac Praktikant
28. august 2017 - 13:08 Der er 5 kommentarer

Samle 20 ark/fagner til et ark

Hej..

Jeg har det her ark med 20 fagner /ark der er opsat helt ens.

Jeg skal lave et opsamlingsark med kun dele af de forskellige ark. (fx kolonne C & D & F)

Hvordan samler jeg disse? og laver en tabel ud af de oplysninger jeg skal bruge på de forskellige ark?

Opsamlings arket er udfyldt med deres firma kode og navn (så skal jeg finde deres leder og sekretær m.m. til dette opsamlingsark.)

De andre 20 ark er opsat på følgende måde i kolonnerne (de ark jeg skal hente oplysningerne fra):
Firma navn , firma kode ,  leder,  Sekretær,  kontakt person  og mange flere oplysninger der ikke skal bruges.

Håber jeg har forklaret mig okay.. og at nogen kan hjælpe mig??

På forhånd mange tak..
Avatar billede Jan Hansen Ekspert
28. august 2017 - 13:14 #1
Er alle firma'er i alle ark eller er der et firma pr ark elller.......

Jan
Avatar billede Heiac Praktikant
28. august 2017 - 13:18 #2
Der er fx 2-8 forskellige firmaer i hvert ark og de skal så samlet til opsamlingsarket :)
Avatar billede Jan Hansen Ekspert
28. august 2017 - 14:44 #3
Prøv at sætte denne function i et modul:


Function Hlookup_AllSheets(opslag, matrix As Range, Række)
Application.Volatile
Dim ws As Worksheet
Dim StartArk As String
Dim x As Long
Dim var As Variant
StartArk = ActiveSheet.Name
For Each ws In ActiveWorkbook.Worksheets
    If ws.Name <> StartArk Then
        var = ws.Range(matrix.Address)
        For x = 1 To UBound(var, 2)
            If var(1, x) = opslag Then
                Hlookup_AllSheets = var(Række, x)
                Exit Function
            End If
        Next
    End If
Next
End Function


Virker som Lopslag dog på alle ark i workbook'en, minus det ark du stå i.

Jan
Avatar billede Jan Hansen Ekspert
28. august 2017 - 14:48 #4
eks i E1:

= Hlookup_AllSheets(A1;$A$2:$L$40;5)

Jan
Avatar billede Heiac Praktikant
31. august 2017 - 12:20 #5
Hej Jan

Mange tak for din hjælp...
Desværre er min computer på dansk, og jeg synes jeg har prøvet at gøre som du har skrevet, men det lykkes virkelig ikke..

Er der evt. en mail adresse eller et andet sted hvor jeg kan sende mit ark til også få lidt mere hjælp??
Avatar billede 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.

Loading billede Opret Preview
Kategori
Excel kurser for alle niveauer og behov – find det kursus, der passer til dig

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