Auteur Topic: Opbouw dagverslag automatiseren (gelezen 30016 keer)

coolsluc · « **Gepost op:** 15 juni 2014, 11:11:39 »

Kan iemand mij helpen om mijn dag verslag een beetje te automatiseren.
1)In blad Perso-BZM staat in cel B3 de datum , kan deze via bv. een template zich autm. aanpassen aan de dag dat de file word geopend? () TODAY kan niet als de file word geraadpleegd op een latere dag zou de datum autm. veranderen!!
Nu pas ik deze elke dag aan (de verslagen worden gearchiveerd per dag).
2)In hetzelfde blad staan de drie ploegverantwoordelijke die elke week van ploeg veranderen
Dit wil zeggen per 7dagen beginnend op maandag , kan telkens na een week (7dagen) de drie eerste namen een plaats opschuiven zodat deze van ploeg1 naar ploeg2 en deze van ploeg2 naar ploeg3 opschuift en dan terug naar poeg1 gaat , dit doe ik nu ook manueel.
3)kan ook in cel B10 het aantal personen ingevuld worden uit blad Sel ploegboek rij 38 voor ploeg1, in cel C10 deze uit rij 85,in cel D10 deze uit rij 132 (dit alles gebeurd nu manueel)

Ps:het grote probleem is nu dat er per week 7 verslagen worden aangemaakt en opgeslagen onder een andere datum die telkens manueel word aangepast alsook de file naam.
Kan als de file word opgeslagen deze de naam krijgen van de datum uit blad Perso-BZM cel B3 bv:01-06-2014-->zie bijlage;
Opmerking: deze vraag had ik ook gepost op Helpmij.nl op 10/06/2014 (maar geen reactie daar)vandaar dat ik jullie hulp in roep.
alvast bedankt !!

Mvg,Luc

SoftAid · « **Reactie #1 Gepost op:** 15 juni 2014, 13:52:58 »

Citaat van: coolsluc op 15 juni 2014, 11:11:39

1)In blad Perso-BZM staat in cel B3 de datum , kan deze via bv. een template zich autm. aanpassen aan de dag dat de file word geopend? () TODAY kan niet als de file word geraadpleegd op een latere dag zou de datum autm. veranderen!!
Nu pas ik deze elke dag aan (de verslagen worden gearchiveerd per dag).

Je vraagt dat de datum zich automatisch zou aanpassen "aan de dag dat het bestand wordt geopend"...
Dan is =TODAY() of =Vandaag() toch perfect. Anders moet je jou vraag her-formuleren $:-\$ .

Citaat van: coolsluc op 15 juni 2014, 11:11:39

3)kan ook in cel B10 het aantal personen ingevuld worden uit blad Sel ploegboek rij 38 voor ploeg1, in cel C10 deze uit rij 85,in cel D10 deze uit rij 132 (dit alles gebeurd nu manueel)

Formule in B10: =8-AANTAL.ALS('Sel ploegboek '!A38:H38;"")
Formule in C10: =8-AANTAL.ALS('Sel ploegboek '!A85:H85;"")
Formule in D10: =8-AANTAL.ALS('Sel ploegboek '!A132:H132;"")

Citaat van: coolsluc op 15 juni 2014, 11:11:39

Kan als de file word opgeslagen deze de naam krijgen van de datum uit blad Perso-BZM cel B3 bv:01-06-2014-->zie bijlage;

Dat kan met de "opslaan"- macro aan te passen.

Maar het zou verhelderend zijn voor ons als je de werkwijze zou uitleggen:
-Eerst doe ik dit
-Dan doe ik dat
-Op dit moment sla ik op
-Op dat moment druk ik af
-Na dit moet de datum vast worden (dus niet meer "Vandaag()" zijn, maar permanent).

enzovoort.

SoftAid

coolsluc · « **Reactie #2 Gepost op:** 16 juni 2014, 11:00:14 »

