Demonstration script that adds the words "test value" to a new spreadsheet, then formats the cell containing the value.
Set excel = CreateObject( "Excel.Application" )
With excel
.Visible = True
.Workbooks.Add
.Cells( 1, 1 ).Value = "Test value"
.Cells( 1, 1 ).Font.Bold = True
.Cells(1, 1).Font.Size = 24
.Cells(1, 1).Font.ColorIndex = 3
End With
Posted in MS-Excel

daniva




Recent Comments