Bij Macro ClearContents krijg ik hashtags in de kolommen ertussen

[marc651]

Hoi,

Ik heb een knop in een document.
Deze moet er voor zorgen dat de inhoud van de cellen in kolommen F,G,K,L en M gewist worden.
Als ik dit doe dan komen er in de kolommen H,I en J allemaal Hashtags te staan.
Vreemd genoeg ook in het document ervoor.
Bijgevoegd het document waar het om gaat.
Weet iemand raad?

Bekijk bijlage 221831

 

[edmoor]

Daar staan niet echt hashtags maar de melding #WAARDE omdat na het wissen de uitkomst van de formule niet goed meer is.
Maak de kolommen maar eens breder, dan zie je #WAARDE staan.

 

[VenA]

Als je de kolom wat breder maakt zal je zien dat er #WAARDE staat. Waardoor het komt kan ik nog niet vinden. Verander de code in

Sub Wissen()
ActiveSheet.Range("F8:G46,K8:M46").Value = ""
End Sub

 

[HSV]

Voeg de rode coderegel toe.

Function OverurenOptellenInMaand(Datums As Range, WerkUren As Range, OverurenTabel As Range, OverurenPerc As Double, Mnd As Integer)
    Dim T As Integer, T2 As Integer
    Dim R As Range
    [COLOR=#FF0000]Application.Volatile[/COLOR]
    For T = 1 To WerkUren.Columns.Count Step 2

 

[marc651]

Wederom veel dank VenA.
Werkt goed zo.

 

[HSV]

Je eigen code werkt goed Marc.
De rest doet #4