Excel worksheet

hi there again!

how can i import the values of an excel.worksheet?

1: excel is running
2: theres a worksheet with A1 to A5, different values
3: i want every cell´s value in a different textshape in corel

is this possible (i think so)? i don´t wanna create temporary textfiles and so on..

thank ya all for ya help

[Alex]

Here is a very simple VBA macro for CorelDRAW which connects to a running MS Excel instance with a worksheet open and text data in cells A1-A5. It then creates 5 artistic text objects in the current CorelDRAW document containing the values of the 5 Excel cells:

Sub TestExcel()
    Dim xl As Object
    Dim n As Long
    Dim sCellValue As String
    Dim y As Double
    
    Set xl = GetObject(, "Excel.Application")
    For n = 1 To 5
        sCellValue = xl.Cells(n, 1).Value
        y = 11 - n
        ActiveLayer.CreateArtisticText 0, y, sCellValue
    Next n
End Sub

Please refer to MS Excel object model documentation on the details of using its objects (such as Application.Cells, etc).

I hope this helps.

Hi alex!

thank you very much! that was what i´ve been lookin for!

this wonderful forum here helps me in all of my (VBA-)problems *s*

Best regards from germany,

Silv R.