Questo tutorial dimostrerà come selezionare e lavorare con intere righe o colonne in VBA.
Per prima cosa tratteremo come selezionare intere righe e colonne, quindi dimostreremo come manipolare righe e colonne.
Seleziona intere righe o colonne
Seleziona riga singola
È possibile selezionare un'intera riga con il Oggetto Righe come questo:
1 | Righe(5).Seleziona |
Oppure puoi usare Intera riga insieme con il Gamma o Celle Oggetti:
1 | Intervallo ("B5"). Intera riga.Seleziona |
o
1 | Cells(5,1).EntireRow.Select |
Puoi anche usare il Oggetto intervallo per fare riferimento specificamente a una riga:
1 | Intervallo("5:5").Seleziona |
Seleziona colonna singola
Invece di Oggetto Righe, utilizzare il Oggetto Colonne per selezionare le colonne. Qui puoi fare riferimento alla colonna numero 3:
1 | Colonne(3).Seleziona |
o lettera “C”, racchiusa tra virgolette:
1 | Colonne("C").Seleziona |
Invece di Intera riga, utilizzo Colonna intera insieme con il Gamma o Celle Oggetti per selezionare intere colonne:
1 | Intervallo("C5").InteraColonna.Seleziona |
o
1 | Cells(5,3).EntireColumn.Select |
Puoi anche usare il Oggetto intervallo per riferirsi specificamente a una colonna:
1 | Intervallo("B:B").Seleziona |
Seleziona più righe o colonne
La selezione di più righe o colonne funziona esattamente allo stesso modo quando si utilizza EntireRow o EntireColumn:
1 | Intervallo ("B5: D10"). Intera riga.Seleziona |
o
1 | Intervallo("B5:B10").EntireColumn.Select |
Tuttavia, quando si utilizzano gli oggetti Righe o Colonne, è necessario inserire i numeri di riga o le lettere di colonna tra virgolette:
1 | Righe("1:3").Seleziona |
o
1 | Colonne("B:C").Seleziona |
Seleziona riga o colonna ActiveCell
Per selezionare la riga o la colonna ActiveCell, puoi utilizzare una di queste righe di codice:
1 | ActiveCell.EntireRow.Select |
o
1 | ActiveCell.EntireColumn.Select |
Seleziona righe e colonne su altri fogli di lavoro
Per selezionare Righe o Colonne su altri fogli di lavoro, devi prima selezionare il foglio di lavoro.
12 | Fogli("Foglio2").SelezionaRighe (3).Seleziona |
Lo stesso vale per la selezione di righe o colonne in altre cartelle di lavoro.
123 | Cartelle di lavoro ("Book6.xlsm"). AttivaFogli("Foglio2").SelezionaRighe (3).Seleziona |
Nota: devi Attivare la cartella di lavoro desiderata. non mi piace il Oggetto Fogli, il Oggetto cartella di lavoro non ha un Seleziona metodo.
È necessario selezionare righe e colonne?
Tuttavia, non è (quasi?) mai necessario selezionare effettivamente Righe o Colonne. Non è necessario selezionare una riga o una colonna per interagire con essi. Invece, puoi applicare metodi o proprietà direttamente alle righe o alle colonne. Le prossime sezioni dimostreranno diversi metodi e proprietà che possono essere applicati.
Puoi utilizzare qualsiasi metodo sopra elencato per fare riferimento a Righe o Colonne.
Metodi e proprietà di righe e colonne
Elimina intere righe o colonne
Per eliminare righe o colonne, utilizzare il Elimina metodo:
1 | Righe("1:4"). Elimina |
o:
1 | Colonne ("A: D"). Elimina |
Inserisci righe o colonne
Utilizzare il Metodo di inserimento per inserire righe o colonne:
1 | Righe("1:4").Inserisci |
o:
1 | Colonne ("A: D"). Inserisci |
Copia e incolla intere righe o colonne
Incolla in una riga o colonna esistente
Quando copi e incolli intere righe o colonne devi decidere se vuoi incollare su una riga/colonna esistente o se vuoi inserire una nuova riga/colonna per incollare i tuoi dati.
Questi primi esempi copieranno e incolleranno su una riga o colonna esistente:
1 | Intervallo ("1:1"). Copia Intervallo ("5:5") |
o
1 | Intervallo ("C: C"). Copia Intervallo ("E: E") |
Inserisci e incolla
Questi prossimi esempi verranno incollati in una riga o colonna appena inserita.
Questo copierà la riga 1 e la inserirà nella riga 5, spostando le righe esistenti verso il basso:
12 | Intervallo ("1:1"). CopiaIntervallo ("5:5"). Inserisci |
Questo copierà la colonna C e la inserirà nella colonna E, spostando le colonne esistenti a destra:
12 | Intervallo ("C: C"). CopiaIntervallo ("E: E"). Inserisci |
Nascondi/Mostra righe e colonne
Per nascondere righe o colonne imposta le loro Proprietà nascoste a Vero. Usa False per nascondere le righe o le colonne:
12345 | "Nascondi righe"Rows("2:3").EntireRow.Hidden = True"Mostra righe"Righe("2:3").EntireRow.Hidden = False |
o
12345 | "Nascondi colonne"Colonne("B:C").EntireColumn.Hidden = True"Mostra colonne"Colonne("B:C").EntireColumn.Hidden = False |
Raggruppa/Separa righe e colonne
Se vuoi raggruppare righe (o colonne) usa un codice come questo:
12345 | "Raggruppa righe"Righe("3:5").Gruppo"Colonne di gruppo"Colonne ("C: D"). Gruppo |
Per rimuovere il raggruppamento usa questo codice:
12345 | "Separa righe"Righe("3:5").Separa"Separa colonne"Colonne ("C: D"). Separa |
Questo espanderà tutti i livelli di struttura "raggruppati":
1 | ActiveSheet.Outline.ShowLevels RowLevels:=8, ColumnLevels:=8 |
e questo collasserà tutti i livelli di struttura:
1 | ActiveSheet.Outline.ShowLevels RowLevels:=1, ColumnLevels:=1 |
Imposta l'altezza della riga o la larghezza della colonna
Per impostare la larghezza della colonna utilizzare questa riga di codice:
1 | Colonne("A:E").ColumnWidth = 30 |
Per impostare l'altezza della riga utilizzare questa riga di codice:
1 | Righe("1:1"). AltezzaRiga = 30 |
Adatta automaticamente altezza riga/larghezza colonna
Per adattare automaticamente una colonna:
1 | Colonne ("A: B"). Adatta automaticamente |
Per adattare automaticamente una riga:
1 | Righe("1:2"). Adattamento automatico |
Righe e colonne su altri fogli di lavoro o cartelle di lavoro
Per interagire con righe e colonne su altri fogli di lavoro, è necessario definire il Oggetto Fogli:
1 | Fogli("Foglio2").Righe(3).Inserisci |
Allo stesso modo, per interagire con righe e colonne in altre cartelle di lavoro, è necessario definire anche il Oggetto cartella di lavoro:
1 | Cartelle di lavoro ("book1.xlsm"). Fogli ("Foglio2"). Righe (3). Inserisci |
Ottieni riga o colonna attiva
Per ottenere la riga o la colonna attiva, puoi utilizzare il pulsante Riga e Proprietà della colonna del Oggetto ActiveCell.
1 | MsgBox ActiveCell.Row |
o
1 | MsgBox ActiveCell.Column |
Funziona anche con Oggetto intervallo:
1 | MsgBox Range ("B3"). Colonna |