elimina caratteri



  • elimina caratteri
    di Johnny (utente non iscritto) data: 27/05/2017 13:26:37

    salve alcuni giorni fa avevo chiesto aiuto al forum per memorizzare il percorso di una cartella in una cella su un foglio excel. Ora ho un altro problema da risolvere con la stessa runtime. mi spiego una volta trovato il percorso della cartella ipotese che è D:Asus WebStoragePROVA
    prima di memorizzare il percorso nella cella come posso eliminare i primi 3 caratteri e salvare solo Asus WebStoragePROVA
    allego il codice.

     
    Sub SelectFolder()
        Set objFSO = CreateObject("Scripting.FileSystemObject")
        InitialFoldr$ = "C:Documenti" '<<< Startup folder
        LR = Cells(Rows.Count, "A").End(xlUp).Row + 1
        With Application.FileDialog(msoFileDialogFolderPicker) 'User input for folder to look at
            .InitialFileName = Application.DefaultFilePath & ""
            .Title = "Please select a folder"
            .InitialFileName = InitialFoldr$
            .Show
            If .SelectedItems.Count = 0 Then Exit Sub
            mfolder = .SelectedItems(1) 
        End With
        Cells(LR, 1) = mfolder
    End Sub
    



  • di alfrimpa data: 27/05/2017 13:49:37

    Ciao Johnny

    Prova con l'istruzione (modificata) che vedi sotto.

    Alfredo
     
    Cells(LR, 1) = Mid(mfolder, 4, 100)






  • di Vecchio Frac data: 27/05/2017 13:53:38

    Consiglio migliore:
    - apri Excel
    - premi Alt-F11 (attiva l'editor di codice)
    - premi F1 (attiva l'help in linea)
    - scrivi nella casella di ricerca "Riepilogo delle parole chiave relative alla manipolazione di stringhe"
    - cerca la voce che ti interessa e imparati tutte le funzioni per manipolare le stringhe.

    Ripeti questa procedura per ogni altra funzione VBA utile (dichiarazione dei tipi di dato, uso di procedure e funzioni, operatori logici, cicli, flussi condizionali, ecc.).
    Dopo aver fatto così per un po' di tempo su argomenti diversi, avrai almeno le basi.





  • di Johnny (utente non iscritto) data: 27/05/2017 19:00:41

    grazie alfrimpa la soluzione prosposta funziona, e grazie anche a Vecchio Frac per il consiglio della guida.



  • di alfrimpa data: 27/05/2017 19:22:31

    Ciao Johnny

    Che funzionasse avevo pochi dubbi

    La cosa importante è che chi pone la domanda "capisca" la soluzione chhe viene proposta ed è per questo che condivido pienamente quanto detto da Vecchio Frac.

    Tu ad esempio, aldilà che fa quello che hai chiesto, hai capito perchè l'istruzione che ti ho dato fa quello che fa?

    Alfredo