Unlock a world of possibilities! Login now and discover the exclusive benefits awaiting you.
Hi,
I created the following macro to store sheets oobject in bmp format:
Sub ExpBmp
for j = 0 to ActiveDocument.noOfSheets-1
set ss= ActiveDocument.GetSheet(j)
ActiveDocument.Sheets(j).Activate
ActiveDocument.GetApplication.WaitForIdle
for i = 0 to ss.NoOfSheetObjects-1
set tb = ActiveDocument.GetSheetObject("CH01")
tb.ServerSideExportEx "C:\"&i&".bmp" , ";" , 2 '0=HTML, 1=Text, 2=Bitmap, 3=XML, 4=QVD, 5=BIFF
next
next
End Sub
but I have this error message: Object required: 'tb'
Does anyone have any suggestions?
Thanks
Giulia
sorry
the correct code is
Sub ExpBmp
for j = 0 to ActiveDocument.noOfSheets-1
set ss= ActiveDocument.GetSheet(j)
ActiveDocument.Sheets(j).Activate
ActiveDocument.GetApplication.WaitForIdle
for i = 0 to ss.NoOfSheetObjects-1
set tb = ActiveDocument.GetSheetObject(i)
tb.ServerSideExportEx "C:\"&i&".bmp" , ";" ,2 '0=HTML, 1=Text, 2=Bitmap, 3=XML, 4=QVD, 5=BIFF
next
next
End Sub