VBA - EXCEL - unieke waarden

[MarkBrink89]

Beste Forumleden,

Ik ben al enige tijd op zoek naar een VBA code voor unieke waarden, de informatie die ik vind krijg ik niet goed aan het werk.

Wat wil ik bereiken: Wanneer er op een knop gedrukt wordt "brief printen" moeten er gegevens meegenomen worden naar de brief. Dit lukt prima met naam van een examinator en datum van afname, maar daarnaast moeten ook de opleidingen + fases meegenomen worden (die worden geëxamineerd).

In mijn Sheet is het als volgt ingedeeld Sheet November 2016:
Kolom opleiding (E13:E20)
Opleiding 1
Opleiding 2
Opleiding 2
Opleiding 1
Opleiding 2
Opleiding 1
Opleiding 1

Daarnaast een kolom fase (F13:E20)
Gevorderd
Gevorderd
Gevorderd
Basis
Basis
Gevorderd
Gevorderd

Deze moeten meegenomen worden naar sheet "Brief" in de cellen A20:A27, maar dan alleen de unieke waarden.
In dit geval:
Opleiding 1 - Gevorderd
Opleiding 2 - Gevorderd
Opleiding 2 - Basis
Opleiding 1 - Basis

Momenteel is mijn VBA als volgt:

Sub Brief_Examinator1()


Sheets("Examinatoren Brief").[M3].Formula = "='November 2016'!D59"
Sheets("Examinatoren Brief").[M2].Formula = "='November 2016'!B59"

Application.ScreenUpdating = False
Set GoBack = ActiveSheet


Sheets("Examinatoren Brief").Select
ActiveSheet.PageSetup.PrintArea = "$A$1:$K$86"

ActiveWindow.SelectedSheets.PrintPreview



    GoBack.Activate
    Application.ScreenUpdating = True
    
Range("F59").Value = "Afgedrukt"
End Sub

Ik hoop dat mijn wensen een beetje duidelijk zijn, mocht het niet zo zijn kan ik me best doen het nog een keer uit te leggen. Mijn excel bestand stuur ik niet meer vanwege
privé gegevens van mensen.

Alvast bedankt,

Mark

 

[OctaFish]

Mijn excel bestand stuur ik niet meer vanwege privé gegevens van mensen.

En toch is dat een stuk handiger; niemand vraagt je hier overigens om echte namen mee te sturen; dat mogen best fictieve namen zijn. Je moest eens weten hoe vaak Jan Klaassen en Katrien bij HelpMij gefigureerd hebben in een macrootje .

 

[MarkBrink89]

Bekijk bijlage Sheet_TEST.xlsm

Je hebt gelijk, heb hem even uit elkaar gesloopt.

Hoop dat je mij kan helpen!

Wanneer er op brief printen van bijvoorbeeld maandag wordt geklikt moeten alleen de opleidingen gefilterd worden van die maandag.

De knoppen zijn te vinden vanaf F59

 

[VenA]

En wij mogen gokken wat het wachtwoord is?

 

[MarkBrink89]

En wij mogen gokken wat het wachtwoord is?

Dat was wel de bedoeling =D

Bekijk bijlage Sheet_TEST.xlsm Bij deze zonder WW