Range-object (Excel)

• 08/14/2019
• 9 minuten te lezen
• • o
  • M
  • L
  • m
  • O
  • +4

Voor een cel, een rij, een kolom, een selectie van cellen met een of meer aaneengesloten blokken van cellen, of een 3D-bereik.,

opmerkingen

het standaard lid van Range stuurt oproepen zonder parameters door naar de waarde-eigenschap en oproepen met parameters naar het Itemlid., Accordingly, someRange = someOtherRange is equivalent to someRange.Value = someOtherRange.Value, someRange(1) to someRange.Item(1) and someRange(1,1) to someRange.Item(1,1).,

De volgende eigenschappen en methoden voor het retourneren van een Range-object worden beschreven in het Voorbeeld sectie:

• Bereik en Cellen eigenschappen van het Werkblad-object
• Bereik en Cellen eigenschappen van de Range-object
• Rijen en Kolommen eigenschappen van het Werkblad-object
• Rijen en Kolommen eigenschappen van de Range-object
• Offset eigendom van het Range-object
• Unie methode van het Application-object

Voorbeeld

Range (arg), waar arg namen het bereik, de terugkeer van een Range-object vertegenwoordigt een enkele cel of een bereik van cellen., Het volgende voorbeeld plaatst de waarde van cel A1 in cel A5.

Worksheets("Sheet1").Range("A5").Value = _ Worksheets("Sheet1").Range("A1").Value

het volgende voorbeeld vult het bereik A1:H8 met willekeurige getallen door de formule voor elke cel in het bereik in te stellen. Wanneer het wordt gebruikt zonder een object qualifier (een object aan de linkerkant van de periode), de eigenschap bereik retourneert een bereik op het actieve werkblad. Als het actieve werkblad geen werkblad is, mislukt de methode.

Gebruik de methode activeren van het werkbladobject om een werkblad te activeren voordat u de eigenschap bereik gebruikt zonder een expliciete objectkwalificatie.,

Worksheets("Sheet1").Activate Range("A1:H8").Formula = "=Rand()" 'Range is on the active sheet

het volgende voorbeeld wist de inhoud van het bereik genaamd Criteria.

Worksheets(1).Range("Criteria").ClearContents

gebruik cellen op een werkblad om een bereik te verkrijgen dat alle afzonderlijke cellen op het werkblad bevat. U kunt afzonderlijke cellen openen via Item (rij, kolom), waarbij rij de rijindex is en kolom de kolomindex.,Item kan worden weggelaten omdat de oproep wordt doorgestuurd naar het door het standaard lid van het bereik.In het volgende voorbeeld wordt de waarde van cel A1 ingesteld op 24 en van cel B1 op 42 op het eerste blad van de actieve werkmap.

Worksheets(1).Cells(1, 1).Value = 24Worksheets(1).Cells.Item(1, 2).Value = 42

het volgende voorbeeld stelt de formule in voor cel A2.

ActiveSheet.Cells(2, 1).Formula = "=Sum(B1:B5)"

hoewel u ook Range("A1") kunt gebruiken om cel A1 te retourneren, kunnen er momenten zijn waarop de eigenschap cellen handiger is omdat u een variabele voor de rij of kolom kunt gebruiken. Het volgende voorbeeld maakt kolom-en rijkoppen op Sheet1., Wees ervan bewust dat nadat het werkblad is geactiveerd, de eigenschap cellen kan worden gebruikt zonder een expliciete bladdeclaratie (het retourneert een cel op het actieve blad).

Use_expression_.Cellen, waarbij expressie een expressie is die een Bereikobject retourneert, om een bereik met hetzelfde adres te verkrijgen dat uit enkele cellen bestaat.,Op een dergelijk bereik opent u afzonderlijke cellen via Item (rij, kolom), waarbij deze relatief zijn ten opzichte van de linkerbovenhoek van het eerste gebied van het bereik.Item kan worden weggelaten omdat de oproep wordt doorgestuurd naar het door het standaard lid van het bereik.Het volgende voorbeeld stelt de formule in voor cel C5 en D5 van het eerste blad van de actieve werkmap.

Worksheets(1).Range("C5:C10").Cells(1, 1).Formula = "=Rand()"Worksheets(1).Range("C5:C10").Cells.Item(1, 2).Formula = "=Rand()"

Gebruik bereik (cell1, cell2), waarbij cell1 en cell2 Bereikobjecten zijn die de start-en eindcellen specificeren, om een Bereikobject te retourneren. Het volgende voorbeeld stelt de randlijnstijl in voor cellen A1:J10.,

With Worksheets(1) .Range(.Cells(1, 1), _ .Cells(10, 10)).Borders.LineStyle = xlThick End With

