Innehållsförteckning
Det är tidskrävande när du vill formatera celler genom urval och arbeta med stora data samtidigt. Men med hjälp av VBA kan vi programmera för att göra det ganska enkelt. I den här handledningen visar vi hur man använder Variabelrad. och Variabelkolumn. i ett område med Excel VBA .
Ladda ner övningsboken
Ladda ner den här arbetsboken för att träna medan du läser den här artikeln.
Variabel rad och kolumn med VBA.xlsm5 lämpliga sätt att använda intervall med variabel rad och kolumn i Excel VBA
I följande avsnitt kommer vi att demonstrera följande 5 sätt att skapa Variabla rader. och kolumner Dessutom visar vi hur du använder dem för att formatera eller tillämpa anpassningar på variabel räckvidd I bilden nedan visas ett exempel på en datamängd för att använda uppgiften.
1. Formatera ett specifikt intervall genom att tillämpa variabel rad med Excel VBA
Låt oss säga att vi vill välja en variabel räckvidd genom att ansöka om ett Variabel radnummer. Vi kommer att välja intervallet B5:C10 och tillämpa den Typsnittsfärg ( Maroon ) i intervallet. Följ de enkla stegen nedan för att göra detta.
♠ Steg 1: Skapa en VBA-modul
- Först och främst trycker du på Alt + F11 för att starta VBA-makro .
- Klicka på på den Infoga.
- Välj sedan Modul .
♠ Steg 2: Skriv en VBA-kod
- Skriv följande VBA-koder.
Sub Variable_row_Select() 'deklarera en variabel för radnummer Dim Row_Number As Integer 'Ange en inmatningsruta, skriv 10 för radnumret Row_Number = InputBox("Skriv in radnumret") 'Infoga variabeln 'row_num' för att välja de första 5 raderna som innehåller data Sheets("Sheet1").Range(Cells(5, 2), Cells(Row_Number, 3)).Select End Sub
♠ Steg 3: Kör programmet
- För det första, rädda programmet och tryck på F5 att köra.
- Därför är det Inmatningsruta visas, och skriv 10 som radnummer .
- Slutligen trycker du på Gå in på för att se till att den sortiment med ( Rad 5 , Kolumn 2 ) till ( Variabel rad 10 , Kolumn 3 ) kommer att vara utvalda .
♠ Steg 4: Applicera teckensnittsfärg på området
- För att lägga till Typsnittsfärg i den valda sortiment , klistra in följande VBA-koder .
Sub Variable_row_Font() 'Deklarera en variabel för radnumret Dim Row_Number As Integer 'Ange en inmatningsruta, skriv 10 för radnumret Row_Number = InputBox("Skriv in radnumret") 'Infoga variabeln 'row_num' för att välja de första 6 raderna som innehåller data Sheets("Sheet1").Range(Cells(5, 2), Cells(Row_Number, 3)).Select 'Ange en färg för teckensnittet i Maroon With Selection .Font.Color = RGB(128, 0, 0)Slutar med Slutar med End Sub
♠ Steg 5: Ange ett radnummer
- Typ a radnummer ( 10 ) i Inmatningsruta .
- Klicka på OK .
- Därför är det valt område kommer att vara färgad som visas i bilden nedan.
Läs mer: Hur du använder VBA för att ställa in en intervallvariabel som val i Excel (5 metoder)
2. Anpassa ett dynamiskt intervall genom att tillämpa variabel rad med Excel VBA
När det använda intervallet är så stort att du inte kan särskilja radnumret kan du behöva använda senast använda raden som din Variabelrad. För att göra det följer du de beskrivna stegen nedan.
♠ Steg 1: Ange en VBA-kod
- Välj en ny Modul från Infoga
- I den nya Modul , skriv till följande VBA-program .
Sub Variable_Dynamic_Row() 'deklarera en variabel för radnummer Dim Last_Used_Row As Integer 'Definiera variabel för det använda intervallet Last_Used_Row = Worksheets("Sheet2").UsedRange.Rows.Count 'Tillämpa variabeln för att välja aktuell sista rad i intervallet Sheets("Sheet2").Range(Cells(5, 2), Cells(Last_Used_Row, 5)).Select End Sub
♠ Steg 2: Få fram urvalet
- När du har kört programmet kommer din sortiment kommer att vara utvalda upp till din senast använt rad.
♠ Steg 3: Använd en teckensnittsfärg
- Till mark valt område eller till redigera , pasta följande VBA-koder .
Sub Variable_Dynamic_Row() 'deklarera en variabel för radnummer Dim Last_Used_Row As Integer 'Definiera variabel för det använda intervallet Last_Used_Row = Worksheets("Sheet2").UsedRange.Rows.Count 'Tillämpa variabeln för att välja aktuell sista rad i intervallet Sheets("Sheet2").Range(Cells(5, 2), Cells(Last_Used_Row, 5)).Select With Selection .Font.Color = RGB(128, 0, 0) End With End Sub
♠ Steg 4: Slutresultat
- Slutligen, rädda programmet och kör genom att trycka på F5 .
- Som ett resultat av detta kan intervallet med din senast använda raden formateras med färg.
Läs mer: Excel VBA: Kopiera dynamiskt område till en annan arbetsbok
Liknande läsningar
- Hur du använder VBA för varje rad i ett intervall i Excel
- VBA för att gå igenom rader och kolumner i ett intervall i Excel (5 exempel)
- Excel VBA för att gå igenom intervallet tills cellen är tom (4 exempel)
- Hur man konverterar intervall till array i Excel VBA (3 sätt)
- Hur man använder VBA för att välja intervall från aktiv cell i Excel (3 metoder)
3. Formatera ett specifikt intervall genom att tillämpa variabel kolumn med Excel VBA
Likt Variabla rader. kan du ansöka variabla kolumner med Excel VBA . B5 ( Rad 5 , Kolumn 2 ) cell är den första cellen i den sortiment, och Rad 8 är den sista raden i intervallet; den sista kolumnen är den Variabelkolumn. Följ nedanstående procedurer för att applicera Variabelkolumn. .
♠ Steg 1: Skriv en VBA-kod
- I en ny Modul , skriv till följande VBA-kod .
Sub Variable_Column_Font() 'Deklarera en variabel för radnummer Dim Column_num As Integer 'Ange en inmatningsruta, skriv 5 för kolumnnumret Column_num = InputBox("Skriv kolumnnumret") 'Infoga variabeln 'Column_num' för att välja de första 5 kolumnerna som innehåller data Sheets("Sheet3").Range(Cells(5, 2), Cells(8, Column_num)).Select 'Ange en färg för teckensnittet i Maroon With Selection .Font.Color =RGB(128, 0, 0, 0) End With End Sub
♠ Steg 2: Kör programmet
- Till kör programmet, tryck på F5 efter spara .
- Därför kommer du att se följande resultat som din utvalda celler är intervallet B5:E8 .
4. Anpassa ett dynamiskt intervall genom att tillämpa en variabel kolumn med Excel VBA
Förutom den föregående kan du anpassa den Variabelkolumn. att utföra dynamiskt. När du öka uppgifter i en kolumn som kommer att Lägg till till den urval Följ den enkla instruktionen nedan för att göra det.
♠ Steg 1: Klistra in en VBA-kod
- Klistra in följande VBA koder till en ny Modul .
Sub Variable_Dynamic_Column() 'deklarera en variabel för kolumnnumret Dim lastColumn As Integer 'Definiera variabeln för det använda intervallet lastColumn = Worksheets("Sheet4").UsedRange.Columns.Count 'Tillämpa variabeln för att välja den sista kolumnen i intervallet Sheets("Sheet4").Range(Cells(5, 2), Cells(8, lastColumn)).Select 'färga teckensnittet för de valda cellerna i Maroon With Selection .Font.Color = RGB(128, 0,0) End With End Sub
♠ Steg 2: Kör programmet
- För det första, rädda programmet och tryck på F5 att köra.
- Som ett resultat av detta väljs intervallet och formateras upp till senast använda kolumn i arbetsbladet.
Läs mer: Excel-makro: Sortera flera kolumner med dynamiskt intervall (4 metoder)
5. Skapa ett intervall med både variabel rad och variabel kolumn med Excel VBA
Det är viktigt att du kan använda både Variabla rader. och variabla kolumner med ett val av ditt val. Den första cellen i vårt val av intervall är B5 ( Rad 5, Kolumn 2 ) och det sista intervallet kommer att variera beroende på vårt val. Följ de beskrivna stegen nedan för att utföra uppgiften.
♠ Steg 1: Skriv en VBA-kod
- För det första, skapa en ny Modul .
- Då, skriv till följande VBA-koder .
Sub Variable_Column_Row() 'deklarera en variabel för radnummer Dim Row_Number As Integer 'deklarera en variabel för kolumnnummer Dim Column_num As Integer 'Definiera variabler - skriv 8 för radnummer och 4 för kolumn Row_Number = InputBox("Skriv in radnumret") Column_num = InputBox("Skriv in kolumnnumret") 'Tillämpa variabeln för att välja rader och kolumner i området Sheets("Sheet5").Range(Cells(5, 2),Cells(Row_Number, Column_num)).Select With Selection .Font.Color = RGB(128, 0, 0, 0) End With End Sub
♠ Steg 2: Lägg in radnumret
- Typ alla radnummer .
♠ Steg 3: Infoga kolumnnumret
- Typ alla kolumnnummer .
♠ Steg 4: Få de slutliga resultaten
- När du väljer ( Rad , Kolumn ) = ( 8,5 ), får du det slutresultat som visas i bilden nedan.
Slutsats
Slutligen hoppas jag att du nu förstår hur man använder intervall med variabla rader och kolumner med Excel VBA Alla dessa strategier bör genomföras när dina data utbildas och tränas. Undersök övningsboken och tillämpa det du lärt dig. Vi drivs av att fortsätta erbjuda program som detta tack vare ditt generösa stöd.
Om du har några frågor, tveka inte att kontakta oss och dela med dig av dina tankar i kommentarsfältet nedan.
Excellent personalen återkommer till dig så snart som möjligt.
Stanna hos oss och fortsätt att lära dig.