Valutazione 4.87/ 5 (100.00%) 5838 voti

Condividi:        

Invio dati da foglio excel a pagina web ad ogni modifica

Vuoi potenziare i tuoi documenti Word? Non sai come si fa una macro in Excel? Devi creare una presentazione in PowerPoint?
Oppure sei passato a OpenOffice e non sei sicuro di come lavorare al meglio?

Moderatori: Anthony47, Flash30005

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi Anthony47 » 22/02/21 13:27

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
Avatar utente
Anthony47
Moderatore
 
Post: 17446
Iscritto il: 21/03/06 16:03
Località: Ivrea

Sponsor
 

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi systemcrack » 23/02/21 09:20

Anthony47 ha scritto: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?
Avatar utente
systemcrack
Utente Senior
 
Post: 138
Iscritto il: 27/07/17 09:40

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi systemcrack » 23/02/21 13:22

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?
Avatar utente
systemcrack
Utente Senior
 
Post: 138
Iscritto il: 27/07/17 09:40

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi Anthony47 » 23/02/21 15:27

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
Avatar utente
Anthony47
Moderatore
 
Post: 17446
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi systemcrack » 23/02/21 18:33

Anthony47 ha scritto: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.
Avatar utente
systemcrack
Utente Senior
 
Post: 138
Iscritto il: 27/07/17 09:40

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi systemcrack » 02/03/21 10:53

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 :roll:
Avatar utente
systemcrack
Utente Senior
 
Post: 138
Iscritto il: 27/07/17 09:40

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi Anthony47 » 02/03/21 12:15

A volte non salva il file
Il lato positivo e' che moltissime volte invece lo salva :lol:

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
Avatar utente
Anthony47
Moderatore
 
Post: 17446
Iscritto il: 21/03/06 16:03
Località: Ivrea

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi systemcrack » 02/03/21 12:24

Anthony47 ha scritto:
A volte non salva il file
Il lato positivo e' che moltissime volte invece lo salva :lol:

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..
Avatar utente
systemcrack
Utente Senior
 
Post: 138
Iscritto il: 27/07/17 09:40

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi systemcrack » 05/03/21 12:22

Buon giorno Anthony,
relativamente a questo:

Anthony47 ha scritto: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


Immagine

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
Avatar utente
systemcrack
Utente Senior
 
Post: 138
Iscritto il: 27/07/17 09:40

Re: Invio dati da foglio excel a pagina web ad ogni modifica

Postdi systemcrack » 05/03/21 13:37

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?
Avatar utente
systemcrack
Utente Senior
 
Post: 138
Iscritto il: 27/07/17 09:40

Precedente

Torna a Applicazioni Office Windows


Topic correlati a "Invio dati da foglio excel a pagina web ad ogni modifica":


Chi c’è in linea

Visitano il forum: Bing [Bot] e 28 ospiti