emielDS

of =nu()+14

of deze datumvoorbeeldberekening.xlsx

maar veel gemakkelijker is het om het tegenovergestelde te doen, het bedrag invullen en dan de cel te kleuren.

op de eerste vraag ja op de tweede is het moeilijk uitleggen maar bekijk de formules en de opmaak van gegevensvalidatie. Als er nog vragen zijn stel ze maar. ps niet teveel quoten dat belast alleen maar het forum.

Aangezien het blijkbaar te laat was om een voorbeeldbestand te plaatsen heb ik zelf maar iets geknutseld. validatie steden.xlsx

een voorbeeldbestand zou misschien het helpen vergemakkelijken.

maar omdat we allemaal kind geweest zijn toch volgende opzet. kleurboek.xlsm

ik weet niet of je het weet maar exel is een rekenprogramma dat bestaat uit werkbladen. Voor kleurplaatjes moet je een ander programma hebben.

plaats een voorbeeld, dat maakt het ons makkelijker.

hoe komen die gegevens daar? is dat vba?

bij bedragen mag je geen punt gebruiken maar moet je een komma gebruiken.

ja maak nog een range bij Private Sub Worksheet_Change(ByVal target As Range) Dim r1, r2 As Range Set r1 = Range("B2:C5") Set r2 = Range("F2:G5") Set r3 = Range("??:??") If Not Intersect(target, Union(r1, r2,r3)) Is Nothing And Not IsEmpty(target) Then Application.EnableEvents = False target = Replace(Format(target / 100, "00.00"), ",", ":") Application.EnableEvents = True End If End Sub verander dan ook Dim r1 ,r2 ,r3 as Range

Ik weet niet of dit aan de eisen voldoet? Ik zie niet in waarom je dat met vba wil doen? map5.01.xlsx

ik weet niet welke werkplekken te zwaar zijn maar je kan R7 in de formule vervangen door de betreffende cellen. Kopie 2 van werkrooster (1).xlsm

als je wil geholpen worden kan je best een voorbeeldbestand plaatsen.

Welke zijn die werkplekken?

Opgelost. Om gaan uit te leggen hoe zoiets gemaakt is hier een beetje weinig tijd. Om kort te zijn. Ontwikkelaars -->visual basic -->invoegen -->userform. berekenen.xlsm

Ik weet niet wat je bedoeld met een pop out scherm od in excel, (is iets van outlook mail), maar heb hier een voorbeeld met een userform. berekenen.xlsm

Denk je nu echt dat er 1 mens is die begrijpt wat je wil? Plaats om te beginnen een voorbeeldbestand met een relevante opmaak en cijfers. Waar vinden we de l,, h, en br

Plaats eens een voorbeeldbestand als je verder wil geholpen worden.

Rows("4:4").Insert Shift:=xlDown, CopyOrigin:=xlFormatFromLeftOrAbove rijen kunnen enkel boven toegevoegd worden, je kan dat oplossen door van "4:4", "5:5" te maken. Range("G5:K5").Copy Range("G5").Select ActiveSheet.Paste ik weet niet wat daar de bedoeling van is maar kan je beter verander naar Range("g5:k5") = Range ("g5:k5).value of [g5:k5]=[g5:k5].value gebruik steeds zo weinig mogelijk select aan gezien vba het aantal beperkt. en hier plakje 2 verschillende data in dezelfde cel Range("B5").Value = Sheets("verkoopfactuur").Range("F4").Value 'datum Range("B5").Value = Sheets("verkoopfactuur").[E13].Value 'datum

Ik vraag me af waarom iedere keer nieuwe bladen moeten aangemaakt worden. Sheet1 (1).xlsm

#N/B betekend, in de meeste gevallen, dat het ingevoerde niet kan worden gezocht in de zoekwaarde, dus dat kan nooit juist zijn.

deze is wat eenvoudiger en geeft hetzelfde resultaat. Sheets("Blad1").Range("a1:l1").Copy Sheets("Blad2").Range("a1000").End(xlUp).Offset(1, 0).PasteSpecial Paste:=xlPasteValues Application.CutCopyMode = False

Deze maakt kolom D overbodig =TEKST(Reversestr(B2);"00")&TEKST(C2;"00")