Pas Cal

Beste mensen, Ik kom er even niet uit. Ik probeer een lijn diagram te maken obv hoeveel % respons er ontvangen is op uitnodigingen. Ik stuur voor een event 5 uitnodigingen uit op 1-11-2022. Op 10-11-2022 meld het eerste bedrijf zich aan (=20%) vervolgens op 20-11-2022 nog 2 bedrijven (=40%). In totaal heeft op 20-11-2022 60% van de 100% zich aangemeld. Weet iemand hoe ik hiervan een lijndiagram kan maken? Lijndiagram.xlsx

Hallo, ik heb een draaitabel en wil voor voor fondsen een vroegste datum ophalen + het aantal regels van deze vroegste datum. De vroegste datum haal ik op door een meting: Code: Eerste SLA =FIRSTDATE(Tabel1[SLA]) De datum komt dan terug als bv 28-10-2021. Nu wil ik een nieuwe meting met hoeveel regels er dan zijn met 28-10-2021. Code: =CALCULATE(COUNTROWS(Tabel1); Tabel1[SLA] = DATE(2021; 10; 28)) Dat laatste stuk moet dan eigenlijk dynamisch worden [Eerste SLA] maar die datum staat in een onjuiste volgerde (28-10-2021 ipv 2021; 10; 28). Weet iemand een code om dat op te lossen? Zie voorbeeld "aantal per datum". Test1.xlsx

Hallo mensen, wellicht een zeer eenvoudige vraag: hoe kan ik in excel niet gebruikte cellen (rijen/kolommen) verwijderen. Zie bijgevoegd voorbeeld, alleen de kolommen A, B en C zijn beschikbaar.

Werkt inderdaad prima, had een kolom leeg gemaakt. Super bedankt!

edit: werkt perfect, dank u!

Niet precies. Nu plaatst de macro alsnog een formule zodat de sheet langzaam wordt. Het is de bedoeling dat binnen de macro gecheckt wordt of de betreffende cel in Kolom C voorkomt in kolom B. Zo ja, dan enkel een 1 zetten in kolom E.

Goede dag, Ik heb een bestand met +/- 70.000 regels. Ik wil een cellen vergelijken of deze voorkomt in een kolom. Dit kost met =vergelijken veel tijd. Bijgevoegd een voorbeeld. De bedoeling is wanneer in kolom A bij de betreffende regel 99999 staat, dat dan kolom C vergeleken wordt of de naam in kolom B (geheel) voorkomt. Wanneer dit zo is, moet in kolom F '1' gezet worden. In het voorbeeld zou alleen F2 naar '1' gezet moeten worden omdat Klaas (C2) voorkomt in kolom B. Is dit mogelijk met een macro? Zo ja, heeft iemand een opzetje? Testbestand.xlsx

Duidelijk. Erg veel dank!

Blijven niet leeg, er kan andere informatie in staan, maar geen info om het VBA script aan te sturen.

Toch nog 1 vraagje. Nu staat de sheetnaam + Ja/Nee in kolom A/B. Als ik deze bv in kolom C/D wil hebben (vanaf regel 1) wat moet ik dan wijzigen?

Super dank. Dit is precies wat ik bedoelde! Nogmaals dank!

Hierbij een voorbeeldje. Op Blad1 kan je opgeven de naam die de PDF moet krijgen (B1). Blad2 moet altijd naar PDF omgezet worden. Blad3 en Blad4 afhankelijk of in cel B2/B3 Ja of Nee staat -> bij Ja wel en bij Nee niet. Het kan zijn dat het aantal Bladen (sheets) nog uitgebreid wordt met Blad5/Blad6 enz. In het VBA script kan deed ik het zo: Blad3toevoegen = Sheets("Blad1").Range("B2").Value If Blad3toevoegen = "" Then MsgBox "Maak een keuze om blad3 wel/niet mee te printen." Exit Sub End If If Blad3toevoegen = "Nee" Then ThisWorkbook.Sheets(Array("Blad2")).Select End If If Blad3toevoegen = "Ja" Then ThisWorkbook.Sheets(Array("Blad2", "Blad3")).Select End If Maar nu met Blad4 (en eventueel blad 5/6/7) kan dat niet meer. Is hiervoor een oplossing? Dat het script kijkt welke Bladen op 'Ja' staan en deze toevoegt aan het PDF. In de VBA moet de opslaglocatie van het PDF aangepast worden als je het wilt gebruiken. Export PDF.xlsm

