Risolto Salvare in xlsx

cdl07

Utente junior
20 Agosto 2016
27
1
Verona
office 2010
1
Salve,
In un foglio archivio (denominato 'elencoLibri') di Excel, ho inserito 3 Label che mi consentono di ricercare del testo all'interno delle colonne A-B-C.
Il codice utilizzato per ogni Label (inserito nel Foglio1), é il seguente (che funziona perfettamente):

Visual Basic:
'LABEL COLONNA A
Private Sub TextLibro2_Change()
'RICERCA QUALSIASI PAROLA ALL'INTERNO DEL TESTO
Range("A2").AutoFilter field:=1, Criteria1:="*" & TextLibro2.Text & "*"
If TextLibro2.Text = "" Then
Selection.AutoFilter
End If
End Sub

'LABEL COLONNA B
Private Sub TextLibro_Change()
'RICERCA QUALSIASI PAROLA ALL'INTERNO DEL TESTO
Range("B2").AutoFilter field:=2, Criteria1:="*" & TextLibro.Text & "*"
If TextLibro.Text = "" Then
Selection.AutoFilter
End If
End Sub

'LABEL COLONNA C
Private Sub TextLibro1_Change()
'RICERCA QUALSIASI PAROLA ALL'INTERNO DEL TESTO
Range("C2").AutoFilter field:=3, Criteria1:="*" & TextLibro1.Text & "*"
If TextLibro1.Text = "" Then
Selection.AutoFilter
End If
End Sub
Ho programmato un'altra cartella di archivi con 7 Fogli di lavoro, tutti avente un proprio nome. Volendo utilizzare i 3 Label dell'archivio già fatto, ho proceduto così:

- ho fatto un copia/incolla dei 3 Label in ognuno dei 7 fogli
- in ogni foglio ho inserito il codice soprascritto
- quando vado a provare, la ricerca funziona perfettamente

Domande:
- Nel momento in cui sono andato a salvare, mi é pervenuta la consueta finestra nella quale si può scegliere se salvare con macro o senza macro.
Se salvo senza macro, il codice non viene salvato e sono costretto ogni volta ad inserirlo.
Se voglio salvare anche il codice, mi si indica di "...selezionare un tipo di file con attivazione macro nell'elenco Tipo file".
Questo non l'ho capito. Cosa dovrei fare in proposito?
(chiedo venia... sto iniziando ad imparare)

- se volessi utilizzare i 3 label per tutti i 7 fogli, senza dover scrivere il codice in ogni foglio, cosa dovrei fare?
Ringrazio.
Carlo - Verona
 

alfrimpa

VBA Expert
Supermoderatore
Expert
18 Dicembre 2015
18.082
113
65
Napoli
2013
320
Se vuoi salvare il file con il codice non hai altra possibilità se non quella di scegliere come tipo file file con attivazione macro.

Diversamente il codice lo perdi.

Ma questo si sa dalla notte dei tempi.

Per l’ultima domanda potresti costruire una userform con al suo interno le textbox (non label che sono un’altra cosa) che ti occorrono.
 

ges

Excel/VBA Expert
Amministratore
Expert
21 Giugno 2015
18.842
113
Como
2011MAC 2016WIN
353
ho fatto un copia/incolla dei 3 Label in ognuno dei 7 fogli
- in ogni foglio ho inserito il codice soprascritto
Ciao, non serviva fare quello che hai fatto, bastava un solo codice messo in un modulo standard se ti servivano tutti usando un ciclo oppure indicandogli i fogli interessati
 

Sostieni ForumExcel

Aiutaci a sostenere le spese e a mantenere online la community attraverso una libera donazione!