SoftAid: bedankt voor de reactie (enkele aanpassingen heb ik reeds uitgevoerd),hierbij een beetje uitleg zoals gevraagd.
1)de file word geopend en datum word autm. ingevuld =TODAY()is reeds aangepast.
2)In sheet perso-BZM word gekeken of de juiste coach op de juiste plaats staat,
dwz.ploeg 1,2 of 3 (dit zou autm. moeten gebeuren)de week begint op maandag tot zondag daarna moeten de coachen 1ploeg opschuiven deze van ploeg1 gaat naar ploeg2 enz.
dus als het mogelijk is zou in het moederblad een formule moeten komen die autm. de week berekend en dan de plaats van de coachen veranderd.
3)verslag word ingevuld in ploeg1.
4)het aantal aanwezige personen in de ploeg moet ingevuld worden in sheet perso-BZM
(is reeds aangepast met uw formule) .
5)Het verslag word opgeslagen, de datum moet (in sheet perso-BZM) zoals in je opmerking nu definitief worden.
6)De file moet nu autm. de naam krijgen van de datum in sheet perso-BZM.
7)als ploeg2 en of ploeg 3 de file opent moet na het invullen van hun verslag dit opgeslagen worden onder de datum zoals in ploeg1.
ps.de verslagen worden per ploeg afgeprint na het invullen van de gegevens (dit is een aparte macro).

Hopelijk is dit voldoende duidelijk anders laat maat iets weten.

Mvg,Luc

pitufo · « **Reactie #3 Gepost op:** 16 juni 2014, 21:25:41 »

Citaat van: coolsluc op 15 juni 2014, 11:11:39

In blad Perso-BZM staat in cel B3 de datum , kan deze via bv. een template zich autm. aanpassen aan de dag dat de file word geopend? () TODAY kan niet als de file word geraadpleegd op een latere dag zou de datum autm. veranderen!!

Luc,
Je zegt het zelf : TODAY() kan niet... om later te stellen :

Citaat van: coolsluc op 16 juni 2014, 11:00:14

enkele aanpassingen heb ik reeds uitgevoerd
de file word geopend en datum word autm. ingevuld =TODAY()is reeds aangepast.

Ik denk niet dat je dan veel hebt gewonnen

: "raadplegen" bestaat in Excel niet, het zal dus ook in de gearchiveerde kopies de datum blijven aanpassen (als je ze "alleen lezen" maakt lopen ze wel geen "blijvende schade" op)

Een betere oplossing zou kunnen zijn er een sjabloon van te maken dat bij openen de datum als waarde in die cel neerzet.

Mvg,
pitufo

SoftAid · « **Reactie #4 Gepost op:** 16 juni 2014, 21:40:52 »

Citaat van: pitufo op 16 juni 2014, 21:25:41

Ik denk niet dat je dan veel hebt gewonnen : "raadplegen" bestaat in Excel niet, het zal dus ook in de gearchiveerde kopies de datum blijven aanpassen (als je ze "alleen lezen" maakt lopen ze wel geen "blijvende schade" op)

Je kan best via een macro in "A1" de datum van vandaag() kopiëren, en dan via "Plakken speciaal", Waarden, deze waarde in Cel "B1" plakken.

Code: [Selecteer]

Sub Macro1()
    Range("A1").Select
    Selection.Copy
    Range("B1").Select
Selection.NumberFormat = "m/d/yyyy"
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks:=False, Transpose:=False
Application.CutCopyMode = False
End Sub

De datum in "B1" kan je dan gebruiken om de naam van je "opslag"-document te maken.

SoftAid

coolsluc · « **Reactie #5 Gepost op:** 17 juni 2014, 09:15:29 »

Heren, bedankt om te willen helpen maar dit is voor mij te hoog gegrepen (ben laaggeschoold)SORRY!!
(ken enkele simpele handelingen in Excel)dit allemaal geleerd met hulp van het forum.
PS: ben al een beetje opgeschoten met de file zodat ik dagelijks minder moet aanpassen.
kan hier mee verder ,alvast nogmaals bedankt voor de hulp.