Goedenavond, ik gebruik een VBA script om PDF te generen. Afhankelijk van het soort rapport moet er bepaalde tabbladen wel/niet als PDF gegenereerd worden. Ik doe dat als volgt: Sub PrintSelectionToPDF() fonds = Sheets("Opstarten").Range("B1").Value naam = fonds info1 = Sheets("Opstarten").Range("B14").Value If info1 = "Ja" Then ThisWorkbook.Sheets(Array("Voorblad", "Rapportage", "Info", "Achterblad")).Select End If If info1 = "Nee" Then ThisWorkbook.Sheets(Array("Voorblad", "Rapportage", "Achterblad")).Select End If ActiveSheet.ExportAsFixedFormat _ Type:=xlTypePDF, _ Filename:="C:\Users\**********\Rapportage_" & naam, _ Quality:=xlQualityStandard, _ IncludeDocProperties:=True, _ IgnorePrintAreas:=False, _ OpenAfterPublish:=True End Sub Nu moet er nog een combinatie bijkomen. Is er een manier om de inhoud in de Array dynamisch te maken bv? BV: afdrukken = sheet1; afdrukken .= sheet2; afdrukken .=sheet3 ThisWorkbook.Sheets(Array("afdrukken")).Select

Afgelopen week met het script gewerkt. Het werkt super fijn! Indien het mogelijk is, zou het fijn zijn als kolom Q (CI SBI's) ook doorzocht kan worden. Deze regel ziet er bijvoorbeeld zo uit: 52291 Expediteurs, cargadoors, bevrachters en andere tussenpersonen in het goederenvervoer, 50401 Binnenvaart (vrachtvaart), 52241 Laad-, los- en overslagactiviteiten voor zeevaart Het zou dan fijn zijn dat wanneer een van de code's die op het tabblad 'code' staan (bv. 50401) matchen, op het tabblad 'uitvoer' gezet worden indien deze nog niet voorkomt op dat tabblad. Met de tekst hoeft verder niets te gebeuren.

Super dank! Echt blij met het script! Verbaast mij echt wat allemaal kan met VBA. Zou jij ook kunnen aangeven of de volgende mogelijkheden ook met VBA mogelijk zijn: - In het originele bestand bestaat het KvK uit 12 cijfers (kolom C) ik zet deze nu handmatig om naar 8 cijfers (kolom D) dan vergelijkt hetscript het met het KvK nummer op tabblad 'Bekend'. Kan dat omzetten naar 8 cijfers ook 'achter de schermen' in het VBA script? Op het tabblad 'uitvoer' moeten het ook 8 cijfers zijn. - In het script staat 'For k = 11 To 15 Step 2' geprogrammeerd. Soms zijn het andere kolommen, bv kolom 10, 12, 14. Is het in VBA mogelijk om die waarde uit excel te halen (bv vanaf het tabblad 'codes') zodat het flexibel is. - Kolom Q (CI SBI's) bevat ook codes en tekst. Zie regel 2. Zouden die ook doorzocht kunnen worde via het script? - Nu vergelijkt het script of het KvK nummer reeds bekend is op het tabblad 'bekend'. Zou dat uitgebreid kunnen worden met een 2de tabblad. Bv. eerst kijken obv KvK-nummer met tabblad 'Bekend' en vervolgens op naam op tabblad 'Bekend1'. Wanneer de onderneming op 1 van beide tabbladen voorkomt, moet het niet op 'uitvoer' komen. - Is het mogelijk om willekeurige tekst mee te geven aan de ondernemingen die geplaatst worden op het tabblad 'Uitvoer'? Deze tekst zou dan opgehaald moeten worden uit een cel op het tabblad 'codes'. Deze tekst zou dan in kolom J moeten komen (na het land). Ik begrijp dat ik veel vraag, zouden bovenstaande wensen mogelijk zijn? Uiteraard hoef je dit niet allemaal belangeloos te doen.