Werkblad aanmaken?

[Gidon]

Hallo handige mensen,

Ik ben bezig met een weekplanning. Dat betekent dus voor elke week hetzelfde werkblad.
Nou heb ik het al voor elkaar om de actielijst voor het maken van een nieuw werkblad te verkleinen naar:

- Nieuw werkblad aanmaken en de naam ervan aanpassen.
- Vorige werkblad kopieren en plakken.
- Cel C3 aanpassen.
(voorbeeld "=+Week41!C3+1" veranderen in "=+Week42!C3+1")

Is er bij iemand een manier bekend om deze "actielijst" verder te verkleinen?


Bijlage: De weekplanning zoals ik die nu heb.

 

[Wigi]

Hallo handige mensen,

Ik ben bezig met een weekplanning. Dat betekent dus voor elke week hetzelfde werkblad.
Nou heb ik het al voor elkaar om de actielijst voor het maken van een nieuw werkblad te verkleinen naar:

- Nieuw werkblad aanmaken en de naam ervan aanpassen.
- Vorige werkblad kopieren en plakken.
- Cel C3 aanpassen.
(voorbeeld "=+Week41!C3+1" veranderen in "=+Week42!C3+1")

Is er bij iemand een manier bekend om deze "actielijst" verder te verkleinen?

Bijlage: De weekplanning zoals ik die nu heb.

- Nieuw werkblad aanmaken en de naam ervan aanpassen.
- Vorige werkblad kopieren en plakken.

kan je simpeler doen door:

1. Ctrl ingedrukt te houden
2. de bladtab met linkermuisknop te verschuiven naar een andere plaats in de rij

Nu, dit alles kan met VBA gebeuren, maar je moet je ook afvragen of het sop de kool waard is. Hoe "lang" duurt het om die acties uit te voeren? 10-15 seconden per week... Een macro zou het sneller doen, maar ik denk niet dat het de moeite is om een macro te schrijven voor 10 seconden tijdswinst per week. Maar het is wel mogelijk.

Wigi

 

[Gidon]

Hey Wigi,

Bedankt voor je antwoord. Ik weet idd dat er weinig tijdswinst te behalen is.

Ik ben alleen benieuwd of het op een andere manier ook kan. Macro's heb ik bijvoorbeeld
nog nooit mee gewerkt. Als het kan met een macro ga ik me daar wel verder in verdiepen.
Het is voor mezelf om meer kennis te krijgen van hoe Excel werkt. Ik vind het namelijk een
erg handig programma.

Groet,
Gidon

 

[Wigi]

Verander de formule in F6 op elk tabblad tot

=DATUM(2006;1;1)+(C3-1)*7+1

dan is er geen verwijzing meer naar een eerder tabblad.

Wigi

 

[Wigi]

Hier is de macro:

Sub nieuweweek()
    Dim week As Integer
    week = Sheets(Sheets.Count).Range("C3")
    Sheets(Sheets.Count).Copy After:=Sheets(Sheets.Count)
    With Sheets(Sheets.Count)
        .Name = "Week" & week + 1
        .Range("C3") = week + 1
    End With
End Sub

Wigi

 

[Wigi]

Hier is je bestand terug, aangepast met de macro en de formule die ik voorstelde. C3 is ook niet meer met een formule, maar gewoon.

Wigi