Invio dati da foglio excel a pagina web ad ogni modifica

[Anthony47]

La mia sfera di cristallo dice che potrebbe esserci stato un timeout di rete che ha portato all'errore. Ma ho una sfera "made in china", non fa delle stime affidabili...
Se e' una cosa che succede "abbastanza spesso" allora dovresti provare a salvare sul disco locale e vedere se la cosa persiste.

Ciao

[systemcrack]

La mia sfera di cristallo dice che potrebbe esserci stato un timeout di rete che ha portato all'errore. Ma ho una sfera "made in china", non fa delle stime affidabili...
Se e' una cosa che succede "abbastanza spesso" allora dovresti provare a salvare sul disco locale e vedere se la cosa persiste.

Ciao

Ciao Anthony,
anche perché non c'è altra spiegazione.. il file originariamente non dava tutti questi errori.. dici che anche le tempistiche di salvataggio lunghe, che ti avevo riportato giorni fa, potrebbero dipendere dal medesimo problema?

[systemcrack]

Da ignorante dico: non vi si potrebbe dare un comando in vba come fatto per le precedenti macro, che faccia ignorare l'errore? La macro partirà comunque al prossimo cambiamento del foglio, perciò se il problema è il time out di connessione si risolverebbe facilmente così.. o sto dicendo una castroneria?

[Anthony47]

No, non e' una fesseria; puoi fare come avevo suggerito qui:
viewtopic.php?f=26&t=111786&start=60#p657142

In pratica
-aggiungi On Error Resume Next a inizio del blocco che vuoi controllare
-esegui le istruzioni (quindi le istruzioni che salvano il file)
-controlli l'esito e rispristini la normale gestione degli errori; del tipo:

Codice: Seleziona tutto

'>>>>>> BLOCCO DI ERROR REPORTING:
'e' un esempio dimostrativo
If Err.Number <> 0 Then
    Debug.Print "Salvataggio file", Format(Now, "hh:mm:ss"), Err.Number   'Dove, quando, Codice
    Debug.Print "Salvataggio file ", Err.Description                      'Descrizione testuale
'    Debug.Print "Salvataggio file ", XXXYYYZZZ                             'Altre info pertinenti
    Err.Clear                                                  'Clear Errore
End If
'<<<<<< FINE BLOCCO 
On Error Goto 0                                          'ripristino gestione std errore


Come "altre info pertinenti" potresti inserire percorso e nome completo del file

Ciao

[systemcrack]

No, non e' una fesseria; puoi fare come avevo suggerito qui:
viewtopic.php?f=26&t=111786&start=60#p657142

In pratica
-aggiungi On Error Resume Next a inizio del blocco che vuoi controllare
-esegui le istruzioni (quindi le istruzioni che salvano il file)
-controlli l'esito e rispristini la normale gestione degli errori; del tipo:

Codice: Seleziona tutto

'>>>>>> BLOCCO DI ERROR REPORTING:
'e' un esempio dimostrativo
If Err.Number <> 0 Then
    Debug.Print "Salvataggio file", Format(Now, "hh:mm:ss"), Err.Number   'Dove, quando, Codice
    Debug.Print "Salvataggio file ", Err.Description                      'Descrizione testuale
'    Debug.Print "Salvataggio file ", XXXYYYZZZ                             'Altre info pertinenti
    Err.Clear                                                  'Clear Errore
End If
'<<<<<< FINE BLOCCO 
On Error Goto 0                                          'ripristino gestione std errore


Come "altre info pertinenti" potresti inserire percorso e nome completo del file

Ciao

Ci lavoro un po' su e ti faccio sapere.. grazie Anthony47.. davvero.. per tutto!

Rinnovo la mia disponibilità per una donazione, per tutto ciò che hai fatto sino ad ora per me (il che non implicherebbe implicitamente che tu mi debba aiutare per forza in futuro) in segno di gratitudine.

[systemcrack]

Oggi ho potuto osservare il file al lavoro con i nuovi comandi di debug print.. riporto di seguito i dati riportati nella finestra attiva:

Codice: Seleziona tutto

