Risultati da 1 a 11 di 11

Discussione: Inserire la data in una funzione SE



  1. #1
    L'avatar di Codadilupo
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    Parma
    Età
    54
    Messaggi
    6
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0

    Inserire la data in una funzione SE

    Salve, vorrei inserire la data odierna in una funzione SE.
    In pratica, se scrivo una determinata parola in A1 (es. contanti) in B1 mi deve apparire la data relativa al giorno in cui sto adoperando il foglio.
    In un formula di questo tipo, cosa devo inserire al posto di "data" per avere la data del sistema?
    =SE(A1="";"";SE(A1="CONTANTI";"DATA";))
    Grazie per l'aiuto.

  2. #2

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4025
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923
    Ciao Cosadilupo,
    per ottenere data e ora del sistema si utilizzano le funzioni OGGI() e ADESSO(), ma sono "volatili" quindi si aggiorneranno ad ogni modifica del foglio.
    Se vuoi che la data venga inserita solo all'inserimento di dati in una determinata cella (A1 nel tuo caso), si dovrebbe ricorrere al VBA.
    Facci sapere se ti può andare bene e/o se sai utilizzarlo.

    [EDIT]
    Ciao Giuseppe,
    nessun problema :246:

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  3. #3
    L'avatar di GiuseppeMN
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Mantova
    Messaggi
    864
    Versione Office
    2000 - 2013
    Likes ricevuti
    285
    Likes dati
    160
    Buona sera, Codadilupo.
    Al posto di "Data" potresti scrivere Oggi(), ma, in questo modo la Data, il giorno successivo, verrebbe sempre modificata; questo non credo sia accettabile.

    Proverei con VBA.

    Se lo ritieni opportuno e utile, assieme, possiamo trovare una possibile soluzione.


    A disposizione.

    Buona serata.

    Giuseppe


    :216: @ cromagno, scusami della sovrapposizione, non ti avevo letto; un caro saluto. Giuseppe
    Windows XP Excel 2000 - Windows 10 Excel 2013

  4. #4
    L'avatar di Codadilupo
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    Parma
    Età
    54
    Messaggi
    6
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0
    Citazione Originariamente Scritto da cromagno Visualizza Messaggio
    Ciao Cosadilupo,
    per ottenere data e ora del sistema si utilizzano le funzioni OGGI() e ADESSO(), ma sono "volatili" quindi si aggiorneranno ad ogni modifica del foglio.
    Se vuoi che la data venga inserita solo all'inserimento di dati in una determinata cella (A1 nel tuo caso), si dovrebbe ricorrere al VBA.
    Facci sapere se ti può andare bene e/o se sai utilizzarlo.
    In effetti mi interessa che la data venga inserita solo all'inserimento di dati in A1, ma di VBA non so praticamente nulla.
    Grazie per l'aiuto.

  5. #5

    L'avatar di cromagno
    Clicca e Apri
    Data Registrazione
    Aug 2015
    Località
    Sardegna
    Età
    37
    Messaggi
    4025
    Versione Office
    2013
    Likes ricevuti
    1228
    Likes dati
    923
    Citazione Originariamente Scritto da Codadilupo Visualizza Messaggio
    In effetti mi interessa che la data venga inserita solo all'inserimento di dati in A1, ma di VBA non so praticamente nulla.
    Grazie per l'aiuto.
    Ti potrei postare un esempio riferito alla sola cella A1 ma non servirebbe a molto se poi non sei in grado di adattare il codice al tuo file originale.
    Se puoi (eliminando i dati sensibili) allega il file originale almeno vedremo di scrivere il codice con i giusti riferimenti.

    "Sono le persone che nessuno immagina che possano fare certe cose, quelle che fanno cose che nessuno può immaginare."

  6. #6
    L'avatar di Codadilupo
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    Parma
    Età
    54
    Messaggi
    6
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0
    Ciao Giuseppe, come ho risposto a @cromagno, di VBA sono completamente a digiuno, non saprei da dove cominciare.
    Mi piacerebbe comunque trovare una soluzione insieme a voi.
    Grazie dell'aiuto.

    Buona serata

  7. #7
    L'avatar di Codadilupo
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    Parma
    Età
    54
    Messaggi
    6
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0
    Perfetto, domani allego il file.
    Grazie.
    Buona serata.

  8. #8

    L'avatar di Rubik72
    Clicca e Apri
    Data Registrazione
    Dec 2015
    Località
    Cosenza
    Età
    45
    Messaggi
    2811
    Versione Office
    Excel 2013
    Likes ricevuti
    1022
    Likes dati
    979
    In attesa del file potresti provare questa routine da inserire in Foglio1
    Codice: 
    Private Sub Worksheet_Change(ByVal Target As Range)
    If Not Intersect(Target, Columns(1)) Is Nothing Then ' Columns(1) <=== da adattare
        If Target = "CONTANTI" Then
            Application.EnableEvents = False
            Target.Offset(0, 1) = Date ' Target.Offset(0, 1) <=== da adattare
            Application.EnableEvents = True
        End If
    End If
    End Sub
    In pratica ogni volta che nella colonna 1 "Columns(1)" si inserisce la parola "CONTANTI", nella colonna di fianco "Target.Offset(0, 1) = Date" inserisce la data di sistema.
    Naturalmente i riferimenti si possono adattare alle proprie esigenze

  9. I seguenti utenti hanno dato un "Like"


  10. #9
    L'avatar di Codadilupo
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    Parma
    Età
    54
    Messaggi
    6
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0
    Salve, allego il file.
    File Allegati File Allegati

  11. #10
    L'avatar di GiuseppeMN
    Clicca e Apri
    Data Registrazione
    Oct 2015
    Località
    Mantova
    Messaggi
    864
    Versione Office
    2000 - 2013
    Likes ricevuti
    285
    Likes dati
    160
    Buona giornata, Codadilupo;
    dopo aver preso buona nota della Proposta di @ Rubik72 (che saluto), potresti considerare questa alternativa:
    Codice: 
    Option Explicit
    
    Private Sub Worksheet_Change(ByVal Target As Range)
        If Not Intersect(Target, Range("A13:A32")) Is Nothing Then Cells(Target.Row, 6).Value = Date
    End Sub

    A disosizione.

    Buon Lavoro e buona serata.

    Giuseppe
    File Allegati File Allegati
    Windows XP Excel 2000 - Windows 10 Excel 2013

  12. I seguenti 2 utenti hanno dato un "Like" a GiuseppeMN per questo post:


  13. #11
    L'avatar di Codadilupo
    Clicca e Apri
    Data Registrazione
    Feb 2016
    Località
    Parma
    Età
    54
    Messaggi
    6
    Versione Office
    Excel 2010
    Likes ricevuti
    0
    Likes dati
    0
    Ciao Giuseppe la tua soluzione ha risolto il mio problema.
    Ti finanziò per la pronta attenzione.
    Saluto e ringrazio @Cromagno e @ Rubik72 per i suggerìmenti.
    Buona serata.

Discussioni Simili

  1. [Risolto] inserire nuova data in funzione della precedente
    Di Eddie18 nel forum Domande su Excel in generale
    Risposte: 4
    Ultimo Messaggio: 26/10/16, 17:53
  2. Inserire data odierna o un'altra data.
    Di Laura Belli nel forum Domande su Excel VBA e MACRO
    Risposte: 17
    Ultimo Messaggio: 02/09/16, 09:16
  3. Alternativa al VBA per inserire data e ora statiche
    Di Antonio Maccoppi nel forum Imparando Excel & VBA - Tutorial di Excel-
    Risposte: 6
    Ultimo Messaggio: 28/08/16, 14:16
  4. Inserire Testo con Data
    Di ProgrammD69 nel forum Domande su Excel in generale
    Risposte: 6
    Ultimo Messaggio: 13/06/16, 09:55
  5. Inserire data odierna
    Di Lety88 nel forum Domande su Excel VBA e MACRO
    Risposte: 5
    Ultimo Messaggio: 10/03/16, 08:58

Permessi di Scrittura

  • Tu non puoi inviare nuove discussioni
  • Tu non puoi inviare risposte
  • Tu non puoi inviare allegati
  • Tu non puoi modificare i tuoi messaggi
  •