>I want to put images automatically in an excel sheet. Nearly everything works fine but it is necesary to send the width and heigh of the image to excel.

You can programmatically grab this using the Image control.

oImage = CREATEOBECT("Image")
oImage.Picture = lcfile && File name of the image
? oImage.Height
? oImage.Width