Jack ha scritto:

> Il problema e' abbanstanza complesso e non so' da dove cominciare, vedi
> il Post
> Due Macro in processi separati , spero di essere clamorosamente smentito,
> magari con un bel Trick. Ciao Jack

Ciao Jack

Ho dato un' occhiata alla tua ProgessBar
E penso che non ci sia bisogno di eseguire due macro( sempre se è possibile)
contemporaneamente

Potresti dichiarare la matrice Label(20) come Global, dopo aver inizializzato 
la barra, potrai aggiungere in qualsiasi parte del tuo codice una suquenza di

Label(x).BackgroundColor = 16711680

Dove (x) sarà incrementato man mano che il codice avanza

Esempio:

Piccolo ciclo For - Next
Label(1).BackgroundColor = 16711680
Grosso ciclo Do - Loop
Label(2).BackgroundColor = 16711680
Label(3).BackgroundColor = 16711680
Chiamata ad altra Sub
Label(4).BackgroundColor = 16711680 
Ecc. ecc.
Alla fine chiami Svuota()

Dove inserire la linea devi deciderlo tu in base a come è
sviluppato il tuo codice

Comunque volevo informarti che esiste anche una barra di sistema
Prova questa piccola macro

Global oProgressbar As Object
Sub Barra()
        oProgressbar =_
         ThisComponent.GetCurrentController.GetFrame.CreateStatusIndicator()
        oProgressbar.Start("",100)
        For a = 1 To 10000
                oProgressbar.Value = (a /100)
        Next
        oProgressbar.End
End Sub

Valuta tu quella che ti piace di più

Ciao

Lido

---------------------------------------------------------------------
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Rispondere a