Copy Excel Cell Data and Paste into PPT Embedded Excel Cell

[gmooney]

I know how to copy Excel cell data and paste into a PPT object like a text box, etc.

Any idea how I can paste into an already embedded Excel file and a specific cell?

 

[Domenic]

The following assumes that you're running the code from Excel, and that pptShape has been assigned a shape from a PowerPoint slide containing an embedded Excel workbook...

    'open embedded workbook for editing
    pptShape.OLEFormat.DoVerb Index:=1
 
    'assign workbook to an object variable
    Dim xlWB As Workbook
    Set xlWB = pptShape.OLEFormat.Object

    'enter text in a cell
    xlWB.Worksheets("Sheet1").Range("A1").Value = "This is some sample text . . ."
 
    'close workbook
    xlWB.Close SaveChanges:=True

Hope this helps!