bucky

Hilhorst,

Zet de 30 combinaties eens op een rijtje, er is vast wel een mogelijkheid om dit op te lossen.

Maar als je niets invult, zie je niets......dus ook geen #####  "foutwaarde"

En waarom plaats je deze formule dan: =ALS(AANTAL(D9;C9)=2;REST(D9-C9;1);"") Met andere woorden: Als het aantal getallen in het bereik D9:C9 2 is dan Rest(D9-C9;1);"" (blijft de cel leeg))

Quote

Hartelijk dank voor je hulp AlexCEL. Als er nog eens een probleem is weet ik je te vinden
Maar voorlopig is mijn probleem opgelost.

Nogmaals dankjewel,
Jannick

Dit betekend dat je deze vraag ook op een ander forum hebt gepost, dat had je hier wel eens mogen melden. Misschien zijn er hier wel die nu voor de k zijn k naar een oplossing zoeken.

Of lees mee op de diverse fora, daar kun je veel nuttige tips en trucs opsteken.

10 uren geleden, Cariplo zei:

Nee, bij lange niet, alles in rood is niet aangepast.

Dan is het voor mij de zaak afgehandeld, ik zie niets in het rood staan.

Op ‎21‎-‎4‎-‎2017 om 07:39, Cariplo zei:

Ik zou graag mijn urenregistratie compleet willen hebben.

Op ‎22‎-‎4‎-‎2017 om 17:10, Cariplo zei:

Graag wil ik alle berekeningen compleet hebben.

En als ik eerlijk moet wezen, nodigt de vraagstelling niet echt uit om te reageren.

Stel eerst maar eens een duidelijke vraag wat je precies wilt bekomen, in plaats van zo bot te reageren.

 Kijk eens of dit aan je wensen voldoet? 

Kopie van Excel Forum 16-04-2017.xlsx

En de vraag is?

En welke formule moet er in K8 staan. "=SOM(#VERW!+H8)" dit zegt mij niets.

Het zou ook handig zijn als je de macro laat zien, nog beter een .xlsm voorbeeldje met je macro.

Falco,

Jou keuze lijst is geen VBA, maar: Gegevens > Data validatie. In Googlespreadsheets heb ja ook Datavalidatie maar deze werkt op een heel andere manier, dus ik ben bang dat je dit niet zomaar kunt overzetten. Ik moet hier wel bij vermelden dat ik met Googlespreadsheets helemaal geen ervaring heb.

Volgens mij kun je in Googlespreadsheets geen VBA gebruiken, en in je bestandje staat geen VBA

Probeer het zo eens:

i.p.v. ActiveWorkbook.Close

Deze twee regels als laatste.

ThisWorkbook.save

Application.Quit

5 uren geleden, Marij zei:

heb wel een beetje haast.

Nou dat lijkt mij niet.

Marij,

 Wat bedoel je precies, heb ja de kolommen een nummer gegeven.....zo ja, hoe.

Nog beter laat eens een voorbeeldje zien hoe je dit hebt gedaan.

bucky

Steffie

Een voorbeeld bestandje hoeft helemaal niet zo groot te zijn, een paar rijen ontdaan van gevoelige info is voldoende.

bucky

Stefanie,

Ik neem aan dat je al iets hebt, dus Indien mogelijk graag een .xls of .xlsx voorbeeldje, zonder privé gegevens.

bucky

 Louise,

Vergeet mijn vorige post, hier heb je het werkend bestandje.

1_Kopie van Test_Louise.xlsm

Louise,

Deze regel: If Cells(n, "A").Value = "x" Then

Vervangen door: If Cells(n, "A")= "x" Then

In kolom A staat geen Value  maar tekst.

bucky

Als je zoveel per maand kan sparen, kun je beter een professional aan het werk zetten in plaats van een simpel Excel progje

@bakerman,

Ik ben geen VBA specialist, en gebruik de code inderdaad om mijn bestanden op te slaan als PDF bestand.

7 uren geleden, bakerman zei:

Vermijd Select, Activate, ActiveSheet in je code. In 99% van de gevallen is het overbodig en onnodig en zorgt het enkel voor vertraging en vervelende schermwisselingen.

Dit is mij ook bekend, maar voor zo'n korte code kan het volgens mij geen kwaad, en is het voor de leek ook begrijpelijk.

Maar elke verbetering is welkom, en deze leek leert er ook weer van 

Bedankt,

bucky

Test dit een uit.

Zet deze achter een drukknop

Met in A1 de maand en in A2 de dag, aanpassen aan je eigen behoefte.

If MsgBox("Wil je deze gegevens opslaan ?.", vbYesNo, "gegevens opslaan") = vbYes Then

    Sheets("bloeddruk").Activate

    ActiveSheet.ExportAsFixedFormat xlTypexlsx, "C:\Top\info\schouwing\schouwdiensten\afgewerkte diensten\"&Range("A1").Value&"\"&Range("A2").value

End If

Sheets("jou Bladnaam").Select

Range("jou Cel").Select

En deze in een Module

Function padnaam() As String

padnaam = ThisWorkbook.Path

End Function

Als je nu in een cel zet "=padnaam()" wordt het pad zichtbaar

Zijn de mappen met de datum bestaande mappen, of moeten deze dan gelijk aangemaakt worden?

Laat ook het hele pad zien dus: C:\Users\je naam\Documenten\afgewerkte diensten\maand\2-2-2017

Nog beter post eens een voorbeeldje

bucky

1 uur terug, MDanny zei:

Ik raadpleeg altijd meerdere hulp forums, kennelijk doe jij dat dus ook.

Nee.......ik raadpleeg geen forums, maar ik probeer wel te helpen. En als helper is het heel irritant als iemand een vraag op meerdere fora plaatst zonder dit te vermelden. En.... ik zie dat Cobbe het ook niet kan appreciëren. Zie ook de zelfde antwoorden/oplossingen die je krijgt.

Vermeld dan ook even dat je hier de zelfde vraag gepost hebt, of plaats op zijn minst een linkje. Dat scheelt voor de helpers een hoop werk en tijd. 

MDanny,

Niet interessant voor mij, maar ik kan mij voorstellen dat iemand met hetzelfde probleem iets aan de oplossing heeft.

Dus wil je zo vriendelijk zijn je oplossing te posten?

bucky

Zijn de oplossingen van hier niet afdoende?

http://www.helpmij.nl/forum/forumdisplay.php/5-Excel

bucky