chi mi puo aiutare? creare una lista di valori in automatico

[antgio51]

vi spiego
su una cella ho collegato una sorgente dati push cioe in realTime si aggiorna il prezzo della moneta eurusd ogni 1 min
ecco io vorrei che ogni volta che cambia il valore cioè ogni minuto,venga immesso il nuovo valore sulla cella sotto cosi da creare una lista di tutti i valori nella giornata.
esempio:

ore 8:00 prezzo 1,13000
ore 8:01 prezzo 1,13050
ecc…
quindi quando cambia il valore il cursore si deve spostare sulla cella sotto e inserie il nuovo valore

Grazie spero essere stato chiaro Attendo una risposta

[akurery]

Ciao,

è una funzione che non ho mai usato, ma la finesta che si attiva da Dati -> Flussi sembra servire a qualcosa di molto simile a ciò che ti serve.

Ho fatto una prova, senza ottenere risultati apprezzabili, ma ritengo sia perchè non ho una fonte di dati valida da indicare nella URL.

Prova a darci un’occhiata.

[antgio51]

Grazie Akur… un altro consiglio … se di solito voglio una cella uguale ad un’altra facciamo
esempio: abbiamo questi valori A1 (franco) B1(vuota)

sulla cella B1 immettiamo (=A1) il risultato è B1(franco)

pero se cambia il valore su A1 es A1(GIOVANNI) anche la cella B1 (GIOVANNI)

si puo fare che anche se cambia la cella A1 la B1 rimane (FRANCO) cioe come se averre incollato solo il valore .

Grazie

[akurery]

No, se la formula è =A1 il risultato si adeguerà al contenuto di A1, se però riesci a fare l’aggiornamento dei valori come volevi, se il valore da A1 si sposta in un’altra cella, forse si può impostare una formula diversa che prenda il penultimo valore.

Difficile dirlo senza sapere com’è stutturato il foglio.

[antgio51]

Finalmente ho trovato un codice VisulBasic che inserito sulla pagina MACRO excel fa quello che pensavo anche se in modo limitato metti un dato sulla cella A1 e crea una lista di tutti i valori che cambiano sulla cella colonna B

Dim Riga As Integer
Private Sub Worksheet_Activate()
Riga = 0
End Sub

Private Sub Worksheet_Change(ByVal Target As Range)
If Target.Column = 1 And Target.Row = 1 Then
Riga = Riga + 1
Range(“c” & Riga).Value = Target.Value
End If
End Sub

ma se la incollo su LibreOff non funziona , tu sai come si deve attivare o convertire il codice in formto libre

[akurery]

Sulle macro non so aiutarti, ti posso solo rinviare alle guide in inglese:

Macro Guides | LibreOffice Documentation - Your documentation for LibreOffice

e precisare che, pur trattandosi sempre di un BASIC i riferimenti agli oggetti hanno nomi diversi.