alpha

Kijk de andere formules in dezelfde rij als waarin de formule staat, eens na.

In mijn NL-versie wordt het juiste resultaat weergegeven, kijk maar.

Staan de celeigenschappen wel ingesteld op "Standaard"?

Met de celeigenschappen ingesteld op "Standaard",

Gebruik in E2 voor Excel-NL:

=D2&HERHALING("0";2-LENGTE(D2))&TEKST(C2;"00")

en in E2 voor Excel-Engels:

=D2&REPT("0",2-LEN(D2))&TEXT(C2,"00")

Als je een Engelstalige versie gebruikt, moet je uiteraard TEXT gebruiken (let op: 2 x in de formule).

Zorg er ook voor dat de celeigenschappen op Standaard staan ingesteld!

Als je dan nog een foutmelding krijgt, dan staat op jouw computer waarschijnlijk ingesteld dat in plaats van de puntkomma (;) de komma (,) als scheidingsteken geldt. In dat geval moet je dan gebruiken:

=Text(D2,"00")&Text(C2,"00")

Mijn formule luidde (zie mijn vorig bericht):

=tekst(D2;"00")&tekst(C2;"00")

Tekst wordt daarbij geschreven al tekst (met ks), terwijl jij gebruikt text (met een x) en dat laatste is voor de Engelstalige versie van Excel.

@Piene,

de credits behoren ook te gaan naar Haije, niet naar mij

(met "Gebruik in de macro in plaats van .....") bedoelde ik: Gebruik dat in de macro van Haije).

Typ in E2 en kopieer met de vulgreep naar beneden (met de celopmaak op 'Standaard'):

=tekst(D2;"00")&tekst(C2;"00")

Natuurlijk !

@dotchiejack,

Ik bedoelde mijn opmerking niet als kritiek hoor;

jouw code is (ook) prima !

5 minuten geleden, dotchiejack zei:

Dit lijkt mij voldoende ....

Verschilt niet zoveel van de code van Haije (vind ik).

Gebruik in de macro in plaats van

c.EntireRow.Cut  .....

dit:

c.EntireRow.Copy  ....

PC-H lscb3.xlsm

Je gaat toch niet bij elke kopieeropdracht de formules aanpassen?

Je moet er vooraf voor zorgen dat datgene opgeteld wordt dat opgeteld móet worden.

Moet in blad 2, na kopiëren van blad1, in alle kolommen hetzelfde aantal rijen opgeteld worden?

Als je vooraf het aantal rijen niet weet dat je in het tweede blad wil optellen, dan heeft het toch niet veel zin om de formules van bkad1 over te nemen? Die moeten dan toch weer worden aangepast.

10 minuten geleden, lscb zei:

de uitkomst van de som is op scheet2 nog leeg staat op nul 

Je hebt het over een som, maar in jouw code wordt geen enkele optelling gemaakt.

Als je nou eens in gewone taal zegt WAT je wil berekenen. Dat kun je doen door een voorbeeld te geven van gegevens op blad1 waar je wat mee wil doen, en te zeggen wát je er na het kopieren naar blad2 mee wil doen. Jouw code maakt mij dat niet duidelijk.

13 minuten geleden, lscb zei:

de code staat hier boven toch

Ja, maar niet tussen vierkante codehaken. Tussen die haken is ze veel beter leesbaar.

Ik heb je code wel gezien, maar die heb ik verwijderd omdat m.i. die vervangen kon worden door de paar regels van mij.

Welke berekening wil je doen ?

1 uur geleden, lscb zei:

code  (1 ) deze werkt wel maar doet de berekening niet

Ik zie in je bestand geen enkele berekening.

Opm: als je in een bericht code plaatst, wordt je geacht dat tussen codehaken te doen .

PC-Helpf lscb2.xlsm

Heb je de formules ingevoerd via Ctrl-Shift-Enter (dwz: nadat je de tekst van de formule hebt getypt de knoppen Ctrl en Shift beide indrukken, die tegelijkertijd ingedrukt houden, en dan op Enter drukken)?

De formules in kolom C zijn afhankelijk van die in kolom D, dwz. dat in kolom C pas de juiste waarden verschijnen als kolom D is ingevuld. Zie de bijlage.

PC-H Hansrad.xlsx

Én hansrad,

gelukt ?

@garfield007,

wat is de achtergrond van je vraag?

Wil je voorw. opmaak aan een macro koppelen? Dat kan, alhoewel dat niet zo voor de hand liggend is en ik me dan afvraag waarom je dat zou willen.

Met een macro kun je overigens (zonder de code voor voorw. opmaak te gebruiken) wel hetzelfde bereiken als met voorw. opmaak, alleen heet het dan in Excel geen voorw. opmaak (maar het effect in het werkblad is hetzelfde).

Typ in D19 (afsluitend met Ctrl-Shift-Enter) en kopieer naar beneden:

=MAX(ALS(A$9:A$14=A19;ALS(B$9:B$14<B19;B$9:B$14)))

Idem in C19:

=MAX(ALS(A$9:A$14=A19;ALS(B$9:B$14=D19;C$9:C$14)))

De codetaal voor een Excel-macro is inderdaad vba,

ongeacht wat je er mee wil programmeren.

Dit is een mogelijkheid (maar er zijn ook andere):

=sommen.als(b1:b10;a1:a10;"<>"&"")

Een speciale berekening; dank voor je antwoord!

Louter uit interesse:

wat is de betekenis van het feit of een dag al dan niet in het weekend valt en of het een feestdag is?