Excel sheet resetten

[DannyKos]

Beste forum bezoekers:thumb:

opnieuw hoop ik hier andtwoord te vinden op mijn vraag.

Weet iemand of het mogelijk is om CELLEN die numeriek zijn ingevuld,
te resetten naar hun begin waarde (0)

Ik zal even een voorbeeld meesturen.

alvast bedankt

met vriendelijke groet,

Danny:thumb:

 

[krolik]

Je kunt toch een macro maken die de gewenste cellen op 0 zet. Ik vraag me af of de 1e kolom geen getal of nummer moet aangeven i.p.v. valuta.

 

[Hoornvan]

Zo iets?

 

[Haije]

of zo?

of is dit wat je bedoelt?

 

[Hoornvan]

Haije,

Heb je mooi opgelost.
Formula hoeft er niet bij dit is genoeg.

Sub terugnaarbegin()
  Range("ingevuld") = 0
End Sub

 

[DannyKos]

Haije,

Heb je mooi opgelost.
Formula hoeft er niet bij dit is genoeg.

Sub terugnaarbegin()
  Range("ingevuld") = 0
End Sub

WAUW! dat is echt precies wat ik bedoel!!!

maar nog 1 vraag hoe kan ik instellen bij welke cellen dit toegepast mag worden?

ik zie namelijk in de visual geen bereik aangegeven,

 

[Hoornvan]

Danny,

Het kan zelfs nog iets korter de code.

Sub terugnaarbegin()
  [ingevuld] = 0
End Sub

Kijk links boven in het naamvak daar heeft hij het bereik een naam gegeven.

 

[DannyKos]

WAUW! dat is echt precies wat ik bedoel!!!

maar nog 1 vraag hoe kan ik instellen bij welke cellen dit toegepast mag worden?

ik zie namelijk in de visual geen bereik aangegeven,

Sorry ik had de zin ''ingevuld over het hoofd gezien

ik neem aan dat ik het ook gewoon per cel in kan geven bijvoorbeeld d5+d6+d6+d8+d9 ?

ff proberen hehe

 

[Hoornvan]

Danny,

Nu word I14 en I16 leeg gemaakt.

Sub terugnaarbegin()
  [I14,I16] = 0
End Sub