02/03/2021 07:36:31         $I$2          0,89
02/03/2021 07:36:35         $I$2          0,70
02/03/2021 07:46:23         $I$3          0,70
02/03/2021 07:53:01         $I$4          0,75
02/03/2021 08:00:54         $I$5          1,34
02/03/2021 08:05:05         $I$6          0,70
02/03/2021 08:08:08         $I$7          0,70
02/03/2021 08:15:26         $I$8          0,73
02/03/2021 08:19:16         $I$9          1,06
02/03/2021 08:29:51         $K$2          0,69
02/03/2021 08:29:54         $L$2          0,72
02/03/2021 08:36:55         $K$4          0,70
02/03/2021 08:37:01         $L$4          0,70
02/03/2021 08:53:40         $I$10         0,73
02/03/2021 08:58:37         $I$11         1,83
02/03/2021 09:00:11         $I$12         1,39
02/03/2021 09:01:19         $K$3          2,61
02/03/2021 09:01:23         $L$3          1,01
02/03/2021 09:01:41         $K$8          1,08
02/03/2021 09:01:45         $L$8          0,78
02/03/2021 09:28:34         $K$9          2,67
Salvataggio file            09:28:34       1004
Salvataggio file            Documento non salvato.
02/03/2021 09:28:38         $K$9          3,17
02/03/2021 09:28:44         $L$9          3,01
Salvataggio file            09:28:44       1004
Salvataggio file            Documento non salvato.
02/03/2021 09:28:49         $K$5          2,93
Salvataggio file            09:28:49       1004
Salvataggio file            Documento non salvato.
02/03/2021 09:28:59         $L$5          6,80
02/03/2021 09:29:06         $K$7          3,26
02/03/2021 09:29:19         $L$7          9,34
02/03/2021 09:35:05         $K$11         1,89
02/03/2021 09:35:19         $L$11         5,65
02/03/2021 09:41:30         $L$6          1,39
02/03/2021 09:42:10         $K$6          0,73
02/03/2021 09:43:14         $L$12         3,68
Salvataggio file            09:43:14       1004
Salvataggio file            Documento non salvato.
02/03/2021 09:53:42         $K$12         1,07
02/03/2021 10:10:19         $I$13         0,70
02/03/2021 10:15:25         $I$14         0,70
02/03/2021 10:21:39         $I$15         1,39


A volte non salva il file

[Anthony47]

A volte non salva il file

Il lato positivo e' che moltissime volte invece lo salva