gebruik rijen op een werkblad om een bereik te verkrijgen dat alle rijen op het werkblad bevat. U kunt toegang krijgen tot enkele rijen via Item (rij), waarbij rij de rijindex is.,Item kan worden weggelaten omdat de oproep wordt doorgestuurd naar het door het standaard lid van het bereik.

het volgende voorbeeld verwijdert rij 4 en 10 van het eerste blad van de actieve werkmap.

Worksheets(1).Rows(10).DeleteWorksheets(1).Rows.Item(5).Delete

gebruik kolommen op een werkblad om een bereik te verkrijgen dat alle kolommen op het werkblad bevat., U kunt toegang krijgen tot enkele kolommen via Item (rij) , waarbij rij de kolomindex is die wordt gegeven als een nummer of als een kolomadres in A1-stijl.Item kan worden weggelaten omdat de oproep wordt doorgestuurd naar het door het standaard lid van het bereik.

het volgende voorbeeld verwijdert kolom “B”, “C”, “E” en “J” van het eerste werkblad van de actieve werkmap.

Use_expression_.,Rijen, waarbij expressie een expressie is die een Bereikobject retourneert, om een bereik te verkrijgen dat bestaat uit de rijen in het eerste gebied van het bereik.U kunt toegang krijgen tot enkele rijen via Item (rij), waarbij rij de relatieve rijindex is vanaf de bovenkant van het eerste gebied van het bereik.Item kan worden weggelaten omdat de oproep wordt doorgestuurd naar het door het standaard lid van het bereik.

het volgende voorbeeld verwijdert de bereiken C8:D8 en C6: D6 van het eerste blad van de actieve werkmap.

Worksheets(1).Range("C5:D10").Rows(4).DeleteWorksheets(1).Range("C5:D10").Rows.Item(2).Delete

Use_expression_.Kolommen, waarbij expressie een expressie is die een Range-object retourneert, om een bereik te verkrijgen dat bestaat uit de kolommen in het eerste gebied van het bereik.U kunt toegang krijgen tot enkele kolommen via Item (rij) , waarbij rij de relatieve kolomindex is links van het eerste gebied van het bereik dat wordt opgegeven als een nummer of als een kolomadres in A1-stijl.Item kan worden weggelaten omdat de oproep wordt doorgestuurd naar het door het standaard lid van het bereik.,

het volgende voorbeeld verwijdert de bereiken L2: L10, G2:G10, F2:F10 en D2: D10 van het eerste blad van de actieve werkmap.

gebruik Offset( rij, kolom), waarbij rij en kolom de rij-en kolomverschuivingen zijn, om een bereik bij een opgegeven offset naar een ander bereik te retourneren., Het volgende voorbeeld selecteert de cel drie rijen beneden van en één kolom rechts van de cel in de linkerbovenhoek van de huidige selectie. U kunt geen cel selecteren die niet op het actieve werkblad staat, dus moet u eerst het werkblad activeren.

Worksheets("Sheet1").Activate 'Can't select unless the sheet is active Selection.Offset(3, 1).Range("A1").Select

gebruik Union (range1, range2, …) om bereiken met meerdere gebieden te retourneren-dat wil zeggen bereiken die bestaan uit twee of meer aaneengesloten cellenblokken. Het volgende voorbeeld maakt een object gedefinieerd als de Vereniging van bereiken A1:B2 en C3:D4 en selecteert vervolgens het gedefinieerde bereik.,

Als u werkt met selecties die meer dan één gebied bevatten, is de eigenschap Areas nuttig. Het verdeelt een selectie met meerdere gebieden in afzonderlijke Range-objecten en retourneert de objecten als een verzameling. U kunt de eigenschap aantal op de geretourneerde verzameling gebruiken om een selectie te verifiëren die meer dan één gebied bevat, zoals in het volgende voorbeeld wordt getoond.

Sub NoMultiAreaSelection() NumberOfSelectedAreas = Selection.Areas.Count If NumberOfSelectedAreas > 1 Then MsgBox "You cannot carry out this command " & _ "on multi-area selections" End If End Sub

dit voorbeeld gebruikt de geavanceerde filtermethode van het Range-object om een lijst te maken van de unieke waarden, en het aantal keren dat deze unieke waarden optreden, in het bereik van kolom A.,Item

Draaitabel

Punt

PrefixCharacter

Vorige

QueryTable –

Bereik

ReadingOrder

Grootte

Rij

RowHeight

Rijen

ServerActions

ShowDetail

ShrinkToFit

SoundNote

SparklineGroups

Stijl

Samenvatting

Tekst

Top

UseStandardHeight

UseStandardWidth

Beoordeling

Waarde

2

VerticalAlignment

Breedte

Werkblad

WrapText

XPath

Zie ook: