Ik gebruik de volgende macro om mijn werkblad leeg te maken:
Hoe kan deze code kleiner. Of hoe kan ik een bepaalde range wissen (gegevens) zonder dat de formules worden gewist?
Sub Werkblad_wissen()
Range("C8:E8,G8:I8,K8:M8,O8:Q8,S8:U8,W8:Y8,AA8:AC8").Value = ""
Range("C10:E10,G10:I10,K10:M10,O10:Q10,S10:U10,W10:Y10,AA10:AC10").Value = ""
Range("C12:E12,G12:I12,K12:M12,O12:Q12,S12:U12,W12:Y12,AA12:AC12").Value = ""
Range("C14:E14,G14:I14,K14:M14,O14:Q14,S14:U14,W14:Y14,AA14:AC14").Value = ""
Range("C16:E16,G16:I16,K16:M16,O16:Q16,S16:U16,W16:Y16,AA16:AC16").Value = ""
Range("C18:E18,G18:I18,K18:M18,O18:Q18,S18:U18,W18:Y18,AA18:AC18").Value = ""
Range("C20:E20,G20:I20,K20:M20,O20:Q20,S20:U20,W20:Y20,AA20:AC20").Value = ""
Range("C22:E22,G22:I22,K22:M22,O22:Q22,S22:U22,W22:Y22,AA22:AC22").Value = ""
Range("C24:E24,G24:I24,K24:M24,O24:Q24,S24:U24,W24:Y24,AA24:AC24").Value = ""
Range("C26:E26,G26:I26,K26:M26,O26:Q26,S26:U26,W26:Y26,AA26:AC26").Value = ""
Range("C28:E28,G28:I28,K28:M28,O28:Q28,S28:U28,W28:Y28,AA28:AC28").Value = ""
Range("C30:E30,G30:I30,K30:M30,O30:Q30,S30:U30,W30:Y30,AA30:AC30").Value = ""
Range("C32:E32,G32:I32,K32:M32,O32:Q32,S32:U32,W32:Y32,AA32:AC32").Value = ""
Range("C34:E34,G34:I34,K34:M34,O34:Q34,S34:U34,W34:Y34,AA34:AC34").Value = ""
Range("C36:E36,G36:I36,K36:M36,O36:Q36,S36:U36,W36:Y36,AA36:AC36").Value = ""
Range("C38:E38,G38:I38,K38:M38,O38:Q38,S38:U38,W38:Y38,AA38:AC38").Value = ""
Range("C40:E40,G40:I40,K40:M40,O40:Q40,S40:U40,W40:Y40,AA40:AC40").Value = ""
Range("C42:E42,G42:I42,K42:M42,O42:Q42,S42:U42,W42:Y42,AA42:AC42").Value = ""
Range("C44:E44,G44:I44,K44:M44,O44:Q44,S44:U44,W44:Y44,AA44:AC44").Value = ""
Range("C46:E46,G46:I46,K46:M46,O46:Q46,S46:U46,W46:Y46,AA46:AC46").Value = ""
End Sub
Hoe kan deze code kleiner. Of hoe kan ik een bepaalde range wissen (gegevens) zonder dat de formules worden gewist?