Zoeken en vervangen deel van een formule

[Witsenburg]

Goedemiddag,

ik heb een leuk sheet opgezet voor de kostprijsbepaling van een machine die ik in vele varianten kan maken. Ik maak nu een tweede sheet, voor een soortgelijke machine, maar toch even anders. Ik wil graag in het nieuwe sheet een deel van een vaak gebruikte formule 'zoeken en vervangen'

In de eerste sheet staan de formules:
=Blabla1*2*(160-41)*2*1,2
=Blabla2*2*(160-41)*2*1,2
=Blabla3*2*(160-41)*2*1,2

In het nieuwe sheet wil ik het achterste deel van die formule vervangen door een variatie:
=Blabla1*2*(115-41)*2*1,2
=Blabla2*2*(115-41)*2*1,2
=Blabla3*2*(115-41)*2*1,2

Dus, "*2*(160-41)*2*1,2" vervangen door "*2*(115-41)*2*1,2". Maar als ik dat doe met zoek en vervang, vindt hij wel de cel, maar vervangt hij de hele cel-inhoud door "*2*(115-41)*2*1,2". Hij laat het eerste deel niet staan. Kan ik hem dat op één of andere manier wel leren? Ik ken wel omwegen (of ik moet het handmatig vervangen, het zijn maar 104 cellen), maar ik zou wel willen leren als dat wel kan.

(Dit is overigens maar een gekke voorbeeld formule, maar dat maakt niet uit voor het principe)

Alvast bedankt,
Met vriendelijke groet,

Hugo

 

[miso1995]

Hoi, plaats in je zoekopdracht voor elk * een ~

 

[Haije]

waarom niet alleen (160-41) vervangen door (151-41)?

 

[miso1995]

Dat kan inderdaad ook. Maar de vraag was waarom het niet werkte. Mocht in het echte bestandje deze oplossing niet opgaan, dan is een tilde plaatsen voor ieder sterretje in dit geval de oplossing toch?

 

[sylvester-ponte]

als sommige getallen blijken variabel te zijn gebruik dan een variabele
bvb een Naam of een verwijzing naar een cel

 

[AHulpje]

=LINKS(A1;VIND.SPEC("2*(160-41)*2*1,2";A1)-1)&"2*(115-41)*2*1,2"

In cel A1 staat je oude formule, bovenstaande formule zet je bijvoorbeeld in cel B1.
VIND.SPEC zoekt de positie van het te vervangen deel, maar let op, het te vervangen deel mag niet met een * beginnen, bedenk zelf maar even waarom.

 

[AHulpje]

Ik doe veel te moeilijk, miso1995 had helemaal gelijk, je "Zoeken naar" moet niet beginnen met een *.
Het volgende werkt dus wel:

Zoeken naar: 2*(160-41)*2*1,2
Vervangen door: 2*(115-41)*2*1,2

 

[snb]

Dit werkt perfect:

Sub M_snb()
  Cells.Replace "(160-41)", "(121-41)"
End Sub