Renombrar hoja Excel mediante DDEExecute

fmoragues
30 de Mayo del 2005
He probado con este codigo, pero se queda esperando en excel a q yo escriba el nombre.
He leido en algún sitio q hay q hacer una secuencia
determinda d acciones.

Gracias

hoja = "Hoja1"
hojaX = "NuevoNombre"
cad = "[WORKBOOK.ACTIVATE(""" + hoja + """)]"
DDEExecute canalExcel_1, cad
cad = "[WORKBOOK.NAME(""" + hoja + """, """ + hojaX + """)]"
DDEExecute canalExcel_1, cad