Bereichsnamen

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

...Peter,
wie bspw die hier folgende... Rem Verwendung eines Textes (=vorhand Name!) als Bereichsbezug ' Vs 1.2a -Autor: LSr -1Pub: 20090621 Herber -CDate: 2004/5 -LUpd: 20070706t Function T2RName(ByVal BerName As Variant) As Variant Dim i As Integer If IsArray(BerName) Then BerName = BerName(1) 'MxFml-Sicherung f.Einzelname BerName = Trim(BerName) If InStr(BerName, " ") > 0 Then BerName = Replace(BerName, " ", "") With ActiveWorkbook For i = 1 To .Names.Count If Replace(Replace(.Names(i).Name, "'", ""), _ ActiveSheet.Name & "!", "") = BerName Then Exit For Next i If i > .Names.Count Then T2RName = CVErr(xlErrNA) Else: T2RName = Evaluate(.Names(i).Value) End If End With End Function

Dazu im VB-Editor (Menü Entwicklertools - Visual Basic) zu deinem Projekt oder besser in einer Sammelmappe für VBA-Prozeduren (die du auch als AddIn installieren könntest) mit Rechtsklick auf Baumstruktur, Einfügen - Modul wählen, ein StddModul hinzufügen und dahinein die obige FktsProzedur kopieren. Danach kannst du im TabBlatt in einer Zelle bspw =T2RName(B$1&"_"&C1) schreiben. Wenn in B1 Brot und in C1 Einkauf steht, erhältst du den entsprechenden Wert. Bezeichnet der Name einen Bereich aus mehreren Zellen musst du die udFkt in einer Matrixfml verwenden, wenn du alle Werte wiedergeben willst, z.B. so...
{=T2RName(B$1&"_"&C1)}
...und dabei die gewünschte/erforderliche Zellenanzahl in gleicher Richtung wie der Namensbezug (also ggf als Zeile oder Spalte) auswählen ({} wdn bei Eingabeabschluss mit [Strg][Umsch][Enter] automatisch erzeugt! Fml muss nur in die 1.Zelle der Auswahl eingegeben wdn!).
In Fmln wird in diesem Fall stets mit allen Werten des Namens gerechnet, also bspw...
=SUMME(T2RName(B$1&"_"&C1))
Einzige Bedingung für die Anwendung ist... Der Name muss im betroffenen TabBlatt definiert sein! Die udFkt kann keine neuen Namen kreieren!
Gruß + schöSo, Luc :-?

...udF T2RName gefunden, Peter!
Dazu müsstest du wahrscheinlich nicht mal deine Tabelle ändern (die ich mir erst noch ansehen muss), sondern nur die Art wie du die Bereiche zu den Namen auswählst. Allerdings bedeutet das Nacharbeit bei jeder Erweiterung der Tabelle und erhöhten Arbeitsaufwand, wenn die Bereiche des Öfteren operativ geändert wdn sollten. Ansonsten würde sich der Mehraufwand ggf schon lohnen, da du so anstelle der Mehrfachauswahl-Bereiche (in VBA Areas), mit denen viele xlFktt nichts anfangen können (Beweis in der Abbildung), saubere Vektoren erhältst, die nur wenige xlFktt nicht verarbeiten können...
Userbild

Zum Vgl habe ich noch einige spezielle udF-Lösungen dargestellt, für dich relevant sind aber nur die schwarzen Formeln. Eine andere Möglichkeit sehe ich nicht, immerhin hat ja auch Sepp derweile eine Mini-udF bereitgestellt [was man sonst von ihm sieht, ist meist erheblich länger... ;-)].
Danke für den Hinweis mit der GB/KB-Sensibilität beim Namensvgl, die udF hat halt schon'n paar Jahre uff'm Buckel. Normalerweise setze ich ggf vorher alles Klein. Aber das kannst du ja beim Argument machen - Bsp ist auf der Abb zu sehen...
Gruß + schöWo, Luc :-?

Beliebteste Forumthreads (12 Monate)

	A	B	C	D	E	F
1	483	357			Brot
2	156	155			137
3	280	210			152
4	212	386
5	375	317
6	396	284
7	305	473
8	273	394
9	225	152
10	137	152

	A	B	C	D	E
1	496	450			Brot
2	158	253			181
3	353	471			171
4	474	108
5	321	482
6	323	462
7	456	360
8	445	411
9	437	412		496
10	171	181		321
11

16 Beiträge zum Forumthread Beiträge zu diesem Forumthread

VBA Beispiele zu verwandten Themen

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

16
Beiträge zum Forumthread

Beiträge zu diesem Forumthread