VBA e ordinare celle relativamente in Excel 2007

ghisirds

Utente Attivo
4 Mag 2007
227
0
16
Salve,
con Excel 2003 ero abituato a selezionare con una macro l'intervallo di celle che volevo ordinare e poi scrivere qualcosa del genere:

Rows("2:2").Select
Range("F2").Activate
Range(Selection, Selection.End(xlDown)).Select

Selection.Sort Key1:=Range("C1"), Order1:=xlAscending, Key2:=Range("k1") _
, Order2:=xlAscending, Header:=xlGuess, OrderCustom:=1, MatchCase:= _
False, Orientation:=xlTopToBottom, DataOption1:=xlSortNormal, DataOption2 _
:=xlSortNormal
Ora, con la versione 2007, la faccenda è un po' cambiata, e la stessa operazione viene registrata più o meno così, nonostante io la registri utilizzando i riferimenti relativi:

Range("F2").Select
ActiveCell.Rows("1:1").EntireRow.Select
ActiveCell.Activate
Range(Selection, Selection.End(xlDown)).Select
ActiveWorkbook.Worksheets("Statistiche").Sort.SortFields.Clear
ActiveWorkbook.Worksheets("Statistiche").Sort.SortFields.Add Key:=ActiveCell. _
Offset(0, 2).Range("A1:A351"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
ActiveWorkbook.Worksheets("Statistiche").Sort.SortFields.Add Key:=ActiveCell. _
Offset(0, 10).Range("A1:A351"), SortOn:=xlSortOnValues, Order:=xlAscending, _
DataOption:=xlSortNormal
With ActiveWorkbook.Worksheets("Statistiche").Sort
.SetRange ActiveCell.Range("A1:BQ351")
.Header = xlGuess
.MatchCase = False
.Orientation = xlTopToBottom
.SortMethod = xlPinYin
.Apply
End With
Il problema è, come si può vedere, che la macro è piena di riferimenti sia al foglio che alla quantità di righe selezionate, ma non va bene perchè il loro numero può variare (il numero di righe selezionate indendo).

Come si può adattare quindi questa macro per far si che ordini le righe selezionate indipendentemente dalla loro quantità e dal foglio in cui si trovano?

Grazie mille

__________________
Mai visto idee regalo così? (gift ideas in inglese, geschenkideen in tedesco o idée cadeau in francese)
 
Ultima modifica:
Discussioni simili
Autore Titolo Forum Risposte Data
G VBA OpenForm con WhereCondition + LIKE su campi differenti MS Access 5
F Modificare report di etichette di access con vba MS Access 0
Spenalzo Creare tabelle multiple con Access via VBA MS Access 2
GraceHawk ACCESS e VBA: scorrere le righe e le colonne di una tabella? MS Access 3
alankanz [VBA] Valori Array in una cella Visual Basic 1
F [MS Access] VBA non funziona più MS Access 2
T [VBA] Word: numerazione pagine su più documenti Windows e Software 2
O VBA Bottone di ricerca MS Access 0
alankanz [VBA] Ricerca testo formato specifico Visual Basic 0
A Access, creare nuova tabella in DB esterno con VBA Visual Basic 0
O Codice vba per la ricerca di record MS Access 0
Z [VBA] Debug ciclo for Visual Basic 0
novello88 [VBA] Risultato formula Excel Visual Basic 1
novello88 creare e distruggere collegamenti a tabelle con VBA MS Access 0
T aprire pdf con vba excel Programmazione 0
G Access in VBA - Come si fa a modificare testo nel'intestazione di file Word MS Access 0
A [VBA] eliminare caratteri ASCII da ListBox .NET Framework 2
L VBA Access Numero si azzera con dmax Database 0
G controllii inserimento dai vba Database 0
S vba - excel 2003 - controllo calendario Visual Basic 0
S Excel: formattazione celle condizionata con vba Visual Basic 0
M [VBA/EXCEL]Confronto colonne e stampa riga Visual Basic 0
K Come inseriesco una query in Vba Database 0
C XLS – VBA Creazione database da questionari. HELP urgente, pls Database 0
S trsformare userform da VBA a VB classico Programmazione 0
S comandare via VBA Programmazione 0
S VBA per Excel Database 1
M Microsoft Excel e VBA Programmazione 0
M StarOffice (OpenOfice) ---> VBA : 0-1 Windows e Software 0
M Ordinare una query join PHP 2
L [PHP] ordinare per data PHP 3
F [HTML] Google fogli ordinare per colonne HTML e CSS 0
P [PHP] ordinare un array multidimensionale in modo personalizzato PHP 2
T [PHP] ordinare un campo varchar che contiene numeri PHP 6
Trapano Query in php come ordinare per data e anche per ora PHP 7
L [PHP] ordinare xml PHP 0
Trapano [HTML] Ordinare indirizzi, creando un percorso HTML e CSS 3
M Ordinare i valori in query group by PHP 4
L Ordinare articoli dentro categorie e tag in ordine alfabetico wordpress WordPress 1
M Ordinare array (multidimensionale)? PHP 3
ste80 ordinare dati da file di testo PHP 3
R Ordinare alfabeticamente partendo da una PAROLA MySQL 0
M Ordinare visualizzazione record tramite form con input "text" PHP 2
xone Ordinare tramite menù a tendina i risultati di una query già stampati MySQL 0
M Ordinare array multidimensionale con esclusioni Javascript 0
M [PHP]Ordinare dati secondo prezzo PHP 2
borgo italia ordinare un array bidimensionale Snippet PHP 0
zighy ordinare risultati specifici PHP 20
D Ordinare i risultati di una query dalla fine della tabella MySQL 13
ivarello Ordinare dati Var in ordine numerico PHP 9

Discussioni simili