Pitufo/SoftAid,hierbij een beetje uitleg waarom TODAY() had ik ingebracht op het antwoord van SoftAid dat stelde dat dit kon verwerkt worden in een macro (waarschijnlijk heb ik dit verkeerd begrepen).
het vervelende is dat de file verschillende malen word geopend per ploeg om deze aan te vullen en telkens terug word opgeslagen (de datum moet dus dezelfde blijven).
Na invullen van het verslag door ploeg3 (volgende dag na 6uur s 'morgens)word de file vastgezet = alleen lezen!!

mvg,Luc

SoftAid · « **Reactie #6 Gepost op:** 17 juni 2014, 11:01:00 »

Hallo Luc,

je kan met Excel en macro's bijna alles gedaan krijgen wat je wenst, enkel moet je in gewone mensentaal duidelijk zeggen wat je wenst als resultaat, en op welke manier dit bekomen wordt. Ik heb je al eerder gevraagd een lijstje te maken, maar dat van die:

Citaat

Na invullen van het verslag door ploeg3 (volgende dag na 6uur s 'morgens)word de file vastgezet = alleen lezen!!

had je niet vermeld in je vorige berichten.

Wij willen wel, maar jij moet de (uitgebreide) opsomming maken van alle stappen die moeten genomen worden.

De datum aanpassen, vastzetten, pas vastzetten op de datum van gisteren, pas vastzetten op het ogenblik van afdrukken, alles kan met macro's.

Laat maar horen.

SoftAid

coolsluc · « **Reactie #7 Gepost op:** 17 juni 2014, 12:05:49 »

SoftAid,ga nog een poging wagen om de uitleg voor jullie verstaanbaar te maken.

1)momenteel moet er in sheet Perso-BZM om de 7dagen de namen van ploegcoachen cellen B7,C7 en D7
manueel verzet worden naar een volgende ploeg (andere week).
Kan dit via een formule die volgens een kalender werkt zo ingebracht worden dat er op maandag wanneer de file geopend word een verschuiving van de namen plaats vind bv:naam coach ploeg1 gaat naar ploeg2 enz.
Ps:Pitufo heeft aangegeven dat misschien via een sjabloon (moederblad??) kan gewerkt worden.

2)Nu heet de file blanco-PLOEGENBOEK Selenium.xlsm .
Als deze geopend word en er word iets ingevuld waarna deze word opgeslagen moet deze onder de datum van openen opgeslagen wordendit word de definitieve filenaam.
Vb:16-06-2014
(maar de file moet nog meerdere keren kunnen aangepast worden in de 3ploegen)
Dit wil zeggen wanneer de file opnieuw geopend word dat de formule today() niet meer opnieuw van toepassing mag zijn daar er na 00:00 ook nog gegevens ingevuld worden en we al in de volgende dag zitten
PS: kan de formule =TODAY()bij eerste maal openen van de file vervangen worden door de datum van openen en permanent gezet worden (via macro??)

3)Wanneer de volgende dag deze file na 6uur s ’morgens geopend word zo deze enkel alleen-lezen mogen zijn en moet er opnieuw via de sjabloon een nieuw dag verslag aangemaakt worden.

PS: wanneer iets onduidelijk is vraag maar

mvg,Luc

SoftAid · « **Reactie #8 Gepost op:** 17 juni 2014, 12:16:25 »

Hallo Luc,

Begint je week op maandag 06:00h ? Dus moeten de namen verplaatst worden bij het openen van de file op maandag 06:00h?
De andere dagen moet het werkblad Perso-BZM om 06:00 h afgedrukt worden. De datum op dat blad is dan de datum van de dag ervoor, juist?
Of anders, wanneer moet er wat worden afgedrukt?

SoftAid

coolsluc · « **Reactie #9 Gepost op:** 17 juni 2014, 12:41:10 »

SoftAid,de week begint op maandag 6uur. Bij het openen moeten dan de namen een ploeg verschuiven.
Het blad Perso-BZM word niet afgedrukt enkel ter controle.
Het blad Sel ploegenboek word per ploeg afgedrukt (zie macro’s).
Ps:enkel het verschuiven van de namen , de filenaam en de datum moeten autm.ingevuld worden.

Vertrek nu naar het werk, misschien tot later

Mvg,Luc

SoftAid · « **Reactie #10 Gepost op:** 17 juni 2014, 21:37:55 »

Hallo Luc,

ik heb een macro aangemaakt die bij het openen van je werkboek moet kijken of het maandag na 06:00 h is, en zo ja, de ploegbazen een plaats laat opschuiven, en de datum van die maandag vast zet in een andere cel.

