formule laten lopen bij invullen cel

Hallo,

Kan iemand mij helpen.
Kan ik een berekening in een lege cel laten uitvoeren als ik daar een getal invoer?
BV: in cel A1 vul ik 3600 in maar deze moet met 1.17 vermenigvuldigd worden,is dit mogelijk,

ps:zo heb ik nog verschillende cellen met andere waarden waarin ik misschien deze formule ook kan toepassen.


mvg,Luc

Luc, met de standaard functionaliteiten van Excel kan je óf een formule invoeren óf een waarde invullen. Beide tegelijk kan niet. Eventueel is dit met VBA wel af te vangen. Kan je programmeren?

Ginger,

Bedankt voor de reactie.
Ps:ik stel mij ook alles te simpel voor,blijkbaar werkt dat dus niet zo:d


mvg,Luc

Deze achter je werkblad:

Edmoor,

Bedankt voor de aangebrachte oplossing "werkt perfect"
ps:Hoe kan ik deze uitbreiden voor verschillende cellen "onderstaande werkt niet" of moet ik telkens een andere aanmaken?

Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address(0, 0) = "C6" Then
Target.Value = Target.Value * 1.17
End If
Application.EnableEvents = True
End Sub



Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address(0, 0) = "C7" Then
Target.Value = Target.Value * 1.5
End If
Application.EnableEvents = True
End Sub


Private Sub Worksheet_Change(ByVal Target As Range)
Application.EnableEvents = False
If Target.Address(0, 0) = "C8" Then
Target.Value = Target.Value * 1.4134
End If
Application.EnableEvents = True
End Sub



mvg,Luc

Ik weet dat dit niet in je vraag staat, maar is dit niet eenvoudiger op te lossen met een hulpkolom? Of loop je dan tegen andere problemen aan?

KristiaanL,

Dit ga ik in andere files ook gebruiken "op het werk" maar mag/kan geen kolommen edg. toevoegen/aanpassen.
ps:Ik dacht van de aangebrachte oplossing te kunnen uitbreiden"zie post5" naar meerdere cellen of is dit niet mogelijk (ken niet zo veel van vba)

mvg,Luc

Ik denk niet dat je goed in beeld hebt wat Worksheet_Change doet.
Als antwoord op je vraag:

Edmoor

Bedankt voor de aanpassing

ps:ge hebt groot gelijk dat ik niet mee ben met deze materie,maar nu kan ik deze met u hulp toch verder gebruiken.


mvg,Luc

Edmoor,
ik heb geprobeerd "op het werk" om dit in te brengen maar dit werkt niet.

Compile error

End If without block If
verschijnt op het scherm?


mvg,Luc

Ik denk dat end if, end select moet zijn.

ExelAmateur


Bedankt voor de oplossing ,nu kunnen we verder.
ps:Heb geen kaas gegeten van vba


mvg,Luc

Graag gedaan.
Vergeet je niet om de vraag als opgelost te zetten, dank u.

Tikfoutje van mij zie ik, opgelost door ExcelAmateur :thumb: