alpha

Plaats eens een (voorbeeld)bestand.

Én VinceThePrince, is het gelukt ?

Én Pantex, is je probleem opgelost ?

Én Adile, voldoet de oplossing ?

Als de getallen in Blad1 staan en daar beginnen in A2, typ dan op een ander blad in A2: =ALS(AANTAL.ALS(Blad1!A$2:A2;Blad1!A2)=1;Blad1!A2;"") Je krijgt dan een kolom met de unieke getallen van blad1. Als je die aaneensluitend wil, moet je alleen nog de lege rijen verwijderen.

Wát heb je dan allemaal geprobeerd? In je bestand zie ik daar niets van terug.

Zie de bijlage. PC-Helpf Frank_1986.xlsm

Tussen 2 en 3 en tussen 6 en 7 heb je op de horizontale as geen waarden, terwijl er wel een lijn is getekend. Dat is niet abnormaal, dat is normaal als je voor een lijngrafiek hebt gekozen (er had bv. ook voor een puntgrafiek gekozen kunnen worden). Maar als je op de x-as waarden van 0 t/m 9 hebt staan en je hebt voor een lijngeafiek gekozen, dan moet je ook alle lijnen die voor die waarden gelden, weergeven en niet de ene wel en de andere niet. Dat is niet iets wat ik heb bedacht, dat is een algemene afspraak. Maar we zakken ver af nu, dit is stof van de eerste klas van de middelbare school. En waar maken we ons druk om? Vermits de vragensteller al meer dan twee dagen niet de moeite doet om te reageren, zou ik wel gek zijn om me hier verder nog mee bezig te houden.

Je geeft in de grafiek de nulwaarden wel of niet weer. Als je ze niet wil weergeven, dan mogen de blauwe lijn tussen 2 en 3 en de oranje lijn tussen 6 en 7 er ook niet staan. Je doet het één of het ander, niet beide natuurlijk, dat is (wiskundig) not done. Ik heb er bewust voor gekozen om die nulwaarden wél weer te geven.

Beide formules voor C13 kunnen nog wat korter, nl: =SOMMEN.ALS($G$4:$G$9;$B$4:$B$9;$B13;$C$4:$C$9;"<="&C$12;$D$4:$D$9;">="&C$12) en =SOMPRODUCT(($B$4:$B$9=$B13)*($C$4:$C$9<=C$12)*($D$4:$D$9>=C$12)*($G$4:$G$9))

In de bijlage een oplossing met sommen.als De gebruikte formule in C13: =SOMMEN.ALS($G$4:$G$9;$B$4:$B$9;$B13;$C$4:$C$9;"<="&KOLOMMEN($B:B);$D$4:$D$9;">="&KOLOMMEN($B:B)) Een oplossing met somproduct kan er zo uitzien voor C13: =SOMPRODUCT(($B$4:$B$9=$B13)*($C$4:$C$9<=KOLOMMEN($B:B))*($D$4:$D$9>=KOLOMMEN($B:B))*($G$4:$G$9)) Beide formules kun je met de vulgreep naar rechts en naar beneden kopiëren. PC-Helpf Alexvk.xlsx

In H109 valt meteen op dat het karakter niet in het midden staat, dat komt omdat er na het teken nog een spatie staat. Als die wordt weggehaald is dat opgelost. Je kunt natuurlijk in plaats van het karakter te controleren ook kijken of de cellen al dan niet leeg zijn, maar in dat geval bestaat niet meer de mogelijkheid om er nog wat anders in te plaatsen. In F150 zie ik geen fout: die cel is blanco en die blijft ook na het uitvoeren van de macro blanco, zoals gewenst.

@Bambike, ik denk dat je mij niet goed begrijpt, Als je 'slechts' 9000 rijen gebruikt, is het niet nodig om met je formule in ALLE (meer dan 1 miljoen) rijen van het blad te kijken.

Het bestand met voorw. opmaak is van Plongske, niet van mij. Jammer dat je met jouw Mac niet met macro's kunt werken, nieuwere versies van de Mac en/of nieuwere versies van Excel voor Mac kunnen dat wel.

@Hilde, je schrijft: Als ik zelf de formule invoer werkt het ook niet. Welke formule bedoel je? Bij gebruik van de macro moeten er helemaal geen formules ingevoerd worden.

De melding is duidelijk: "macro's werken niet in Office 2008 voor Mac", dan heeft een oplossing met vba-code geen zin. Bij de tweede melding van je Mac wordt het bestand PC-Helpf Hilde64-2-4.xls genoemd, terwijl het bestand dat ik hier plaatste PC-Helpf Hilde64-2 heet en daar zit toch echt een macro in. Download het laatste bestand nog eens opnieuw en kijk of er dan opnieuw een melding komt en welke.

Correctie op vorig door mij geplaatst bestand. zie de bijlage. PC-helpf Hilde64-2.xls

Zie de bijlage. Klik op de knop in A180. PC-helpf Hilde64.xls

Welke versie van Excel gebruik je ?

Wat wil je het liefst: grijze cellen mét of zonder Windings. Nogmaals: Is dat een overzicht van alle patronen of modellen die er zijn ? Waar gebruik je dat voor?

Het programma heet Excel. Is dat een overzicht van alle patronen of modellen die er zijn ? Waar gebruik je dat voor? Moeten de Wingding-afbeeldingen vervangen worden door de grijze kleur, of moeten de afbeeldingen blijven staan en de achtergond grijs worden?

Aha, je gebruikt liever meer dan 1 miljoen rijen in plaats van de 15 die je maar nodig hebt....

Voer dat nu eens handmatig uit met de macrorecorder aan, zoals ik in mijn vorig bericht adviseerde, dan heb je meteen het antwoord.

Ja, bij jou zal de naam van het blad niet Sheet1 zijn maar Blad1 . Opdracht om een cijfer in een cel te plaatsen (een getal meteen in een cel invoeren gaat overigens sneller); selecteer de gewenste cel en voer dan deze code uit. Sub Getal_invoeren() Dim Getal As Integer Getal = InputBox("Welk getal?") ActiveCell.Value = Getal End Sub Om van een willekeurig aantal cellen 1 cel te maken (dus niet alleen van a1, b1, a2, en b2), selecteer de gewenste cellen en voer dan deze code uit: Sub Cellen_samenvoegen() Selection.MergeCells = True End Sub Om een achtergrondkleur te geven aan 1 of meer cellen, selecteer eerst de betreffende cel(len) en voer dan deze code uit: Sub Achtergrondkleur() Dim Kleur As Integer Kleur = InputBox("Welke kleur?" & Chr(13) & "kies een getal van 1 t/m 56") Selection.Interior.ColorIndex = Kleur End Sub Om een vetgedrukte kader om een(groep) cel(len) te maken, selecteer de gewenste cellen en voer dan deze code uit: Sub Randen() Selection.BorderAround Weight:=xlThick End Sub Om een diagonaal te plaatsen in een cel, selecteer de gewenste cel(len) en voer dan deze code uit: Sub Diagonaal() Selection.Borders(xlDiagonalUp).Weight = xlThin End Sub Advies: als je nog weinig ervaring hebt met programmeren, gebruik dan de macro-recorder. Dan bereik je (weliswaar met veel uitgebreidere code, maar dat is nieterg) hetzelfde resultaat.

@Pantex, en wat gebeurt er als je dit gebruikt: =A24&K6&H5 ?