Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Auf Bereichsnamen mit VBA zugreifen

Forumthread: Auf Bereichsnamen mit VBA zugreifen

Auf Bereichsnamen mit VBA zugreifen
18.07.2002 10:06:18
Lukas
Hallo!
Habe den Zellen A1:B20 den Namen "VorNachname" zugeordnet. Wie kann ich nun in VBA auf die einzelnen Zellwerte zugreifen? Wie finde ich heraus, welche Namen überhaupt definiert wurden? Wie finde ich heraus, wie groß (Anzahl Zeilen und Spalten) diese Namensbereiche haben?
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
Re: Auf Bereichsnamen mit VBA zugreifen
18.07.2002 10:35:49
Hans W. Herber
Hallo Lukas,

wie folgt:

hans

Re: Auf Bereichsnamen mit VBA zugreifen
18.07.2002 10:37:13
MAlexander
Moin, Lukas.

Was jetzt folgt, sind nur Denkanstöße:

1. Namen herausfinden
Sub ListAllNames(InBereich)

Dim nms As Names
Dim x As Long
Dim ZielZeile As Long
Dim ZielSpalte As Byte

ZielZeile = InBereich.Row
ZielSpalte = InBereich.Column

Set nms = ActiveWorkbook.Names

With Worksheets(InBereich.Parent.Name)

For x = 1 To nms.Count
.Cells(ZielZeile, ZielSpalte).Value = nms(x).Name
.Cells(ZielZeile, ZielSpalte + 1).Value = Mid(nms(x).RefersTo, 2)
ZielZeile = ZielZeile + 1
Next

End With
End Sub

2. Zugriff auf Bereiche (A1:B20 heißt "HugoHugo")

dim Hugo as range
dim Zelle as range
dim Wert as string

set Hugo = range("HugoHugo")

for each Zelle in Hugo ' Das ist ja fast schon Biologie

Zelle.value = "Krebs"
wert = Zelle.value

next

3. Anzahl Spalten: Hugo.columns.count
4. Anzahl Zeilen: Hugo.rows.count

MAlexander

Anzeige

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige