Palo235
18.03.10,13:48
Ahoj poradaci
potreboval by som vysvetlit preco ked pomocou makra kopirujem z excelu (tabulku) do powerpointu (grafu) ...... tak musia byt hodnoty bez desatinneho cisla

da sa to urobit tak aby toto makro islo aj s desatinnym cislom?

Sub Makro1()

Set oPPTApp = CreateObject("PowerPoint.Application")

oPPTApp.Visible = msoTrue
oPPTApp.Presentations.Open "c:\Makro.ppt"

Range("A1:L6").Select
'----------> Selection.NumberFormat = "0"
Selection.Copy

oPPTApp.ActiveWindow.View.GotoSlide Index:=1
oPPTApp.ActiveWindow.Selection.SlideRange.Shapes("Object 1").OLEFormat.Object.Application.datasheet.Cells(1, 1).Paste

End Sub

pre help index je slide v ppt
object je nazov grafu v ppt
Palo235
22.03.10,05:57
prihodim xls a ppt pre lepsie pochopenie je to robene v office 2003


Palo