Excel overboeking sheet

[RemcoH]

Bekijk bijlage Planning April 2014.xlsx

Beste mensen,

Heb weer eens een uitdaging.
Aan dit bericht is een bijlage toegevoegd.
Nu ben ik met een planning bezig waarin overboeken
van personen gepaard gaat met een foutmelding.
Dit geld dan per dag over alle kolommen.

In de bijlage is kolom 1,2,3 al voltooid voor alle dagen.
Wil deze lijst uitbreiden tot kolom 12.
Hoe kan ik dat het snelst doen?
Vorige heb ik namelijk de formules stuk
voor stuk gedaan. Moet toch makkelijker kunnen?

De formule en de foutmelding staan in tabblad 2.
De kleine balken naast de kolommen hebben
gegevensvalidatie met kleurtoewijzing.

Hopelijk kan iemand me verder helpen.

Veel dank alvast voor ieder zijn input.

Mvg.,

Remco

 

[VenA]

Hoi kan je de tekst misschien even in wat normale zinnen plaatsen? Het lijkt wel een slecht sinterklaasgedicht. En uit jouw bijlage alle opmaak en toestanden weghalen zodat het geheel een beetje leesbaar wordt?

 

[RemcoH]

Begrijp niet wat u bedoelt. Vind zelfs uw reactie onfatsoenlijk om het netjes te houden.
Ben ik niet gewend op dit forum.

Het is het originele document, overige tabbladen verberg ik normaal altijd; zijn immers vaak bronbestanden.
Nu niet gedaan om de formules te laten zien welke ik heb gebruikt. Dit zou iemand misschien kunnen gebruiken.
Het aanleveren van het originele document kan van belang zijn op formules, ze kunnen immers anders niet werken.

Nogmaals, commentaar en opmerkingen zijn welkom; gaarne wel op gemanierde basis.

Mvg.,

Remco

 

[VenA]

Sorry dat ik wat lomp overkwam. Dit is natuurlijk niet de bedoeling. Inmiddels is jouw vraag zo'n 85 keer bekeken zonder dat je een reactie hebt gehad. Dus nu wat vriendelijker: Stel een heldere vraag en plaats een dito voorbeeldje.

Nog wat kleine tips om jouw vraag iets beter te formuleren:
- een kolom heeft een letter;
- haal blad2 weg de formules staan toch onder gegevensvalidatie;
- benoem even extra dat het het om gegevensvalidatie gaat;

Om je een beetje op weg te helpen: Je gebruikt steeds 6 rijen en 2 kolommen. Met de ingebakken functies RIJ() en KOLOM() kan je het geheel denk ik wel vereenvoudigen.

 

[Elsendoorn2134]

Remco,

De formule die je nodig heb kun je vereenvoudigen tot "=AANTAL.ALS($C$4:$Z$9;$C$4)=1", het aanwijzen van alle kolommen
is niet nodig omdat in de tussen kolommen geen namen voorkomen.
Het lijkt mij het handigst om de validatie te laten uitvoeren met een VBA-programma'tje.
Hierbij een voorbeeld:

Sub SchrijfGegevensValidatie()

Dim nKolom As Integer
Dim nRow As Integer
Dim nDagen As Integer
Dim nTeller As Integer

For nKolom = 3 To 26 Step 2
    For nDagen = 0 To 30
        For nTeller = 0 To 5
            With Range(Cells(4 + nDagen * 6 + nTeller, nKolom).Address).Validation
                .Delete
                .Add Type:=xlValidateCustom, AlertStyle:=xlValidAlertWarning, _
                    Operator:=xlEqual, _
                    Formula1:="=countif(" & Cells(4 + nDagen * 6, 3).Address & ":" & _
                        Cells(4 + (nDagen) * 6 + 5, 26).Address & "," & Cells(4 + nDagen * 6 + _
                        nTeller, nKolom).Address & ")=1"
                .IgnoreBlank = True
                .InCellDropdown = True
                .InputTitle = ""
                .ErrorTitle = "Overboeking!"
                .InputMessage = ""
                .ErrorMessage = "Flexwerker reeds geplaatst!"
                .ShowInput = False
                .ShowError = True
            End With
        Next nTeller
    Next nDagen
Next nKolom

MsgBox "Alle validaties aangepast.", vbInformation, "Klaar"
End Sub

Veel Succes.

 

[RemcoH]

Bedankt voor alle input. Waardeer het zeker.
Ben zelf alleen bekend met input formules en de hulp van jullie verkregen.

@Vena "Met de ingebakken functies RIJ() en KOLOM() kan je het geheel denk ik wel vereenvoudigen''
Zou graag willen weten hoe ik dit het beste kan doen.

@Elsendoorn2134 "Het lijkt mij het handigst om de validatie te laten uitvoeren met een VBA-programma'tje."
Allereerst veel dank voor uw macro code... hopelijk heeft het u niet al teveel tijd gekost.
Tweede, hoe maak ik zo een vba programma? Is dat moeilijk? Heeft u een site waar dit staat beschreven?

Hoor het graag.

Fijn weekend en Pasen toegewenst.

 

[Elsendoorn2134]

Remco,

Kijk een op http://www.gratiscursus.be/Excel_automatiseren/index.html
daar staat gratis cursussen voor Excel, Access en andere programma's. Ook voor VBA onder Excel automatiseren.

Veel Succes
Prettige paasdagen