Excel automatisch cel invullen door Tab

[Idee]

Kolom A= datum, kolom B=bedrag
Rij 3A : 19/07/2025 rij 3B : 125,60€
Rij 4A als ik Tab druk is de datum gelijk aan die van de vorige rij.

[hviaene]

Ik veronderstel dat je de kolommen A en B ingesteld hebt als resp. datum en financieel, maar dan nog:
het standaardgedrag van excel bij drukken van tab is naar de volgende cel in de rij te springen. Er moet dus nog heel wat van formules en evt. macro's in dat werkblad zitten waar je geen info over geeft.

[franç]

In VBA-Excel is de TAB-opdracht gereserveerd om gebruikt te worden in combinatie met de PRINT-opdracht. Om te bereiken wat je wil, kun je onderstaande macro gebruiken, die je best kunt vastleggen onder een sneltoets. Aangenomen is dat je de macro wil gebruiken in het eerste blad. Let er op dat je na plaatsing van de macro in een module, het Excelbestand opslaat als xlsm-bestand (=Excelbestand met macro's).

Code: Selecteer alles

Sub macro1()
Dim ar As Integer, ac As Integer, myvalue As Date
With Sheets(1)
ar = ActiveCell.Row: ac = ActiveCell.Column
If ac = 1 And ar > 1 Then
myvalue = .Range("A" & ar - 1).Value
With ActiveCell
.Value = myvalue
.NumberFormat = "dd-mm-yy"
End With
.Range("B" & ar).Activate
End If
End With
End Sub

[franç]

Én Idee, is het gelukt ?