Als formule via Commandobutton

[dinge]

Goedendag Allemaal

Ik ben bezig met een programmaatje op te zetten in excel.
Dit gaat voor zover goed.
Via een formulier kan ik mijn tabblad sportersdata vullen.
Daarna wil ik een schutter inschrijven via de button "schutter inschrijven"
Daar loop ik tegen een fout aan.
In hulp kolom "H" op het tabblad inschrijvingen moet de tekst samengevoegd worden uit de kolommen "I" en "K" dat gaat nog goed
Als in Kolom "H" "CAJe1" of "CAJe2" zou in kolom "F" CAJe moeten komen, maar als er RJe1 in kolom H staat moet in Kolom F ook RJe1 staan.
En daar gaat het fout.Bekijk bijlage Kopie van Nieuwe scoresheet test.xlsm
Ik heb in kolom "F" handmatig ingevuld zoals het zou moeten worden.
Ik heb daar formule .Celle(LegeRegel, "f").FormulaR1C1 = "=IF(RC[2]=""CAJe1"",""CAJe"",IF(RC[2]=""CAJe2"",""CJe"",RC[2]))" voor gebruikt maar dit werkt niet helaas.
Ik krijg de foutmelding 438 tijdens uitvoering.

Kan iemand mij vertellen welke formule ik wel kan gebruiken

Heb het bestandje mee gestuurd voor de duidelijkheid

Bekijk bijlage Kopie van Nieuwe scoresheet test.xlsm

 

[edmoor]

Er staat daar .Celle in plaats van .Cells

 

[dinge]

Goedendag edmoor

Het wordt tijd voor een nieuwe bril denk.
Ik heb .celle veranderd in .cells en het werkt gelukkig.
Dank je wel voor de moeite :thumb::thumb: