Filtro variabile in Application.GetSaveAsFilename

[OscarPartecipante Oscar Karma: 45 pts]

E' possibile usare un filtro variabile  (*.1)   dorei variare il filtro da (*.1) a (*.10) nel GetSave , specifico che non devo metterli tutti , ma uno alla volta  Ho provato in tanti modi ma non funziona unica soluzione che ho trovato è stata mettere 10  Application.GetSaveAsFilename con la condizione IF davanti  aprendo il Get interessato 

Grazie a tutti 

 

File = Application.GetSaveAsFilename(InitialFileName:=NomeFile, fileFilter:="File di Testo, *.1,Testo Unicode, ", Title:="Salva con Nome")

[maxpitPartecipante maxpit Karma: 7 pts]

Buonasera Oscar,

puoi semplicemente definire una variabile stringa, nell'esempio sotto sNum, a cui poi passare il contenuto che ti interessa individuare

    Dim sNum as String

    [...]

    sNum="1"
    File = Application.GetSaveAsFilename(InitialFileName:=NomeFile, fileFilter:="File di Testo, *." & sNum & ",Testo Unicode, ", Title:="Salva con Nome")

Buona serata

[OscarPartecipante Oscar Karma: 45 pts]

maxpit ha scritto:

puoi semplicemente definire una variabile stringa, nell'esempio sotto sNum, a cui poi passare il contenuto che ti interessa individuare

Maxpit  grazie va benissimo , avevo provato tante volte , ma probabilmente  non mi andava perchè nella variabile includevo tutto  asterisco punto e numero 

 

[Autore]

Articoli