Macros do Excel no Delphi ?
Galera bom dia !!!
Estou tendo uma certa dificuldade na hora de pegar comandos do visual basic gerado em macros do excel e convertelos para o delphi, pois de dentro do delphi eu gero planilhas no excel, e estou precisando usar o recurso de hiperlink mas nao consegui entender como montar este comando no delphi, por favor se alguem puder me ajudar ficarei muito grato, estou nisso a dois dias e já estou quase desistindo.
[b:dc43798c3a]Comando gerado na macro:[/b:dc43798c3a]
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=´´, subAddress:= _ ´Plan2!A1´
[b:dc43798c3a]Como devo montar no Delphi, tento assim e da erro no Anchor:[/b:dc43798c3a]
XLApp := CreateOleObject(´Excel.Application´);
XLApp.Visible := True;
XLApp.Workbooks.Open(´c:\fluxo\Modelo Fluxo de Caixa.xls´);
// XLApp.Workbooks[1].WorkSheets[1].Name := ´Fluxo de Caixa - Previsão´;
Sheet := XLApp.Workbooks[1].WorkSheets[´FluxoCaixa´];
Column := XLApp.Workbooks[1].WorkSheets[´FluxoCaixa´].Columns;
Sheet.Cells[05,02].Hyperlinks.Add(Anchor := Selection,
Address := ´´, SubAddress := ´Plan3!A1´);
Por favor me ajudem !!!
Marcelo Giratto
Estou tendo uma certa dificuldade na hora de pegar comandos do visual basic gerado em macros do excel e convertelos para o delphi, pois de dentro do delphi eu gero planilhas no excel, e estou precisando usar o recurso de hiperlink mas nao consegui entender como montar este comando no delphi, por favor se alguem puder me ajudar ficarei muito grato, estou nisso a dois dias e já estou quase desistindo.
[b:dc43798c3a]Comando gerado na macro:[/b:dc43798c3a]
ActiveSheet.Hyperlinks.Add Anchor:=Selection, Address:=´´, subAddress:= _ ´Plan2!A1´
[b:dc43798c3a]Como devo montar no Delphi, tento assim e da erro no Anchor:[/b:dc43798c3a]
XLApp := CreateOleObject(´Excel.Application´);
XLApp.Visible := True;
XLApp.Workbooks.Open(´c:\fluxo\Modelo Fluxo de Caixa.xls´);
// XLApp.Workbooks[1].WorkSheets[1].Name := ´Fluxo de Caixa - Previsão´;
Sheet := XLApp.Workbooks[1].WorkSheets[´FluxoCaixa´];
Column := XLApp.Workbooks[1].WorkSheets[´FluxoCaixa´].Columns;
Sheet.Cells[05,02].Hyperlinks.Add(Anchor := Selection,
Address := ´´, SubAddress := ´Plan3!A1´);
Por favor me ajudem !!!
Marcelo Giratto
Mgiratto
Curtidas 0
Respostas
Anonymous
18/02/2003
estou trabalhando com um documento no word que contém uma tabela, preciso inserir uma linha no meio desta tabela via delphi....
como faço, pode me ajudar....????
como faço, pode me ajudar....????
GOSTEI 0
Mgiratto
18/02/2003
Com o Word nunca trabalhei, desculpe nao poder ajudar !!
GOSTEI 0