Fout 13 tijdens uitvoering: Typen komen niet met elkaar overeen

[patje8]

Ik heb een excel bestand waar ik steeds een foutmelding krijg in tabblad "ONTVORM".

Fout 13 tijdens uitvoering:
Typen komen niet met elkaar overeen.

De fout zit hem in volgende lijn:

Do While Not VORM Is Nothing And Worksheets("FrigoKook").Cells(VORM.Row, "C").Value <> Worksheets("ONTVORM").Cells(lRij, "C").Value

Het is de bedoeling dat al de cellen in tabblad Ontvorm in kolom G + I + K worden opgeteld en daarna afgetrokken worden van kolom C van tabblad FrigoKook.

 

[Cobbe]

Do While Not VORM Is Nothing And Worksheets("FrigoKook").Cells(VORM.Row, "C").[COLOR="red"][B]Text[/B][/COLOR] <> Worksheets("ONTVORM").Cells(lRij, "C").[B][COLOR="red"]Text[/COLOR][/B]

Deze zal niet blijven hangen.

Succes, Cobbe

 

[patje8]

Dan blijf excel hangen, hij reageert niet meer als ik dit verander.

 

[Cobbe]

Ja sorry, had het ook gezien, achteraf.

Cobbe

 

[Warme bakkertje]

Al de formules in kolom C van ONTVORM geven een foutmelding, daarom blokkeert de macro.
PS Gelieve volgende maal de bladbeveiliging te verwijderen alvorens je bestand te posten.