bucky

Zou het hiermee lukken?
BOUWAFDELING_GEREEDSCHAPSLIJST_2020-2021_BLANCO_COUJUR_2.xls

Ja....zo kom je er wel goedkoop vanaf, als iedereen zo zijn probleem oplost kunnen we de forums wel opdoeken.

https://www.helpmij.nl/forum/showthread.php/943721-Formule-plaatsen-in-een-voettekst
Dezelfde vraag staat hier ook, als je er niet uitkomt moet je door blijven vragen en niet op  een ander forum je heil zoeken. Dit wordt niet erg gewaardeerd.

En nu maar hopen dat "plongske" en "alpha" niet op de vuist gaan.

Dit is toch wezenlijk een héél andere site als die uit je vorige post.
 
bucky

hier staat de zelfde vraag, het is wel zo netjes om dit ff te melden.
bucky
 

Ik vraag niet voor niets of je de 30 mogelijke combinaties op een rijtje wilt zetten, of moet ik dit zelf doen?
Als dat zo is, pas ik.

Ik sta er telkens van te kijken dat mensen zomaar een formule gebruiken, terwijl ze niet weten wat die formule doet. Twee opmerkingen:
1. Het rente-% dat je betaalt voor een lening is niet hetzelfde als het % dat je ontvangt voor een bedrag dat je inlegt.
2. Een rente-% per jaar betekent niet dat het rente-% per maand gelijk is aan datzelfde % gedeeld door 12 !
De berekening is niet moeilijk, maar aangezien je in een vorig topic niet eens de moeite nam om te reageren op een antwoord (wat toch een regel is die in het maatschappelijk verkeer betaamt), ga ik verder niet op je vraag in.
 

