Cor-Assa

Correct. In de submap "Reserverings Bevestiging in PDF" moeten de bestanden opgeslagen worden.

De correcte lokatie waar opgeslagen moet worden i s "2020 - Spanje Tour Organisatie\Reserverings Bevestiging in PDF" Het bestand heb ik in "2020 - Spanje Tour Organisatie" geplaatst. In J4 worden gecombineerde gegevens uit een ander tabblad gehaald voor code registratie. De huidige waarde die ik in mijn testbestand heb zitten zijn momenteel 250920-155 en staat in de cel als standaard gedefinieerd. Dacht dat het werkte maar bleek een PDF bestand van gisteren te zijn, sorry.

Toch gaat het nog niet helemaal goed Dotchiejack, krijg een foutmelding aan het eind. Het bestand wordt wel opgeslagen, maar daarna....

Bedankt hetzelfde. P.s. Heb een volgende uitdaging neer gezet, Beveiliging tegen openen van een Excel document.😳

Bij deze, is opgelost. Mag gesloten worden, kan ik dat zelf of moet iemand anders dat doen?

Beste mensen, Het vorige probleem is opgelost, nu de volgende. Ik heb een bestand met heel veel prive gegevens, dit i.v.m. de organisatie van een Spanje reis. I.v.m. de regels op de privacy wil ik dit bestand tegen openen beveiligen met een wachtwoord. Het moet voor 2 personen mogelijk zijn om met hun eigen wachtwoord in te loggen. Ook moet het mogelijk zijn dat deze personen hun eigen wachtwoord kunnen wijzigen. Beetje bij beetje zal ik er wel weer uit komen maar waarschijnlijk is er al iemand die dit heeft ontwikkeld? Wie kan mij helpen? En bij voorkeur met uitleg (groene regels tussen de code) zodat ik het ga begrijpen en indien mogelijk kan aanpassen. B.v.d. Cor Assa

Werkt perfect, dank je wel.😊👍