Per restringere dovresti provare per qualche ora senza ftp (che FORSE e' la situazione di oggi); poi provare a salvare in locale (e non su disco di rete), sempre senza ftp.
Perche' e' chiaro che la rete influisce sulla disponibilita' dell'accesso al file, e l'ftp a sua volta blocca il file per il suo servizio.

Ciao

[systemcrack]

A volte non salva il file

Il lato positivo e' che moltissime volte invece lo salva

Per restringere dovresti provare per qualche ora senza ftp (che FORSE e' la situazione di oggi); poi provare a salvare in locale (e non su disco di rete), sempre senza ftp.
Perche' e' chiaro che la rete influisce sulla disponibilita' dell'accesso al file, e l'ftp a sua volta blocca il file per il suo servizio.

Ciao

Si gli errori ci sono senza ftp al momento..

[systemcrack]

Buon giorno Anthony,
relativamente a questo:

No, non e' una fesseria; puoi fare come avevo suggerito qui:
viewtopic.php?f=26&t=111786&start=60#p657142

In pratica
-aggiungi On Error Resume Next a inizio del blocco che vuoi controllare
-esegui le istruzioni (quindi le istruzioni che salvano il file)
-controlli l'esito e rispristini la normale gestione degli errori; del tipo:

Codice: Seleziona tutto

'>>>>>> BLOCCO DI ERROR REPORTING:
'e' un esempio dimostrativo
If Err.Number <> 0 Then
    Debug.Print "Salvataggio file", Format(Now, "hh:mm:ss"), Err.Number   'Dove, quando, Codice
    Debug.Print "Salvataggio file ", Err.Description                      'Descrizione testuale
'    Debug.Print "Salvataggio file ", XXXYYYZZZ                             'Altre info pertinenti
    Err.Clear                                                  'Clear Errore
End If
'<<<<<< FINE BLOCCO 
On Error Goto 0                                          'ripristino gestione std errore


Come "altre info pertinenti" potresti inserire percorso e nome completo del file

Ciao

dopo qualche prova non riesco a capire se sto sbagliando qualche cosa io o non ho capito bene come dovevo inserire il codice.

In Foglio Entrete ho la Macro che salva al cambiamento di alcune celle:

Codice: Seleziona tutto

Private Sub Worksheet_Change(ByVal Target As Range)
On Error Resume Next
Dim myRan As String
'
myRan = "I2:L162"       '<<< L'area per i cui cambiamenti viene subito fatto un File Save
'...
If Application.Intersect(Target, Range(myRan)) Is Nothing Then GoTo ExA    'MMMM
tSave = Timer
ThisWorkbook.Save
Debug.Print Now, Target.Address, Format(Timer - tSave, "0.00")
ExA:                                        '++++
'...
'>>>>>> BLOCCO DI ERROR REPORTING:
'e' un esempio dimostrativo
If Err.Number <> 0 Then
    Debug.Print "Salvataggio file", Format(Now, "hh:mm:ss"), Err.Number   'Dove, quando, Codice
    Debug.Print "Salvataggio file ", Err.Description                      'Descrizione testuale
'    Debug.Print "Salvataggio file ", XXXYYYZZZ                             'Altre info pertinenti
    Err.Clear                                                  'Clear Errore
End If
'<<<<<< FINE BLOCCO
On Error GoTo 0                                          'ripristino gestione std errore
End Sub

Nella finestra immediata però non vengono visualizzate le informazioni aggiuntive.. o non ho capito io qualche cosa?

Codice: Seleziona tutto

05/03/2021 10:06:03         $K$13         1,02
05/03/2021 10:06:08         $L$13         2,6805/03/2021 10:08:11     $I$16         1,06
05/03/2021 10:25:19         $I$17         1,39
05/03/2021 10:33:16         $I$18         1,82
05/03/2021 10:34:46         $I$19         2,37
Salvataggio file            10:34:46       1004
Salvataggio file            Documento non salvato.
05/03/2021 10:34:51         $I$19         1,13
05/03/2021 10:34:55         $I$19         1,34
05/03/2021 10:36:36         $I$20         1,48
05/03/2021 10:40:05         $I$21         2,99
05/03/2021 10:41:49         $I$22         1,03
05/03/2021 10:45:01         $I$24         2,51
05/03/2021 10:46:17         $I$25         1,65
05/03/2021 10:46:18         $I$25         0,73
05/03/2021 10:46:21         $I$25         1,36
05/03/2021 10:46:58         $I$23         1,82
05/03/2021 10:48:05         $I$26         1,04
05/03/2021 11:10:26         $K$14         2,70
05/03/2021 11:10:36         $L$14         4,80
05/03/2021 11:11:25         $K$19         0,70
05/03/2021 11:11:31         $L$19         1,77
05/03/2021 11:16:15         $K$15         0,70
05/03/2021 11:16:19         $L$15         1,09
05/03/2021 11:17:28         $I$27         1,02
05/03/2021 11:18:36         $I$28         1,40
05/03/2021 11:25:56         $K$17         1,81
05/03/2021 11:26:01         $L$17         0,78
05/03/2021 11:26:51         $I$29         2,87
05/03/2021 11:28:48         $I$30         1,40
05/03/2021 11:29:47         $I$31         1,96
05/03/2021 11:30:43         $K$16         1,39
05/03/2021 11:30:47         $L$16         2,03
05/03/2021 11:30:55         $K$24         0,73
05/03/2021 11:30:59         $L$24         1,3605/03/2021 11:34:59     $K$22         2,37
05/03/2021 11:35:06         $L$22         1,41
05/03/2021 11:35:33         $K$18         0,75
05/03/2021 11:35:39         $L$18         0,73
05/03/2021 11:45:57         $I$32         1,46
05/03/2021 11:45:59         $I$32         1,87
Salvataggio file            11:45:59       1004
Salvataggio file            Documento non salvato.
05/03/2021 11:46:03         $I$32         0,69
05/03/2021 11:49:04         $K$21         0,70
05/03/2021 11:49:08         $L$21         1,07
05/03/2021 11:52:05         $K$23         1,45
05/03/2021 11:52:09         $L$23         0,81

[systemcrack]

Inoltre avevo provato a cercare in giro per il web altri spunti per aggiungere, quelle che tu avevi indicato con "altre info", negli script, ma non trovo nulla solo cose generiche, che non mi aiutano a capire quali altri "fattori" far "analizzare" e trascrivere nella finestra immediata.. avresti mica qualche link che potrebbe fare al caso mio?