simbolo euro



  • simbolo euro
    di Dodi (utente non iscritto) data: 13/11/2017 13:16:41

    Buon giorno a tutti voi
    Ieri grazie a patel ho risolto il problema del valore euro in una txtbox.

    Oggi ho un problema simile in altre 2 userfom.
    Mi spiego meglio. Ho 2 fogli dove in alcuni campi ho degli importi con il simbolo euro.
    Ora cosa vorrei fare?
    Quando richiamo i dati per ripopolare la userform e successivamente modificarli, vorrei far comparire il simbolo della valuta nella textbox di appartenenza.
    Allego le stringhe di codice.
    Qualcuno può sistemarla in modo che nelle Textbox esce il valore valuta, anziché come testo?
    Spero di esser stato chiaro
    Le stringhe codice sono le seguenti:

    Grazie
     
    Textbox1.text=sh.cells(lng,5).value
    
    
    Textbox1.value=cells(no_ligne,5)
    
    



  • di alfrimpa data: 13/11/2017 14:17:09

    Ciao

    Ho messo il codice nell'evento Initialize della userform ma decidi tu qule è quello più consono per te.

    Alfredo
     
    Private Sub UserForm_Initialize()
    TextBox1.Value = Cells(1, 1).Value
    TextBox1 = Format(TextBox1, "€ #,##0.00")
    End Sub






  • di dodi (utente non iscritto) data: 13/11/2017 14:44:45

    Ciao alfredo
    Grazie per la risposta.
    Chiedevo non c'è un modo modificando i codici che ho inviato? Senza formattare la stringa passando da initialize?




  • di alfrimpa data: 13/11/2017 14:48:28

    Te l'ho detto che il mio era solo uno spunto.

    I modi possono essere tanti e devi essere tu ad individuare quello più adatto al tuo caso.

    Alfredo





  • di dodi (utente non iscritto) data: 13/11/2017 15:17:15

    Ok
    Grazie alfredo
    Non avevo afferrato. Ho riletto la tua soluzione è ho capito. Prima ero stato superficiale nel guardarlo.
    Grazie mille



  • di Dodi (utente non iscritto) data: 13/11/2017 15:51:46

    Ho provato 2 riprovato a cercar di adattare le tue proposte, ma non riesco ad ottenere nulla, anche perché se metto il codice in initialize mi fa comparire si il simbolo euro all'avvio, ma se cambio il valore nella combobox i dato è senza simbolo. Ti allego il file, gentilmente puoi dargli un occhiata e me lo sistemi?
    Sto cercando di apprendere cose nuove ogni giorno ma ho bisogno di aiuto.

    Grazie



  • di alfrimpa data: 13/11/2017 16:44:04

    No Dodi la soluzione non te la do perché è di una banalità disarmante.

    Dopo aver attribuito il valore alla Textbox2 gli devi applicare il formato e la soluzione te l'ho data.

    Alfredo





  • di dodi (utente non iscritto) data: 13/11/2017 16:57:41

    Soluzione trovata, avevi ragione

    Il codice è così
    Ho risolto.
    Davvero grazie anche per la tua durezza.
    Avvolte le cose semplici diventano e sotto gli occhi non si vedono. Mi è stato utile ciò che mi hai scritto nel tuo ultimo messaggio.
     
    Textbox2. Value=sh.cells(lng,3).value
    Textbox2=format(textbox2,"#,##0.00 €)
    



  • di alfrimpa data: 13/11/2017 18:10:57

    Guarda Dodi che la mia non è "durezza" ma solo il desiderio che l'utente faccia propria la soluzione che gli viene proposta.

    Personalmente provo più soddisfazione quando l'utente capisca quello che gli viene detto e non soltanto quando risolve il problema.

    Alla prossima.

    Alfredo





  • di dodi (utente non iscritto) data: 13/11/2017 18:28:39

    Grazie alfredo.