Live-Forum - Die aktuellen Beiträge
Datum
Titel
28.03.2024 21:12:36
28.03.2024 18:31:49
Anzeige
Archiv - Navigation
428to432
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
428to432
428to432
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Bereich zurückgeben

Bereich zurückgeben
14.05.2004 14:56:30
joel
hallo
ich suche eine formel, mit der ich alle zellen als bereich erhalte, in denen sich der gesuchte wert befindet.
ein beispiel:
gesuchter wert: 100
tabellenwerte (z.B. in zellen A1-G1): 12;234;100;34;23;100;124
rückgabe ist eine referenz auf die zellen C1 und F1
hoffe, hier kann jemand helfen.. ansonsten muss ich halt kurz programmieren.. dann muss ich mich jedoch selbst um die aktualisierung der betroffenen felder kümmern..
danke, gruss joel

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Bereich zurückgeben
14.05.2004 15:14:27
Frank
Hallo Joel,
probier mal folgendes
Public zeile as Integer
Public Spalte as Integer
Public hilfzeileas Variant
Public hilfspalte as Variant
Public i as Variant
Public j as Variant
sub suche()
zeile=1
spalte=1
'Letze Spalte suchen
do while activesheet.cells(1,spalte)""
spalte=spalte+1
loop
'Letze Zeile suchen
do while activesheet.cells(Zeile ,"A")""
Zeile =Zeile +1
loop
for i=1 to zeile
for j=1 to spalte
if activesheet.cells(i,j)= gesuchter wert then
hilfzeile = i
hilfspalte = j
Ergebnis=i+j
msgbox=Ergebnis
end if
next
next
du kannst ja die Zahlen der Spalten dann in Buchstaben wandeln in der if schleife mit einer switch case anweisung
case 1 d.h. hilfspalte ="A"
case 2 "B"
usw.
Mfg Frank
Anzeige
AW: Bereich zurückgeben
14.05.2004 15:29:06
joel
hallo frank
danke für deine bemühungen. ich suche eine formel, sprich eine EXCEL-formel.
die (einfache) alternative ist, dies zu programmieren..
übrigens: die letzte zeile und spalte erhälst du auch über tabelle1.usedrange.row, resp .column :-)
noch etwas, über tabelle1.cells.specialcells(..) kannst du direkt zellen ansprechen, die z.b. einen wert enthalten
gruss joel
AW: Bereich zurückgeben
14.05.2004 15:40:48
Frank
Cool,
wußte ich nicht, ich kenn wenig so "Spezialfunktionen".
Mach viel in so Schleifen :-)
Mfg Frank
AW: Bereich zurückgeben
14.05.2004 15:56:32
joel
hallo frank
schleifen sind halt meisst langsamer.. und umständlicher.
gruss joel
Anzeige
AW: Bereich zurückgeben
15.05.2004 08:51:22
Christoph
Hallo Joel,
hier ein Vorschlag für dein genanntes Bsp:
Formel in H1:
{=KKLEINSTE(WENN($A$1:$G$1=100;SPALTE($A$1:$G$1));ZEILE())}
gibt dir die Spaltennr.
und
{=ADRESSE(1;KKLEINSTE(WENN($A$1:$G$1=100;SPALTE($A$1:$G$1));ZEILE()))}
die Zelladresse.
diese nach unten ausfüllen.

Gruß
Christoph

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige