Risultati da 1 a 10 di 10

Discussione: Salvataggio dati in una TextBox



  1. #1
    L'avatar di giugar
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Svizzera
    Età
    53
    Messaggi
    42
    Versione Office
    2013
    Mi Piace ricevuti
    1

    Salvataggio dati in una TextBox

    Ciao a tutti, in una UserForm, gestisco una procedura di password per accedere a determinanti funzioni.
    Ho il problema di non riuscire a cambiare la password della TextBox di riferimento (denominata "password"). Quando eseguo la macro, questa viene regolarmente modificata. Ma quando riavvio la UserForm mi riprende il valore iniziale che devo sostituire manualmente andando ad agire nelle proprietà della TextBox.
    In allegato l'esempio.

    Grazie
    File Allegati File Allegati

  2. #2
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    71
    Messaggi
    586
    Versione Office
    2010
    Mi Piace ricevuti
    72
    Mi Piace dati
    1

    Re: Salvataggio dati in una TextBox

    non ho capito che senso ha visualizzare la password nella textbox, mettila in una cella del foglio lontana dall'area utilizzata e scritta con carattere bianco

  3. #3
    L'avatar di giugar
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Svizzera
    Età
    53
    Messaggi
    42
    Versione Office
    2013
    Mi Piace ricevuti
    1

    Re: Salvataggio dati in una TextBox

    Citazione Originariamente Scritto da patel Visualizza Messaggio
    non ho capito che senso ha visualizzare la password nella textbox, mettila in una cella del foglio lontana dall'area utilizzata e scritta con carattere bianco
    Ciao e grazie per il tuo intervento.

    Al momento la textbox é visibile perché non ho ancora risolto il problema. Quando avrò capito come fare per cambiare la password e salvarla permanentemente nella TextBox, questa la renderò invisibile.

    La soluzione precedente già contemplava di memorizzare la password in una cella dei fogli di lavoro. Il punto é che io salvo la form in locale e la integro in altri fogli di lavoro, in cui questi o hanno la cella occupata, o il foglio di lavoro viene rinominato per esigenze varie, non permettendo di seguito di recuperare la password essendo cambiato il nome del foglio di riferimento.

  4. #4
    L'avatar di dracoscrigno
    Clicca e Apri
    Data Registrazione
    May 2016
    Località
    ferrara
    Età
    40
    Messaggi
    625
    Versione Office
    office pro 2010
    Mi Piace ricevuti
    155
    Mi Piace dati
    98

    Re: Salvataggio dati in una TextBox

    non puoi salvare un dato dentro una textbox.
    esso è un oggetto che prende vita nel momento in cui apri il file e lo vai ad utilizzare.

    i dati vanno memorizzati sul foglio di cakcolo oppure nel codice delle macro.

  5. #5
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    71
    Messaggi
    586
    Versione Office
    2010
    Mi Piace ricevuti
    72
    Mi Piace dati
    1

    Re: Salvataggio dati in una TextBox

    i dati inseriti nella finestra proprietà sono da considerare dati di default e non sono modificabili da codice

  6. #6
    L'avatar di giugar
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Svizzera
    Età
    53
    Messaggi
    42
    Versione Office
    2013
    Mi Piace ricevuti
    1

    Re: Salvataggio dati in una TextBox

    Citazione Originariamente Scritto da patel Visualizza Messaggio
    i dati inseriti nella finestra proprietà sono da considerare dati di default e non sono modificabili da codice
    OK!
    Grazie a tutti.

  7. #7
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    71
    Messaggi
    586
    Versione Office
    2010
    Mi Piace ricevuti
    72
    Mi Piace dati
    1

    Re: Salvataggio dati in una TextBox

    riprendendo il consiglio di dracoscrigno si potrebbe memorizzare la password nel codice e pure modificarla, vedi allegato che utilizza procedure macro per cancellare e per aggiungere procedure al modulo.
    Nel modulo1
    Codice: 
    Public dimmi As String, newpass As String
    Sub Button1_Click()
    pass.Show
    End Sub
    
    Sub AddProcedureToModule()
    Dim LineNum As Long
    Const DQUOTE = """" ' one " character
    With ActiveWorkbook.VBProject.VBComponents("Module1").CodeModule
       LineNum = .CountOfLines + 1
        .InsertLines LineNum, "Function leggipass()"
        LineNum = LineNum + 1
        .InsertLines LineNum, "leggipass = " & DQUOTE & newpass & DQUOTE
        LineNum = LineNum + 1
        .InsertLines LineNum, "End Function"
    End With
    End Sub
    Sub DeleteProcedureFromModule()
    Dim StartLine As Long, NumLines As Long, ProcName As String
    ProcName = "leggipass"
    With ActiveWorkbook.VBProject.VBComponents("Module1").CodeModule
       StartLine = .ProcStartLine(ProcName, vbext_pk_Proc)
       NumLines = .ProcCountLines(ProcName, vbext_pk_Proc)
       .DeleteLines StartLine:=StartLine, Count:=NumLines
    End With
    End Sub
    Function leggipass()
    leggipass = "peppo"
    End Function
    nella userform
    Codice: 
    Private Sub CommandButton1_Click()
    If dimmi = TextBox1 Then
    Unload Me
    MsgBox "Password Corretta!", Title:="Password corretta!"
    End Sub
    Private Sub CommandButton2_Click()
    Unload Me
    End Sub
    Private Sub CommandButton3_Click()
    newpass = InputBox("Inserisci la nuova password")
    Call DeleteProcedureFromModule
    Call AddProcedureToModule
    ThisWorkbook.Save
    MsgBox "password modificata correttamente", vbInformation, Title:="Password inserita"
    End Sub
    
    Private Sub TextBox1_Change()
    If TextBox1 = dimmi Then
      CommandButton1.Visible = True
      CommandButton3.Visible = True
      CommandButton1.Enabled = True
      CommandButton3.Enabled = True
      Image2.Visible = False
      Label4.Visible = False
    Else
      CommandButton1.Enabled = False
      CommandButton3.Enabled = False
      Image2.Visible = True
      Label4.Visible = True
    End If
    End Sub
    Private Sub UserForm_Activate()
    CommandButton1.Visible = False
    CommandButton3.Visible = False
    Image2.Visible = False
    Label4.Visible = False
    dimmi = leggipass
    End Sub
    Ovviamente la password è facilmente leggibile visionando il codice, ma lo era anche prima
    File Allegati File Allegati

  8. I seguenti 2 utenti hanno dato un MI Piace a patel per questo post:


  9. #8
    L'avatar di giugar
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Svizzera
    Età
    53
    Messaggi
    42
    Versione Office
    2013
    Mi Piace ricevuti
    1

    Re: Salvataggio dati in una TextBox

    Grazie Patel, soluzione fantastica.
    Ad ogni modo, a fine lavoro proteggerò il progetto con una password, e quindi il codice non sarà così facilmente leggibile.

    Grazie ancora a tutti per il vostro ottimo supporto.

    [PER I MODERATORI: -TOPIC RISOLTO-]

  10. #9
    L'avatar di patel
    Clicca e Apri
    Data Registrazione
    Mar 2016
    Località
    Livorno
    Età
    71
    Messaggi
    586
    Versione Office
    2010
    Mi Piace ricevuti
    72
    Mi Piace dati
    1

    Re: Salvataggio dati in una TextBox

    temo che se proteggerai il codice non funzionerà più il cambio password

  11. #10
    L'avatar di giugar
    Clicca e Apri
    Data Registrazione
    Oct 2016
    Località
    Svizzera
    Età
    53
    Messaggi
    42
    Versione Office
    2013
    Mi Piace ricevuti
    1

    Re: Salvataggio dati in una TextBox

    Allora mi tocca tornare alla soluzione precedente.
    Grazie comunque del codice, che mi torna utile per altre situazioni.

    Cordiali saluti

Discussioni Simili

  1. Cancella dati in textbox di una userform
    Di Snoopy nel forum Domande su Excel VBA e MACRO
    Risposte: 13
    Ultimo Messaggio: 12/07/16, 07:39
  2. [Risolto] Problema di salvataggio con mac
    Di gtmoro90 nel forum Foglio di calcolo su altre Piattaforme
    Risposte: 6
    Ultimo Messaggio: 21/03/16, 22:02
  3. Userform: convalida dati e totale valori inseriti in un textbox
    Di Lcbsm nel forum Domande su Excel VBA e MACRO
    Risposte: 5
    Ultimo Messaggio: 16/03/16, 19:30
  4. miglior salvataggio
    Di Stefano nel forum Domande su Excel in generale
    Risposte: 3
    Ultimo Messaggio: 18/06/15, 23:22
  5. problema con salvataggio
    Di Stefano nel forum Domande su Excel in generale
    Risposte: 1
    Ultimo Messaggio: 09/06/15, 20:20

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
  •