Ik heb in VBA een stukje programmering waar ik niet uit kom. Sub Printen_Reservering() ' ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "L:\2020 - Spanje Tour Organisatie\Excel\Reservering.pdf", Quality:= _ xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _ OpenAfterPublish:=True End Sub Dit wil ik opslaan op de volgende manier, Sub Printen_Reservering() ' ActiveSheet.ExportAsFixedFormat Type:=xlTypePDF, Filename:= _ "L:\2020 - Spanje Tour Organisatie\Excel\Reserveringen\250920-016.pdf", Quality:= _ xlQualityStandard, IncludeDocProperties:=True, IgnorePrintAreas:=False, _ OpenAfterPublish:=True End Sub Ik heb hier een variabele voor - Dim fReserveringscode As String dit is de waardewaarde 250920-016 De bedoeling is dat de naam Reservering in het eerste bestand vanuit de variabele wordt omgezet naar de rode waarde. (Zie het tweede bestand. Tevens komt dit bestand op een USB stick dus de drive letter kan wijzigen als hij in een andere pc gaat. Daarom zou de verwijzing alleen naar een onderliggende sub directory moeten zijn. In dit geval - 2020 - Spanje Tour Organisatie\Excel\Reserveringen\ Wie weet de oplossing? B.v.d. Cor Assa

Ik heb de oplossing gevonden met onderstaande code. =ALS.FOUT(VERT.ZOEKEN("1 12";Deelnemers!$BO$5:$BQ$227;2;ONWAAR);"") En dit werkt perfect, als niets is ingevuld krijg ik blank. Hoe makkelijk kan het zijn. Allemaal bedankt. Gr. Cor Assa

Bedankt bakerman, helaas lukt het niet. Ook kan ik het originele bestand niet toesturen i.v.m. privacy. Ik heb nu een kolom aangemaakt waar ik het bus nummer en zitplaats heb gecombineerd zoals "1 12", bus 1 stoel 12. Alleen in het overzicht van de zitplaats indeling krijg ik nu #N/B als een zitplaats niet ingevuld is. De code die ik gebruik is =VERT.ZOEKEN("1 12";Deelnemers!$BO$5:$BQ$227;2;ONWAAR) Zit hier iets fout in of moet er iets bij? B.v.d. Cor Assa

Bedankt emielDS, dit werkt inderdaad. Maar hetgene ik wil is dat dit automatisch gebeurd als het tabblad geopend wordt/☺️

Ik was wat voorbarig, het lukt toch niet zoals ik dacht. Moet als resultaat trouwens 2 cellen samengevoegd worden. Zie mijn aangepaste voorbeeld, voor de namen moet dan Dhr. of Mevr. bijgevoegd worden. Bus en stoel.xlsx

Toch gaat het nog niet goed, als er geen stoelnummer ingevuld is krijg ik #VERW#

Ik heb na lang zoeken iets gevonden dat werkt. =INDEX(Deelnemers!G5:G227;1;1) Dit zijn de gevens uit mijn originele bestand daarom kloppen ze niet met het voorbeeld.

Beste mensen, ik heb weer een nieuwe uitdaging. Ik heb een voorbeeld bestand bijgevoegd. Ik wil dat in het 2e tabblad automatisch als ik hier naartoe schakel bij bus 1 de passagiers ingevuld worden (uit tabblad 1) die naast de cel zit wat hun stoel indeling is. Dus bij Bus 1 zou achter 5 (stoelnummer) de naam Jansen moeten komen, enz. Bij bus 2 achter achter 6 (stoelnummer) de naam Pietersen, enz. Behalve de oplosing eventueel ook een uitleg, dat leert het beste. B.v.d. Cor Assa Bus en stoel.xlsx

Bedankt allemaal. Excuses ik ben er vandaag niet helemaal bij met mijn hoofd, sorry. Bedankt voor de oplossing, het werkt. Gr. Cor

Excuse Haije je hebt gelijk.

Hier een voorbeeld, dacht dat de omschrijving duidelijk was, sorry. Afhankelijk van de waarde in A1 verschijnt dus in A1 de plaatsnaam. B.v.d. Lijst zoeken.xlsx

Beste mensen, Sommige dingen zijn zo makkelijk en toch vergeet je ze. 😉 Ik heb het in het verleden gebruikt maar weet niet meer hoe. In cel A1 tik ik een waarde in, b.v.b. 20 In kolom D heb ik waarden van 1 t/m 30 staan. In kolom E staan plaatsnamen. Achter 20 in de kolom D staat in kolom E Brussel Nu moet er in cel B1 Brussel verschijnen. Helaas weet ik niet meer hoe ik dat ooit gedaan heb en kan het nergens terug vinden, wie kan mij helpen? Gr. Cor

En zoals gezegd kunnen het wel 200 tabbladen worden, die passen niet netjes in een tabblad dat wordt scrollen. Is het mogelijk dit te beperken tot b.v.b. 30 en dan een paar kolommen naar rechts weer verder te gaan met de lijst? B.v.d. Cor Assa

Beste bakerman, Ik ben toch voor jouw voorbeeld gegaan dat paste het beste met mijn ideen. Nu hoeft er geen tabblad aangemaakt te worden waar mijn tabbladen lijsten in vermeld staat, dat doe ik op een andere manier. Wat ik nog wel wil is achter de tabblad lijsten 1, 2, 3, enz wat gegevens uit cellen van dat blad. Zoals cel C1 - C2 - C3, hoe krijg ik dat voor elkaar? Gr. Cor Assa

Bedankt bakerman, ziet er ook goed uit. Ga eens kijken wat voor mij het beste uitkomt.

Bedankt, beiden werken, ga er morgen mee aan de slag.

Dit werkt, bedankt. Even nog kijken met wat voor oplossing alpha komt.

Even een klein voorbeeldje gemaakt. Tablijst voorbeeld.xlsx