Hoe gebruik je VBA om een bereikvariabele in te stellen op selectie in Excel (5 methoden)

Hugh West

16-10-2023 Macro's & Excel VBA
  • Deel Dit
Hugh West

In dit artikel demonstreren wij enkele ideeën over het gebruik van Excel VBA om een bereik variabele naar selectie. We kunnen enkele veelvoorkomende bewerkingen uitvoeren op deze geselecteerde cellen met behulp van VBA In de volgende Excel-dataset tonen wij enkele westerse bandnamen en hun overeenkomstige zangeressen .

Download Praktijk werkboek

VBA om bereik in te stellen op selectie.xlsm

5 manieren om VBA te gebruiken om een bereikvariabele op selectie in te stellen in Excel

1. Bereikvariabele instellen om een bereik te selecteren met Excel VBA

Wij kunnen een reeks selecteren door instelbereik in VBA Stel dat we cellen willen selecteren B5:C8 Laten we naar de procedure hieronder gaan.

Stappen:

  • Om code te schrijven in VBA, open eerst de Tabblad Ontwikkelaar en selecteer dan Visual Basic .

Dan opent het een nieuw venster van Microsoft Visual Basic voor toepassingen .

  • Nu, open Plaats >> selecteer Module

.

  • Typ de volgende code in de VBA-module . 
 Sub RangeSelect() Dim Rng1 As Range Worksheets("selectRange").Activate Set Rng1 = Range("B5:C8") Rng1.Select End Sub

Hier hebben we stel de bereik B5:C8 als Rng1 We selecteren het door de Bereik Methode van VBA Houd in gedachten dat we activeer onze uitmuntendheid blad dus hebben we de selectRange blad.

  • Ga nu terug naar de blad en lopen Macro .

  • Daarna ziet u de bereik B5:C8 automatisch geselecteerd.

Zo kunt u de gewenste bereik variabele naar selectie met behulp van VBA .

Lees meer: Excel VBA: Bereik van cellen met waarden ophalen (7 voorbeelden)

2. VBA gebruiken om cellen op te maken door een bereikvariabele in te stellen

Stel dat onze dataset er als volgt uitziet.

We willen de rubriek vet en AutoFit de kolommen We kunnen dit doen via VBA Laten we eens kijken hoe we dit kunnen doen.

Stappen:

  • Open eerst Visual Basic en typ de volgende code in de VBA-module (om te zien hoe je Visual Basic en VBA-module ga dan naar Sectie 1 ). 
 Sub SetRange() Dim xyz As Range Set xyz = Range("B4:C4") xyz.Font.Bold = True xyz.Select Worksheets("autofit").Columns("B:C").AutoFit End Sub

Hier stellen we de bereik B4:C4 als xyz Dan hebben we de Gedurfd methode om de fonts in de cel B4 en C4 vet We hebben ook de kolommen B en C met behulp van de AutoFit methode.

  • Ga nu terug naar de blad en voer de Macro die genoemd wordt als SetRange .

Daarna ziet u de namen duidelijk in de kolommen en de kopteksten worden vet en geselecteerd.

Door dit pad te volgen, kunt u formaat cellen en AutoFit kolommen instelling bereikvariabelen in VBA .

Vergelijkbare lezingen

  • VBA gebruiken voor elke rij in een bereik in Excel
  • Hoe VBA gebruiken om bereik te selecteren van actieve cel in Excel (3 methoden)
  • Excel Macro: Meerdere kolommen sorteren met dynamisch bereik (4 methoden)

3. Een bereik kopiëren door Variabel bereik selecteren in VBA in te stellen

Stel dat we willen kopiëren B6:C9 door de bereik variabele naar selecteer Laten we de procedure hieronder bespreken.

Stappen:

  • Open eerst Visual Basic en typ de volgende code in de VBA-module (om te zien hoe je Visual Basic en VBA-module ga dan naar Sectie 1 ). 
 Sub CopyRange() Dim cpy As Range Set cpy = Range("B6:C9") cpy.Copy End Sub

Hier hebben we gewoon de bereik B6:C9 door gebruik te maken van de Kopie methode van VBA We stellen de bereik B6:C9 als cpy .

  • Ga nu terug naar je blad en lopen Macro's Selecteer CopyRange als het de naam is van uw huidige Macro .

U ziet de bereik B6:C9 wordt gekopieerd.

U kunt dit plakken reeks overal in uw Excel blad door op CTRL + V Ik heb de reeks via B12 naar C15 .

