Lijst met start en eind tijden

[Confictius]

helemaal, hiermee ga ik verder knutselen.

Ik ga er nog een macro aanhangen die het invullen automatiseert dmv een hele grote gele knop met jouw naam erop

 

[Wigi]

helemaal, hiermee ga ik verder knutselen.

Ik ga er nog een macro aanhangen die het invullen automatiseert dmv een hele grote gele knop met jouw naam erop

De knop in het klein zetten is al genoeg hoor... anders wordt het foeilelijk

Zet de vraag op opgelost aub.

 

[Confictius]

Nog een laatste;

de tijd wordt nu dmv een knop ingevuld waarna het de bedoeling is dat de cursor naar de volgende cel gaat. 3 Kolommen zijn niet geblokkeerd , de rest van het werkblad wel.

Wanneer ik een macro maak en na het intypen van =nu() in A3 met [tab] naar de volgende cel wil wordt dit tijdens het uitvoeren van de macro steeds vertaald naar een stap naar cel B3. Ongeacht in welke cel ik de tijd laat invullen.

De bijlage is misschien wat duidelijker dat dit verhaal.

 

[Wigi]

Dit is de enige code die je nodig hebt. De worksheet change kan weg.

Sub isnuauto()
    With ActiveCell
        .Value = Now
        Select Case .Column
            Case 1
                .Offset(, 1).Select
            Case 2
                .Offset(1, -1).Select
        End Select
    End With
End Sub

Wigi

 

[Confictius]

Ik bespeur een hoge concentratie zorgvuldig opgebouwde expertise :thumb:

 

[jack009]

ik heb dit onderwerp met belangstelling gevolgd, en ik wil u allen en wigi in het byzonder danken voor de oplossing, ik kampte al langer met het zelfde probleem, maar zit sinds kort maar op deze forum
ik dacht ik ga eens een beetje rondneuzen, en zie daar een oplossing voor mijn probleem

toch nog een kleine vraag

hoe kan ik dit beperken tot een cel en niet een hele kolom

nog maals mijn dank

groet Jack:thumb: :thumb:

 

[Wigi]

Voeg nog een voorwaarde toe:

ipv

If Target.Column < 3 Then

zet je

If Target.Column < 3 And Target.Row <= 10 Then

Hier gaat het dus over de eerste 10 rijen.

Verander zoals je wilt.

Wigi

 

[jack009]

werkt perfect

nogmaals mijn dank
ook voor de snelle reactie

groet Jack:thumb: :thumb: