Hi Berni,
ja damit komme ich eher klar, wie mit dem anderen Code :)
Sub relativabsolut()
ActiveCell.Formula = Replace(ActiveCell.Formula, "(P", "($P$")
ActiveCell.Formula = Replace(ActiveCell.Formula, "-Q", "-$Q$")
ActiveCell.Formula = Replace(ActiveCell.Formula, "/I", "/$I$")
End Sub
Eine Verständnisfrage noch, muss man immer das Zeichen davor mit angeben "(P" und "($P$", ohne scheint es nicht zu funktionieren!?
Vielen lieben Dank
LG
Alexandra
ja damit komme ich eher klar, wie mit dem anderen Code :)
Sub relativabsolut()
ActiveCell.Formula = Replace(ActiveCell.Formula, "(P", "($P$")
ActiveCell.Formula = Replace(ActiveCell.Formula, "-Q", "-$Q$")
ActiveCell.Formula = Replace(ActiveCell.Formula, "/I", "/$I$")
End Sub
Eine Verständnisfrage noch, muss man immer das Zeichen davor mit angeben "(P" und "($P$", ohne scheint es nicht zu funktionieren!?
Vielen lieben Dank
LG
Alexandra