Pagina precedente | 1 | Pagina successiva
Vota | Stampa | Notifica email    
Autore

Funzione ActiveWorkbook

Ultimo Aggiornamento: 09/06/2021 16:18
Post: 72
Registrato il: 04/08/2004
Utente Junior
2007
OFFLINE
02/06/2021 15:59

buongiorno
ho un'espressione

ActiveWorkbook.Worksheets("90 40").Sort.SortFields.Clear

come faccio a renderla utilizzabile su qualsiasi Worksheet?
grazie

Excel 2007
Post: 4.717
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
OFFLINE
02/06/2021 16:04

Sostituendo lo specifico foglio con ActiveSheet.

Alfredo
Post: 72
Registrato il: 04/08/2004
Utente Junior
2007
OFFLINE
02/06/2021 16:54

Re:
alfrimpa, 02/06/2021 16:04:

Sostituendo lo specifico foglio con ActiveSheet.




cioè?

ActiveWorkbook.Activesheet.SortFields.Clear

?
Excel 2007
Post: 4.718
Registrato il: 21/06/2013
Città: NAPOLI
Età: 70
Utente Master
Excel 365
OFFLINE
02/06/2021 17:46

Non ho un pc per verificare penso di si.

Tu non hai provato a vedere se funziona?

Alfredo
Post: 73
Registrato il: 04/08/2004
Utente Junior
2007
OFFLINE
02/06/2021 18:06

Re:
alfrimpa, 02/06/2021 17:46:

Non ho un pc per verificare penso di si.

Tu non hai provato a vedere se funziona?




non funziona mi spiace
Excel 2007
Post: 39
Registrato il: 18/10/2016
Città: COSENZA
Età: 65
Utente Junior
Excel 2007
OFFLINE
08/06/2021 16:06

ActiveWorkbook
Buongiorno,
ActiveWorkbook.Sheets(nomefoglio)...............
Post: 74
Registrato il: 04/08/2004
Utente Junior
2007
OFFLINE
08/06/2021 16:17

Re: ActiveWorkbook
darionardella, 08/06/2021 16:06:

Buongiorno,
ActiveWorkbook.Sheets(nomefoglio)...............



no grazie vorrei rendere la formula utilizzabile con qualsiasi foglio

Excel 2007
Post: 40
Registrato il: 18/10/2016
Città: COSENZA
Età: 65
Utente Junior
Excel 2007
OFFLINE
08/06/2021 16:20

La funzione è utilizzabile con qualsiasi foglio.
Basta sostituire a nomefoglio il nome del foglio che vuoi utilizzare.
Altrimenti c'è solo ActiveSheet...... che opera sul foglio attivo su cui stai lavorando.
Post: 75
Registrato il: 04/08/2004
Utente Junior
2007
OFFLINE
08/06/2021 16:29

Re:
darionardella, 08/06/2021 16:20:

La funzione è utilizzabile con qualsiasi foglio.
Basta sostituire a nomefoglio il nome del foglio che vuoi utilizzare.
Altrimenti c'è solo ActiveSheet...... che opera sul foglio attivo su cui stai lavorando.




appunto vorrei poterla utilizzare su qualsiasi foglio sena modificarla ogni volta
Excel 2007
Post: 1.411
Registrato il: 27/06/2011
Utente Veteran
excel 2007
OFFLINE
08/06/2021 17:57

Usa activesheet,
ed inserisci l'istruzione nel modulo di ogni foglio
all'evento interessato.
Altrimenti devi ciclare i fogli all'apertura del file all'evento
Workshop.Open, o fare una macro che li cicla al bisogno.

Come vedi ci sono varie alternative/possibilità.
Ciao
Frank







Stretta la foglia, larga la via, dite la vostra che ho detto la mia.
Excel 2007 forse anche 2013 ... 2021 ... 365 e future...
Post: 41
Registrato il: 18/10/2016
Città: COSENZA
Età: 65
Utente Junior
Excel 2007
OFFLINE
09/06/2021 16:18

ActiveWorkbook
Se ho capito bene vorresti resettare il Sort su ogni foglio della cartella attiva....
Bene,
si può fare semplicemente da VBA (programmazione di Office):
- ALT+F11 per andare nell'ambiente di programmazione
- inserire un modulo nuovo
- inserire nel modulo la seguente procedura
i commenti dopo l'apostrofo sono superflui
Sub SortClear ()
on error resume next 'intercetta gli errori
with activeworkbook
for each sht in .Sheets 'ciclo sui fogli della cartella attiva
sht.sort.sortfields.clear 'reset del Sort
next sht
end with
End Sub

- al termine ritorna sulla cartella e lancia la procedura

La cose si complica se non conosci la programmazione di Excel......
Ma puoi iniziare.

Buon lavoro


Vota: 15MediaObject5,00111 1
Amministra Discussione: | Chiudi | Sposta | Cancella | Modifica | Notifica email Pagina precedente | 1 | Pagina successiva
Nuova Discussione
 | 
Rispondi
Cerca nel forum
Tag discussione
Discussioni Simili   [vedi tutte]
Feed | Forum | Bacheca | Album | Utenti | Cerca | Login | Registrati | Amministra
Tutti gli orari sono GMT+01:00. Adesso sono le 11:20. Versione: Stampabile | Mobile | Regolamento | Privacy
FreeForumZone [v.6.1] - Copyright © 2000-2024 FFZ srl - www.freeforumzone.com