Buongiorno
Sto cercando di fare una ricerca e visualizzazione dei file all'interno di un documento excel con l'apertura di una Userform.
Per poter risalire al file interessato ho inserito all'interno dell'Userform;
2 TextBox
2 OptionButton
1 CommandButton.
Nel primo TextBox andrà inserito anno di riferimento.
Andrà poi selezionato OptionButton d'interesse "Alfa" oppure "Fiat".
Nel secondo TextBox il nome del file.
Infine il CommandButton che avvia la ricerca e la visualizzazione di quanto richiesto.
Il mio problema è come faccio a dirgli che del TextBox2 deve prendermi solo i 3 caratteri finali come valore e cercarlo nel percorso e se lo trova lo apre ??
Riporto quanto fatto finora che funziona ma legge interamente il file nel nome inserito nel TextBox2
Esempio; se il file.pdf si chiama 12230923_001 e io scrivo nel TextBox2 "001" dovrebbe cercarlo e aprirlo senza tener conto del resto del nome del file
Private Sub CommandButton1_Click()
Dim percorso As String
Dim anno As String
Dim numero As String
anno = TextBox1.Value
numero = TextBox2.Value
If TextBox1 < "1992" And TextBox1 > "1998" Then
MsgBox "L'anno inserito non è compreso nella ricerca dei documenti", vbCritical, "Anno di riferimento"
ElseIf anno = "1992" And OptionButton2.Value = Yes Then
percorso = "W:\CAVALLO\ALIMENTO\"
ActiveWorkbook.FollowHyperlink percorso & numero & ".pdf"
End If
End Sub