$Hoja -> Range("E47")->Select();
$Excel->ActiveSheet->Pictures->Insert('c:\projectword\1.jpg');