Oppure

Loading
27/09/09 7:55
gvigliani
Salve a tutti,
sono alle prese con un problema che non riesco a risolvere nonostante tutta l'esperienza maturata.
Sto utilizzando il VB6 per pilotare un Excel dotato di 3 fogli al suo interno.

per inizializzare il tutto inseriscio le seguenti linee classiche:
Dim AppExcel As New Excel.Application
Dim cartExcel As Excel.Workbook
Dim foglioExcel As Excel.Worksheet


Seguito poi con l'attivazione vera e propria:
Set cartExcel = Excel.Workbooks.Open(App.Path & "\snake.xls")
Set foglioExcel = Excel.Worksheets.Item("MyMasa")
foglioExcel.Activate
Set foglioExcel = Excel.Worksheets.Item("MyBets")
foglioExcel.Activate
Set foglioExcel = Excel.Worksheets.Item("Snake")
foglioExcel.Activate
AppExcel.Visible = True


In questo modo apro il mio excel ed attivo i 3 fogli al suo interno.
Il mio problema è che per ragioni :asd:programmatiche io devo saltare da un foglio all'altro inserendo valori, prendendone altre ed effettuando calcoli da immettere in un foglio o nell'altro.
Prima di ogni inserimento o prelevamento applico la riga di programma:
Set foglioExcel = Excel.Worksheets.Item("MyBets")
foglioExcel.Activate


o comunque quella che è relativa al foglio che voglio utilizzare. Succede pero' che si succedono errori relativi proprio all'attivazione di questi fogli e/o al lancio delle macro contenute nel foglio stesso. Una stranezza è che se eseguo il programma stepbystep tutto funziona mentre se lo lancio a velocita' normale si sussuegono gli errori descritti.
E' da poco che mi diletto con l'Excel e mi trovo a disagio nel risolvere problemi come questo. Qualcuno ha una soluzione??

Grazie
aaa
27/09/09 12:59
gvigliani
Postato originariamente da theprogrammer:

Vedi risposta in

forum.masterdrive.it/visual-basic-6-17/errore-50290-excel-41654/


Grazie 1000
aaa