Ciao Mirko, Alle 13:02, giovedì 1 marzo 2007, Mirko Santarelli ha scritto: [...] > In effetti mi ero rivolto qui perche' la mia intenzione era di creare > una macro, ieri ci ho lavorato un po' (su carta) sulle possibili > soluzioni, poi mi metto al PC (anzi al MAC) con Openoffice 2.0 a provare > intanto il cerca e sostituisci e con questo semplice codice > > Sub prova > Dim Doc As Object > Dim Shett As Object > Dim ReplaceDescriptor As Object > Dim I As Integer > Doc = StarDesktop.CurrentComponent > Sheet = Doc.Sheets(0) [...] > End sub > > mi viene restituito errore sulla riga > Sheet= Doc. Sheets(0) ...errore di runtime basic proprieta' o metodo > non trovati > > Mi sembra una cosa impossibile, li ho sempre usati (sotto Windows).
Il problema forse è nella riga precedente: > Doc = StarDesktop.CurrentComponent Se lanci questo comando direttamente dall'IDE, il componente restituito è l'IDE stesso, e non un documento Calc. Usa: ThisComponent.Sheets(0) O al limite: ThisComponent.Sheets.getByIndex(0) ciao Paolo --------------------------------------------------------------------- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]
