How to change the font style and font size in macro?

[Anonymous]

Hi all,

Am trying to export objects to excel by using macros.  Below are my code

set obj = ActiveDocument.GetSheetObject("IB01")
		obj.CopyTableToClipboard(true)

            curSheet.Range("A7").Select

            curSheet.Range("A6").Interior.Color=rgb(47,198,255)

            curSheet.Range("B6").Interior.Color=rgb(47,198,255)

            curSheet.Columns("A").ColumnWidth = 25

            curSheet.Columns("B").ColumnWidth = 15

		curSheet.Paste
		Set Selection = curSheet.Cells

     With Selection

    .HorizontalAlignment = 3

     End With

Now I want to change the font style and font size. But am trying this  curSheet.Range("A7:A10").Font.name = "Verdana". Its not working.

Someone suggest how to do this?

Thanks,

Nisha.

[robert_mika]

Could you attached your qvw as well?

(I should have asked for this at first place)