fylde ud fra specifik celle og nedad

Du kan bruge avanceret filter til formålet.

Hej hundevennen

Som jeg ser det er det nememst at lave en VBA kode til formålet:

Indsæt nedenstående i et modul

Fornavn står i kolone A
Efternavn i kolone B
Hvis der står et 1 tal i kolone C kommer de med på listen i kolone F

Sub Medtag()


\'Tæller rækker med navne i

række = 0

Do
    række = række + 1
Loop Until (Cells(række, 1) = \"\")

Range(\"F2\").Select

For n = 1 To række
    If Cells(n, 3) = 1 Then
        ActiveCell.FormulaR1C1 = Cells(n, 1) & \" \" & Cells(n, 2)
        ActiveCell.Offset(1, 0).Range(\"A1\").Select
    End If
Next n


End Sub

Mvh

Richardt

1. Data - Filter

Klik på filteret med den kolonne der er et-taller i, og du får vist navne med et-taller foran.

Jeg er forresten også hundeven.

Sig til, hvis du skal have yderligere hjælp til det avanceret filter.
Det er ganske enkelt at få et udpluk fra dit navnekartotek flyttet til et andet sted på arket, helt uden brug af VBA-kode.

Jeg sender dig også gerne et eksempel.

du har fat i noget af det rigtige, men det skulle gerne ske når jeg f.eks. skriver et 1 tal ud for en person, så dukker hans navn op på en liste et andet sted på arket og det næste 1 tal i kollonnen for navnet på næste til at \"liste\" sig under den første - lidt svært at forklare

Hej Hundevennen

Jeg er enig med janvogt i, at det avancerede filter også er en god mulighed.

Mvh

Richardt

Det er netop det der sker under avanceret filter ....

ok jeg prøver

Brugervejledning til Hundevennen

Opret i række 1 nogle overskrifter. F.eks. A1 Fornavn, B1 Efternavn og C1 Medtag.
Skriv 1 i C2.
Række 1 og 2 er nu dit kriterieområde.

Opret samme overskrifter i række 6 (det er vigtigt, at der er 3 tomme rækker imellem dit kriterieområde og listeområde) og skriv navnene nedenunder. Dette er nu dit listeområde, hvor du intaster dine navne og 1\'taller, hvis de skal medtages.

Nu vælger du menuen Data,Filter, Avanceret filter - en dialogboks fremkommer.

I \"Handling\" vælger du \"Kopier til et andet sted.
I Listeområdet vælger du din liste
I Kriterieområdet vælger du række 1 og 2 og kolone 1, 2 og 3 - det vil se sådan ud \"$A$1:$C$2\"
I Kopier til vælger du f.eks. F1

Tryk OK

Nu skulle det virke

Mvh

Richardt

jeg har nu afprøvet avanceret filter og det virker da, - men det er stadig ikke det produkt jeg vil frem til, - sorry
Jeg vil gerne kunne skrive f.eks 1 i A1 hvorefter det navn der står i B1 og B2 automatisk bliver kopieret over i et angivet område. f.eks F1 F2, - men da det drejer sig om ca. 200 personer/navne
der får et 1, 2 eller 3 tal ud for sig i kolonne
A og derefter skal lægge sig over i f.eks 3 forskellige definerede områder. f.eks formiddag - eftermiddag eller nat -  der hver i sær kan udskrives - der et slags vagtskema.

Hej Hundevennen

Som jeg ser det kan du ikke gøre det i en omgang, hvis du altså ikke vil programmere (se tidligere VDA kode, der sagtens kan udbygges med din ønskede funktionalitet). Men du kan køre det avancerede filter 3 gange efter hinanden, hvor du bare ændrer kriteriet og \"kopier til\" området.

Det med at du gerne vil have 1, 2 eller 3 i kolonne A er bare at ændre opstillingen.

Alternativt kan du optage hele forløbet i en makro (altså de 3 gange avanceret filter) og afspille det på en gang via Funktioner/makro/makroer.

Mvh

Richardt

Advanceret filter kan stadig anvendes.
Du kan lade dit kriterie stå i et særskilt felt (1,2 el. 3) og hver gang du opdaterer dette felt får du en særskilt liste automatisk.
Dette gøres ved at lægge det avancerede filter ind i en VBA-rutine.

Prøv at sende dit ark til mig, så skal jeg køre det på plads.
Indsæt evt. \"testdata\" i stedet for de rigtige navne.

jan_vogt_hansen@hotmail.com

Du kunne også lave tre ens pivottabeller.
Nummer som sidefelt, fornavn og e-navn som rækker og Antal (eller sum) af nummer som data.
Du vil nu i sidefelt kunne vælge 1, 2, eller 3 i hver af pivottabellerne.
hvis du har total med vil du kunne se hvor mange for der skal have vagt

Du skal selvfølgelig kun lave een pivottabel og så kopiere denne 2 gange. På den måde skal excel kun hente data een gang.

>>Hej JAN  har mailet en prøve til dig

Ark returneret!

arbejder på det - vil gerne udvidere med en enkelt kolonne foran fornavn

No problem ...

En tom kolonne?
Hvad skal den indeholde?
Sig til, hvis du får problemer med at ændre koden, så den virker.

hej jan hvis det er iorden mailer jeg den lige til dig - sådan som jeg gerne vil ha den til at se ud - har ændret lidt ved koden men den melder fejl