Er moet wel nog gewerkt worden aan die macro (en alle hulp is welkom) want die instelling moet nog beveiligd worden tegen dubbel gebruik tijdes die maandag. Sluiten en terug openen op diezelfde maandag zou de ploegbazen opnieuw een stoeltjesdans laten doen.

Zelf heb ik niet veel tijd (meer), vertrek op verlof voor 10 dagen....

Alleszins al iets gedaan, die datum als een naam van een nieuw bestand geven is nu gemakkelijk uit die "andere cel" ("E3")

Zie bijlage

SoftAid

coolsluc · « **Reactie #11 Gepost op:** 18 juni 2014, 09:15:06 »

SoftAid, eerst en vooral een prettig verlof toegewenst.
Ik ga eens bekijken of ik iets met macro kan (ken er niet veel van).
In ieder geval de aanzet is gegeven, bedankt voor de geleverde inspanning.

mvg,Luc

coolsluc · « **Reactie #12 Gepost op:** 18 juni 2014, 11:09:06 »

Aan alle helpers, als ik op dinsdag, woensdag enz. een nieuw blad open blijft de datum in( Perso-BZM cel B3) op maandag staan(= verwijzing naar cel E3)
ps.de datum in cel B3 moet deze zijn van de dag dat file geopend word en moet tevens de naam van de file worden als deze word opgeslagen.
Als de file eenmaal is opgeslagen en deze wordt opnieuw geopend mogen de datums niet meer veranderd worden
De datums mogen zich enkel aanpassen als er een nieuw sjabloon geopend word.
waarschijnlijk een aanpassing nodig in de macro??
kan iemand mij helpen AUB.

Nog een opmerking IVM. doorschuiven ploegcoachen;als ik de datum van de pc een week verder zet past de file zich aan maar enkel voor de datum, de doorschuiving word niet uitgevoerd??

mvg,Luc

SoftAid · « **Reactie #13 Gepost op:** 18 juni 2014, 14:23:41 »

Citaat van: coolsluc op 18 juni 2014, 11:09:06

Aan alle helpers, als ik op dinsdag, woensdag enz. een nieuw blad open blijft de datum in( Perso-BZM cel B3) op maandag staan(= verwijzing naar cel E3)

Hallo Luc,

Dat heb je toch fout hoor. Het is wel nodig dat, als je de Windows-datum veranderd, je het Werkboek sluit en terug opent, of ergens in een cel "iets" typt (en dat mag je dan terug verwijderen). Daarna zal je datum in "B3" aangepast zijn.

De formule in "B3" is =NU(), wat overeenkomt met =Vandaag() of = Today(), maar dan met de huidige tijd inbegrepen.
Je ziet die tijd niet, omdat als opmaak voor cel "B3" gekozen is voor "maandag:dd:Juni:jjjj". De datum in "B3" veranderd wel als je een dag verder bent.
De datum in "E3" daarentegen is afgeleid van de datum in "B3", en niet andersom. Ook de tijden in "G3" en "I3" zijn afgeleid van "B3".
De datum van "E3" is aangemaakt om een vaste datum te verkrijgen die blijft staan gedurende de hele week.

Citaat van: coolsluc op 18 juni 2014, 11:09:06

Nog een opmerking IVM. doorschuiven ploegcoachen;als ik de datum van de pc een week verder zet past de file zich aan maar enkel voor de datum, de doorschuiving word niet uitgevoerd??

Excuses hiervoor. De macro die hier voor aangemaakt was had ik in een module gezet, in plaats van in het Vak Werkboek van VBA.

In bijlage de aangepaste versie.

Er moet nog veel gebeuren met dit bestand, en ik zit zeer krap in tijd. Hopelijk kan iemand je hier verder mee helpen. Ik zelf kijk er af en toe nog wel eens, en zal dan nog verbeteringen aanbrengen.

SoftAid

coolsluc · « **Reactie #14 Gepost op:** 19 juni 2014, 09:40:45 »

SoftAid, de datum +het doorschuiven van de namen werkt perfect
nogmaals bedankt en voor de andere punten wacht ik af op hulp van andere (ken er zelf niets van).

mvg,Luc

Help!

Menu

Hulp bij posten

Zoeken

Recente topics