Formel zuweisen per VBA / Syntaxfehler
13.08.2003 08:23:25
Rüdiger
meintab.Cells(19,6).formulaR1C1 = "=IF(LEN(RC[-17])-LEN(SUBSTITUTE(RC[-17],";",""))=0,"",TRIM(MID(RC[-17],FIND(";",RC[-17])+1,LEN(RC[-17])-FIND(";",RC[-17]))))"