Voor wie dit later nog volgt (en ook voor MDanny:  ik kreeg van Cobbe dit nog door:
 
" Ik wil alsnog de werkende formule leveren voor MDanny en latere lezers" :
 
=ALS(EN('2019'!$S5="Retour";ISGETAL('2019'!$U5));'2019'!$U5;ALS(EN('2018'!$S5="Retour";ISGETAL('2018'!$U5));'2018'!$U5;ALS(EN('2017'!$S5="Retour";ISGETAL('2017'!$U5));'2017'!$U5;ALS(EN('2016'!$S5="Retour";ISGETAL('2016'!$U5));'2016'!$U5;""))))  
(Met dank aan Cobbe die dit nog even doorgaf)

Michaël,
Om te beginnen ben ik geen VBA specialist, maar ik heb wel wat codes aangepast en/of ingekort.
Over het tabblad "Voorraad"
De ellen lange formules in de kolommen D en E  die zijn vervangen door de VERT.ZOEKEN formules. De kolommen D,E,F,G en I zijn verborgen.
De kolommen F en G worden gevuld door VBA, en kolom I geeft een 1 (één )als de voorraad van dat artikel de minimum voorraad heeft bereikt op het blad "Home" verschijnt nu een waarschuwing. De min. voorraad telt niet mee met de aanwezige voorraad, dus er staat de werkelijke voorraad, die ook verschijnt als je een artikel naam kiest op het blad Factuur uit.
Ook heb ik een knop gemaakt om de voorraad op (nul) 0 te zetten, hier staat een voorwaarde op of je het wel wilt.
De  tabbladen "Factuur in en uit" hebben elk drie drukknoppen, dit zou onder één knop kunnen, in de volgorde van 'Wegschrijven 'Afdrukken en Verwijderen. Als je nu per ongeluk de knop "Wegschrijven" 2 maal indrukt heb je een probleem, of je moet ook de voorwaarde op zetten of je het wel wilt.
Als je het bestand opent zal altijd het tabblad "Home" geactiveerd worden.
 
Het is een hele mond vol, maar probeer het maar eens uit.
bucky
Kopie van GIP_INF2016.11.09.1.xlsm

Smette,
Om te beginnen heb ik het bestandje aangepast, zie "Factuur in" en "Factuur uit".
Ik zie de bijgemaakte kolom niet, en welke formules heb je er in staan?
Kopie van gip-2016.xlsm

Misschien overbodig, maar heb je al een Systeem Herstel uitgevoerd?

Ik weet niet precies wat je bedoeling is, maar ik denk zoiets.
1-Voor carambole.xlsx

@ alpha,
Klopt.....je hebt helemaal gelijk heb het aangepast.
bucky
1-Kopie van 20140727-budget-tracker-nmw.xlsx

Rutten,
Dus als je post #2 gisteren goed had gelezen, was je probleem één dag eerder opgelost.

Zo dus.
 
Als D8 alléén een getal staat.
=als(aantal(D8)=0;ALS(C8=Inkoop!A8;Inkoop!B2;Inkoop!B3);ALS(C8=Inkoop!A8;Inkoop!B2*D8;Inkoop!B3*D8)) Is er ook tekst in het spel dan deze:
=als(D8="";ALS(C8=Inkoop!A8;Inkoop!B2;Inkoop!B3);ALS(C8=Inkoop!A8;Inkoop!B2*D8;Inkoop!B3*D8)) Test ze beide uit met een spatie of tekst in D8
 
bucky

Dixon,
Ik ben geen VBA man.
Nu heb ik hier nog een optie zonder VBA, maar als je het perse met VBA wilt, zal je moeten wachten tot er een VBA man opduikt.
bucky
1_Voorbeeld_Dixon_2.xlsx

Hier is je voorbeeldje teug, kijk maar of je het zo bedoelt.
bucky
1_Voorbeeld_Dixon.xlsx

Je kunt het ook doen zoals in mijn voorbeeldje:
Koenraad-voorbeeldje.xlsx

Nou daar komt ie:
Open je bestand.
Heb je in het lint het tabblad "Ontwikkelaars" staan ga dan naar 2
Anders:
1.
Ga op een van tabbladen in het lint staan, en klik met rechts.
Kies nu "Het lint aanpassen" en het tabblad "Opties voor Excel" verschijnt.
Kies in het linker vak "Hoofd tabbladen", en klik op "Ontwikkelaars"
Hierna kun je de keuze maken tussen "toevoegen" of "verwijderen" wij kiezen voor "toevoegen"
In het rechter vak zie je nu ook "Ontwikkelaars" staan. En druk OK
Het scherm wordt afgesloten, en in het lint is nu het tabblad "Ontwikkelaars" ingevoegd.
2.
Kopieer de code die je van mij hebt gehad, klik met rechts op het tabblad waar je de rijen wilt invoegen, en kies voor "Programmacode weergeven"
Plak nu de code in het grote vak, en sluit de VBA editor af met het rode kruisje.
Je bent nu weer terug op je werkblad. Klik nu op "ontwikkelaars" en kies aan de linkerkant voor "Macro's"
Er opent nu een nieuw venster, en zie daar staat de macro "Rij_invoegen"
Nu kun je twee dingen doen:
Als je op "Uitvoeren" drukt wordt de macro uitgevoerd, hij voegt een rij in onder de rij waar de cursor staat.
Of
Je klikt op "Opties" en kom je weer in een nieuw deelvenster, en die wijst zich zelf.
Type een letter b.v.b. i van invoeren, en klik OK en sluit het venster af.
Als je nu op een cel gaat staan, en je drukt: Alt + i dan wordt er een rij ingevoegd, en je formules worden mee gekopieerd.
VERGEET NIET HET BESTAND OP TE SLAAN ALS: EXCEL_WERKMAP MET MACRO'S
Succes,
bucky

Dit kan op verschillende manieren, maar hoe jij dit wilt verwezenlijken kan ik niet uit je vraag opmaken.
Wil je dit met behulp van een drukknopje, of door te dubbelklikken of door de Ctrl toets kombinatie ........zeg het maar.
Ja....anders had ik je deze code niet gegeven.
bucky

Zet onderstaande code achter je Worsheet

Sub Rij_Invoegen() Application.ScreenUpdating = False Rows(ActiveCell.Row).Copy Rows(ActiveCell.Row).Offset(1).Insert Rows.Copy ActiveCell.Offset(0, 0).Select Application.CutCopyMode = False Application.ScreenUpdating = True End Sub

=als(datum(2014;12;1)<vandaag();a1+a2;0)
of
=als(datum(2014;12;1)<vandaag();a1+a2;"")
Dus na 1-12-2014 worden A1 en A2 opgeteld.
- - - Updated - - -
En hier worden A1 en A2 op precies 1-12-2014 opgeteld.
=als(datum(2014;12;1)<=vandaag();a1+a2;0)
of
=als(datum(2014;12;1)<=vandaag();a1+a2;"")

Tja......Dixon, hoe wil je Excel wijsmaken naar welke 2 gekeken moet worden.
Het is logisch dat bij de eerste stopt......niet?
Je kan wel in 2 rijen naar beide 2_tjes zoeken met elk hun letter.
Al met al een lastige opgave.
Maar wie weet, komt er nog eens iemand langs die dit wel voor elkaar krijgt,
bucky

dawavos,
De vraag is me niet helemaal duidelijk.
Maar kijk eens of je dit bedoeld, anders moet je eens handmatig invullen wat je wilt bekomen.
1-Kopie van uit en ingaven_dawavos.xlsx