Opgelost een bestaand getal, met VBA, in een andere cel met 1 verhogen

[ewh]

Wie kan helpen?

In C3 staat een jaartal bv 2024 hoe kan ik de waarde van B3 met een verhogen? zodat in B3 2025 komt te staan ?
lijkt simpel maar krijg het niet voor elkaar

 

[AHulpje]

In B3:
=C3+1
Of als er een datum in C3 staat:
=ZELFDE.DAG(C3;12)

 

[ewh]

oke, mij vraag was niet helemaal duidelijk. ik wil het graag in VBA zodat ik hem kan toevoegen aan een macro

 

[edmoor]

Zo dan?

Range("B3") = Range("C3") + 1

 

[AHulpje]

Of

Cells(3,2) = Cells(3,3) + 1

of

Cells(3, 2) = Cells(3, 2).Offset(, 1) + 1

 

[HSV]

Kan veel korter.

 

[Haije]

bedoel je zo?

[B3]=[C3]+1

 

[edmoor]

Bovenstaande is ook afhankelijk van of het gaat om je actieve werkblad of niet.

 

[HSV]

bedoel je zo?

Was meer cynisch.
@edmoor geeft al een prima oplossing; en ik vind als je daar niet overheen kan qua lengte of prestatie/snelheid reageer je niet meer.
Sommige doen zulke simpele vragen ook nog in een bestandje gegoten met de achterliggende gedachte dat we die gaan bekijken, of schamen zich voor de code die ze direct in codetags kunnen plaatsen.
Maar goed, ieder zijn meug natuurlijk.

Bovenstaande is ook afhankelijk van of het gaat om je actieve werkblad of niet.

Dat geldt natuurlijk voor alle drie geplaatste codes.