Here's some sample code that:
- creates a 123 spreadsheet
- inserts some text
- changes the text to bold
- saves the spreadsheet to a file in the c:\temp directory
- tidies up
''
***************************************************************************
'' Purpose : Create a Lotus 123 file from Excel's VBA
'' Written : 14-Jun-1999 by Andy Wiggins - Byg Software Ltd
''
Sub mRun123ProUsingVBA()
Dim app As Object
Set app = CreateObject("Lotus123.Workbook")
With app
.Parent.Visible = True
With .ranges.Item("A:A3")
.contents = "Demo from BygSoftware.com"
.Font.Bold = True
End With
.SaveAs "c:\temp\BygSoftware.123"
.Parent.Quit
End With
End Sub
Ask a Question
Want to reply to this thread or ask your own question?
You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.