alpha

Dat kopiëren kan door ervoor te zorgen dat de bereiken die in de formules worden gebruikt niet wijzigen bij het kopiëren. Dat kun je bereiken door in de formules dollartekens te gebruiken. Dat is in het bestand in de bijlage gebeurd. Je kunt nu de cellen met formules kopiëren en op een andere lokatie plakken. Het best gebruik je dan: "Plakken-speciaal" - "Formules. Zorg wel dat het bereik waarin je plakt even groot is als het gekopieerde bereik. En kolom D niet tegekijkertijd met de kolommen G en H kopiëren, want tussen de kolommen D en G bevinden zich de verborgen kolommen E en F. G en H mag je wel tegelijkertijd kopiëren. Succes ermee, laat aub even weten of het is gelukt. PC-Helpf masjahe.xlsm

@Plongske, het ware handig geweest als je had aangeduid op welk bericht je laatste bericht een antwoord was, dan kan er geen aanleiding zijn tot misverstanden. Tekst citeren kan door op Quote te klikken in het bericht waarop je wil reageren.

Ja, als de formules zijn geplaatst dan blijven die staan als je ze niet verwijdert. In de bijlage bij dit bericht ook de formules voor kolom G. De formules in blad '1-1000' in kolom AD boven de tabellen, kun je ook verwijderen, dat scheelt wat in opslagruimte. Toets Ctrl-q om de getallen in de kolommen D, G, en H weer te geven. PC-Helpf masjahe.xlsm

@masjahe, Toen ik 8 uur geleden mijn vraag stelde had ik al een oplossing klaar, maar ik wilde wachten om die te plaatsen tot ik wist of die ook voor het blad '1-1000' nodig was. Uit je laatste bericht maak ik op dat dat niet het geval is. Daarom in de bijlage alsnog een oplossing, alleen voor het eerste blad. De formules blijven er in de gehele kolommen C en G uitzien zoals je die in C2 en G2 plaatste. Klik op de knop in C1. PC-Helpf masjahe.xlsm

En wil je in blad(1-1000) dan niet meer de formules die je in je eerste bericht nog wel wilde? Opmerking: je maakt best in blad(1-1000) de bereiken voor elke plaats even groot.

Typ in Q2, respectievelijk R2: =ALS(AANTAL.ALS(A4:AI32;1)>0;1;"") en =ALS(AANTAL.ALS(A4:AI32;1000)>0;1;"")

Met een formule zie ik het niet zo direct, al kan het waarschijnlijk wel. Wat wél kan: in het blad "Overview" links een kolom invoegen (dat wordt dan kolom A) en dan via een macro links van Persoon2, Persoon3, enz. het aantal laten weergeven dat bij de betreffende personen hoort. Alleen moeten dan de items die in kolom B bij die personen horen steeds 'uitgeklapt' staan om in kolom A de aantallen op de juiste plaats te kunnen vermelden. Want als je kolom B inklapt, dan vervallen er een groot aantal rijen (vanwege de draaitabel) en staan de aantallen in kolom A dan niet meer in de juiste rij. Dus als je het geen probleem vindt om steeds alle gegevens weer te geven, dan kan ik je wel zo'n oplossing bezorgen. Je moet dan 1 keer op een knop klikken om de aantallen weer te geven.

De 'application.goto'-methode wordt in de vba-helpfile van Excel goed uitgelegd. Daarin kun je lezen dat er met die methode altijd naar een cel moet worden verwezen. Als je door op B2 te klikken A5 wil selecteren, dan moet je dus: - In B2 een knop plaatsen (daarvoor kan desgewenst ook een - al dan niet doorzichtige - rechthoek dienen). - Aan die knop een macro toewijzen waarmee naar A5 wordt 'gesprongen'. - Die macro hoeft slechts 1 regel te bevatten, nl: Application.Goto Reference:=Worksheets("Blad1").Range("A5") Je kunt A5 ook een naam geven, bv. 'Zus' (maar niet '1. Zus'); als je dat gedaan hebt kun je in de code in plaats van A5 die naam gebruiken: Zus .

Kies in het menu: Extra - Blad beveiligen, en NIET (wat je volgens je afbeelding hebt gedaan): Extra - Werkblad beveiligen.

Met veel moeite kunnen ontdekken wat er in je afbeelding staat. Als je in een formule verwijst naar een cel, dan mag die niet tussen aanhalingstekens staan, want dan wordt dat door Excel als tekst beschouwd en niet als een cel. Je moet er daarom dit van maken: =AANTAL.ALS(L5:L100;"*"&U6&"*")

Voor rij 6: =SOM(VERSCHUIVING(D6;;;;A$2)) Kopieer deze formule naar beneden.

Aanvulling voor de duidelijkheid: Je kunt gebruikers in 1 cel (bv. in C5, C6, C7) wel een keuze laten maken uit 12 verschillende items (via gegevensvalidatie bv.), maar in 1 cel kan er dan van die 12 slechts 1 item geplaatst worden.

In C5 (en ook in andere cellen) kun je altijd slechts 1, en nooit meer dan 1 item selecteren.

Je kunt onderstaande formule proberen in AB2, maar zonder meert informatie is het inmogelijk te zeggen of dat een juiste oplossing is. In D2, H2, M2, r2, en X2 staan waarschijnlijk formules, maar in je tekst vermeld je dat die cellen ook leeg kunnen zijn. Welnu, dat is een tegenstrijdigheid: een cel waarin een fomule staat is NOOIT leeg, ook al is het resultaat van de formule een lege cel. =ALS(X2<>"";X2;ALS(R2<>"";R2;ALS(M2<>"";M2;ALS(H2<>"";H2;ALS(D2<>"";D2;0)))))

