Hi Tic,ja, klar, kein Problem:Sub FormelErsetzen()Dim sstr As StringDim Zelle As RangeFor Each Zelle In ActiveSheet.UsedRangesstr = Zelle.FormulaLocalsstr = Application.Substitute(sstr, "=SUMME", "=MAX")Zelle.Value = sstrNext ZelleEnd SubViele GrüßeBerndDie MacHero EXCEL HomepageUnd falls Sie in Ruhe offline VBA lernen möchten:Excel-VBA-Programmierung-Kompendium
geschrieben von
Bernd Held
,
18.01.2001, 11:29 Uhr
, 23 mal gelesen