• Privacywetgeving
    Het is bij Helpmij.nl niet toegestaan om persoonsgegevens in een voorbeeld te plaatsen. Alle voorbeelden die persoonsgegevens bevatten zullen zonder opgaaf van reden verwijderd worden. In de vraag zal specifiek vermeld moeten worden dat het om fictieve namen gaat.

VBA: Clearcontents

Status
Niet open voor verdere reacties.

Remcovt

Gebruiker
Lid geworden
23 sep 2021
Berichten
16
Goedemorgen beste Helpmij forumleden,

Ik heb een bestandje waar ik al een tijd mee werk, nu is er echter een aanpassing in nodig.

Ik ben op zoek naar een aanpassing binnen de volgende VBA code:


Sub Clearcells()
Range("$e$11", "$e$74").ClearContents
Range("$e$76", "$e$79").ClearContents
Range("$e$81", "$e$155").ClearContents
Range("$e$157", "$e$176").ClearContents
Range("$e$179", "$e$185").ClearContents

End Sub


Deze code heeft voor mij altijd gewerkt. Echter wil ik nu een aanpassing erin doen, ik wil namelijk op het moment dat er op de knop gedrukt wordt niet de cellen leegmaken. Ik wil nu dat deze terug wijzigt in de oorspronkelijke waarde. Dat wil zeggen dat alle cellen niet leeggemaakt moeten worden, maar er de tekst "Nee" in de cellen moet komen staan zodra er op de knop gedrukt wordt. (= oorspronkelijke waarde).

Nu ben ik zelf geen held in VBA, ik krijg het echter niet op internet gevonden.. is er iemand die weet hoe ik dit zou moeten doen?
 
Wijzig .ClearContents in ="Nee"
 
Daarnaast kan je het nog wel iets vereenvoudigen:
Code:
Range("E11:E74") = "Nee"
 
Ofwel:
Code:
Range("E11:E74,E76:E79,E81:E155,E157:E176,E179:E185").Value = "Nee"
 
Status
Niet open voor verdere reacties.
Steun Ons

Nieuwste berichten

Terug
Bovenaan Onderaan