Opgelost huidige weeknummer.

[schilderehbo]

Ik wil graag dat het bestandje opent op de huidige weeknummer ik heb een iso.weeknummer gebruikt. bestandje bijgevoegd
alvast bedankt.

 

[HSV]

Riskant met de formules in kolom A: zoals bv. =Som(S3:T66).

 

[schilderehbo]

Mag dat niet of kan dat niet dan ?

 

[schilderehbo]

Want die kan ik ook ergens anders zetten.

 

[HSV]

Die som formules kan je dus beter ergens anders neerzetten.

Stel dat er een uitkomst is als 17 in cel A8 en de weeknummer die je wil staat ergen in cel A100, dan zal het de eerste 17 vinden die het tegenkomt.

Met maar een blad in je werkboek.

Private Sub Workbook_Open()
 Application.Goto Cells(Application.Match(DatePart("ww", Date, 2, 2), Columns(1), 0), 1)
End Sub

 

[popipipo]

2 dingen die ik nog zou veranderen.

Ten eerste verwijder al die samengevoegde cellen ze zijn totaal overbodig en kunnen voor veel problemen zorgen; maak de kolom gewoon iets breder.

Ten tweede de cel waar het weeknummer in staat bevat een tekstvak met de tekst "Week nr: "
Verwijder deze en verander het celformaat in "Week nr : "00

 

[jverkerk]

Ik zou dit gebruiken.

 

[AHulpje]

Of zoiets:

 

[schilderehbo]

Ik zou dit gebruiken.

Is een hele mooie maar ik heb per dag minimaal 7 a 8 regels nodig.

 

[jverkerk]

Je hebt er toch al 10 of bedoel je dat niet.

 

[snb]

Met een goede gegevensstruktuur kun je met goto, zonder zoeken in een werkblad naar de gewenste kolom/rij op grond vna het weeknummer.