在单元格中输入公式将生成应用程序定义的或对象定义的错误

I have searched the net for a solution and re-coded the VBA many times. I ended up with manually filling a string (in bits because I always miscount the quotes):I have searched the net for a solution and re-c