Niet duidelijk is wat er in de cellen D2, H2, M2, R2, en X2 staat of kan staan: getallen of tekst. Ook is niet duidelijk of er in de tussenliggende cellen nog wat staat of kan staan. Op die manier wordt goed antwoord geven wel erg lastig. Plaats voortaan een Excelbestand met de nodige gegevens en uitleg, dan kun je eerdere en op je vraag toegespitste antwoorden verwachten. Onder bepaalde voorwaarden zou volgende formule, die moet worden ingevoerd via Ctrl-Shift-Enter, een oplossing kunnen zijn in AB2: =INDEX(D2:X2;VERGELIJKEN(D2:D2;ALS(D2:X2>0;D2:X2)))

1. Die spatie hoort er niet staan. 2. Wat je daarmee bedoelt is mij niet duidelijk, wees wat duidelijker in je uitleg! uit je afbeelding valt ook niet op te maken wat je bedoelt, die is onleesbaar. Zoals ik in m ijn vorig bericht al meldde: voeg een Excelbestand toe aan je bericht, dan kan iedereen zien waar het om gaat. 3. Je hoeft in een reactie niet steeds de tekst van een vorig bericht te herhalen, die is bekend.

@Pterbel, Aan reacties met de melding dat een formule niet werkt, daar hebben we niet veel aan. Waar we wel wat aan hebben is een |Excelbestand waarin je de formules gebruikt,, zodat iedereen kan zien wat en waar het mis gaat. Dat is absoluut onjuist ! De AANTAL.ALS-formules zoals ik die gegeven heb, werken wél, zoals iedereen kan nagaan die mijn formules JUIST heeft overgenomen en het Excel-Filmbestand gebruikt dat op de site van Microsoft te vinden is (dat is hier: https://templates.office.com/nl-nl/Filmlijst-TM02802354 ). Ik ben uitgegaan van de gegevens zoals jij die gegeven hebt, nl. dat er per film slechts 1 regisseur is (bv. Alfred Hitchcock) en dat er per film meerdere acteurs kunnen zijn. Daarom zijn die twee AANTAL.ALS-formules ook niet hetzelfde, kijk maar eens goed !!

@stephanie8712, Berekeningen zoals jij die wil maken, vind ik ten zeerste af te raden. Je bent bijna altijd geneigd om tijden als bv. 7,40 uur als 7 uur en 40 minuten te beschouwen, terwijl het om 7 uur en 24 minuten gaat. En een verschil van 8,50 en 7,40 uur is niet 1 uur en 10 minuten, maar 1 uur en 6 minuten. De ervaring heeft geleerd dat de meeste mensen dat niet meteen zien. Gebruik als notatie en bij de berekening daarom 7:24 in plaats van 7,40 , dat is voor alle gebruikers veel duidelijker.

Lijkt mij dezelfde vraag als hier: http://www.helpmij.nl/forum/showthread.php/910333-Excel-Macro-gt-foutmelding-object-required

Je hebt daarvoor in Excel niet de mogelijkheden zoals in Word. Om de tekst in een cel verticaal gelijkmatig te verdelen, kun je best de 'Tekstuitlijning verticaal' instellen op 'Gecentreerd'.

Dat kan bv. door het uitvoeren van deze macro: Sub macro1() Dim x As Integer For x = 1 To ThisWorkbook.Sheets.Count With Sheets(x).Range("A1") If .Value <> 0 Then Sheets(x).Name = .Value End If End With Next x End Sub

Houd de helpfile van Excel (F1) bij de hand. Daarin worden alle functies zeer goed uitgelegd.

Typ in het blad Totalen in B2 (en kopieer naar beneden): =SOM(VERSCHUIVING(Bedrijven!A2;0;1;1;5))

Door een filter in te stellen. Selecteer maar eens een willekeurige cel in de lijst en klik bovenaan in het menu op "Gegevens". Dan zie je dat het filtericoon geel is gekleurd, ten teken dat het filter is ingesteld. Als je 1 x op die knop klikt, zie je dat het filter wordt uitgeschakeld, in de lijst verdwijnen dan de pijltjes. Aantal keer dat een bepaalde regisseur (bv. Alfred Hitchcock) voorkomt (ervan uitgaande dat je bestand 1000 films bevat): =AANTAL.ALS(M$5:M$1000;"Alfred Hitchcock") Aantal keer dat een bepaalde acteur (bv. Tom Hanks) voorkomt =AANTAL.ALS(L$5:L$1000;"* Tom Hanks*") Niet duidelijk is of de rij een andere kleur moet krijgen als je een zesde film toevoegt, of als eenzelfde titel 6 keer voorkomt. Als je nog niet veel ervaring hebt met Excel kun je beter een eenvoudiger Excelbestand gebruiken. Die zijn op internet wel te vinden, zoek maar eens met woorden Excel filmlijst.

Twee opmerkingen vooraf: 1. Als het werknummer steeds wijzigt (zoals je schrijft), dan kun je geen macro gebruiken die algemeen bruikbaar is (tenzij er met de wijziging steeds rekening wordt gehouden). 2. Pas op met punten in de naam van bestanden, dat kan tot fouten aanleiding geven (dat is afhankelijk van wat er na een punt komt, Windows en Excel verwachten na de punt een extensie). Ervan uitgaande dat je de directory waarin het nieuwe bestand moet komen, juist heb weergegeven (ga dat na !), voer - als het bestand "7216.201 Standaardlijst – mengformulier.xlsm" geopend is - deze macro uit: Sub macro1() Dim myarraysh, Newwb As Workbook myarraysh = Array("Afrekening", "Meer-minderwerk") Sheets(myarraysh).Copy Set Newwb = ActiveWorkbook With Newwb .SaveAs "C://Intel/2 Financieel/Werkbegroting" .Close End With End Sub