Door deze methode te volgen, kunt u kopie a reeks door de bereik variabele naar selectie in Excel VBA .

Lees meer: Excel VBA: Dynamisch bereik kopiëren naar een andere werkmap

4. Cellen opmaken met kleur door bereikvariabele in te stellen op selectie

Stel dat we de 8e en 10e rijen van de dataset met groen Laten we de onderstaande beschrijving volgen.

Stappen:

  • Open eerst Visual Basic en typ de volgende code in de VBA-module (om te zien hoe je Visual Basic en VBA-module ga dan naar Sectie 1 ). 
 Sub ColorRange() Dim color As Worksheet Dim x1 As Range Dim x2 As Range Set color = ActiveSheet Set x1 = Range("B8:C8") Set x2 = Range("B10:C10") x1.Cells.Interior.ColorIndex = 4 x2.Cells.Interior.ColorIndex = 4 End Sub

Hier definiëren we onze bereik B8:C8 en B10:C10 als x1 en x2 respectievelijk. We hebben onze kleur Excel Blad als ActiveSheet en we kleurden onze gewenste reeksen door Eigenschap ColorIndex .

  • Ga nu terug naar je blad en lopen Macro's Selecteer Kleurbereik omdat het de naam is van de huidige Macro .

Daarna ziet u de gewenste reeksen gevuld met groen kleur.

Zo kunt u de cellen opmaken met kleur door de bereik variabele naar selectie.

Lees meer: Bereik met variabele rij en kolom gebruiken in Excel VBA

Vergelijkbare lezingen

  • VBA om door rijen en kolommen in een bereik in Excel te lussen (5 voorbeelden)
  • Excel VBA om door Bereik te lussen tot lege cel (4 voorbeelden)
  • Hoe bereik converteren naar array in Excel VBA (3 manieren)

5. Rijen verwijderen door bereikvariabele in VBA in te stellen

Stel dat we de 8e en 10e rijen van de dataset met groen Laten we de onderstaande beschrijving volgen.

Stappen:

  • Open eerst Visual Basic en typ de volgende code in de VBA-module (om te zien hoe je Visual Basic en VBA-module ga dan naar Sectie 1 ). 
 Sub ColorRange() Dim color As Worksheet Dim x1 As Range Dim x2 As Range Set color = ActiveSheet Set x1 = Range("B8:C8") Set x2 = Range("B10:C10") x1.Cells.Interior.ColorIndex = 4 x2.Cells.Interior.ColorIndex = 4 End Sub

De reeksen die we willen verwijderen zijn B8:C8 en B10:C10 We noemden ze als x1 en x2 respectievelijk. Dan hebben we ze gewoon verwijderd door Verwijder methode.

  • Ga nu terug naar je blad en lopen Macro's . Kies DeleteRange als het de naam is van uw huidige Macro .

Daarna ziet u de bereiken B8:C8 en B10:C10 zijn weg.

Door deze aanpak te volgen, kunt u rijen door de bereikvariabelen naar selectie.

Praktijk Sectie

In de volgende afbeelding vindt u de dataset waarmee we in dit artikel hebben gewerkt, zodat u zelf kunt oefenen.

Conclusie

In een notendop richt het artikel zich volledig op enkele toepassingen om bereik variabele naar selectie door Excel VBA Als u andere ideeën of feedback heeft, laat ze dan alstublieft achter in het commentaarveld. Dit zal me helpen mijn komende artikelen te verrijken.

Vorige post Hoe SUMIFS te gebruiken wanneer cellen niet gelijk zijn aan meerdere teksten
Volgende bericht Hoe getal naar datum converteren in Excel (6 eenvoudige manieren)

Hugh West is een zeer ervaren Excel-trainer en -analist met meer dan 10 jaar ervaring in de branche. Hij heeft een bachelor in Accounting en Finance en een master in Business Administration. Hugh heeft een passie voor lesgeven en heeft een unieke lesaanpak ontwikkeld die gemakkelijk te volgen en te begrijpen is. Zijn deskundige kennis van Excel heeft duizenden studenten en professionals over de hele wereld geholpen hun vaardigheden te verbeteren en uit te blinken in hun carrière. Via zijn blog deelt Hugh zijn kennis met de wereld en biedt hij gratis Excel-tutorials en online trainingen aan om individuen en bedrijven te helpen hun volledige potentieel te bereiken.