Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
800to804
800to804
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Formel in VBA-Funktion umschreiben

Forumthread: Formel in VBA-Funktion umschreiben

Formel in VBA-Funktion umschreiben
11.09.2006 06:36:42
Lorenz
Hallo Excelspezialisten!
Mit folgender ZellFormel:
=WENN(ANZAHL(FINDEN(INDIREKT(MySPALTE&"4");INDIREKT("C"&ZEILE())));1;0)
funktioniert´s einwandfrei.
Als benannte Formel tut sich allerdings nichts. Daher möchte ich die Aufgabe mit einer VBA-Funktion lösen.
Kann mir vielleicht jemand so eine Funktion erstellen?
PS.: MySPALTE = Benannte Formel[zur Ausgabe des Spaltenbuchstabens] =LINKS(ADRESSE(1;SPALTE();4);1+(SPALTE()>26))
Danke
und Grüße
Lorenz
Anzeige

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Formel in VBA-Funktion umschreiben
11.09.2006 08:01:45
roland_k
Hi
mit dem makrorekorder zeigts dir denke ich den code an.
recorder starten
auf die zelle mit der hinterlegten funktion klicken, return, dan sollte das im makro angezeigt werden.
nur gut gemeint, es kann auch sein dass ich da was nicht richtig verstanden habe
gruss
roland_k
Anzeige
AW: Formel in VBA-Funktion umschreiben
11.09.2006 08:06:21
Coach
Hallo Lorenz,
das liegt an der automatischen Matrixformel-Funktion bei als Namen definierten Formeln.
Du müßtest Deine MySpalte-Formel so ändern:
=LINKS(ADRESSE(1;MIN(SPALTE());4);1+(MIN(SPALTE())>26))
~f~
Deine Ergebnisformel so:
~f~
=WENN(ANZAHL(FINDEN(INDIREKT(MySpalte&"4");INDIREKT("C"&MIN(ZEILE()))));1;0)
Es wäre natürlich viel einfacher, die benannte Formel so zu definieren, nachdem Du zuvor Zelle D5 markiert hast:
=WENN(ANZAHL(FINDEN(Tabelle1!D$4;Tabelle1!$C5));1;0)
Excel passt die Bezüge dann automatisch an.
Gruß Coach
Anzeige
AW: Formel in VBA-Funktion umschreiben
11.09.2006 09:15:15
Lorenz
Hallo Coach!
mit =LINKS(ADRESSE(1;MIN(SPALTE());4);1+(MIN(SPALTE())>26)) liefert mir die Spaltenbezeichnung und hängt hinten eine "1" an. Somit ist als Spaltenbezeichnung in "INDIREKT(MySPALTE&"4") nicht brauchbar.
Die Variante "WENN(ANZAHL(FINDEN(Tabelle1!D$4;Tabelle1!$C5));1;0)" habe ich aus folgenden Grund nicht verwendet: Die benannte Formel sollte für alle Arbeitsblätter u. das in bis zu zehn verschiedene Bereichen.
Deswegen weil "Excel passt die Bezüge dann automatisch an"
Gruss
Lorenz
Anzeige
AW: Formel in VBA-Funktion umschreiben
11.09.2006 09:31:42
Coach
Hallo Lorenz,
bei mir liefert
=LINKS(ADRESSE(1;MIN(SPALTE());4);1+(MIN(SPALTE())>26))
eindeutig nur die Spaltenbezeichnung, vielleicht hast Du die Formel falsch "benannt".
Gruß Coach
AW: Formel in VBA-Funktion umschreiben
11.09.2006 09:44:04
Lorenz
Hallo Coach!
bei mir liefert
=LINKS(ADRESSE(1;MIN(SPALTE());4);1+(MIN(SPALTE())>26))
immer nur die Spaltenbezeichnung &1, auch mit der Formel. Also A1 für Spalte(1)
u. AA1 für Spalte(27)usw..
PS:Habe es auch in leerer Mappe probiert
Gruß Lorenz
Anzeige
Erledigt m. T :-))
11.09.2006 11:54:21
Lorenz
Hallo Coach!
Dein Coaching brachte was!
Und zwar verwende ich für meine Zwecke (Wünsche) die Variante(den Namen) "MyErg"
Danke vielmals u. Grüsse Lorenz
Anzeige
AW: Formel in VBA-Funktion umschreiben
11.09.2006 11:28:38
Lorenz
Hallo!
Kleine Korrektur (oder zweite verwendete Variante)zu PS.:
MySPALTE = Benannte Formel[zur Ausgabe des Spaltenbuchstabens] =WECHSELN(ADRESSE(1;SPALTE();4);1;)
Gruss Lorenz
Erledigt o.T
11.09.2006 14:48:54
Lorenz
;

Forumthreads zu verwandten Themen

Textformatierung in einer Formel
Dieterlem

Hallo Excelfreunde,
ich möchte ein Wort fett innerhalb eines Formelergebnisses fett darstellen. Beispiel:
"WENN(A1="Ja";"Beispieltext soll Fett dargestellt werden";"")
Dabei soll nur das Wort 'Fett', fett formatiert werden.
Ist so etwas möglich?
Gruß
Dieterlem
27.10.2008 19:55:00
Thread-ID: 1019731
3 Beiträge
Anzeige
Formel wenn dann sonst ...
Uwe

Hallo, Gemeinde ..
Mir stellt sich folgende Herausforderung:
ich möchte in einer Liste Fahrtkosten berechnen. Der Arbeiter bekommt von km 1 bis km 10 0,36€ pro km (einfach). ab dem 11 km bekommt der Arbeiter 0,40€.
Wie bekomme ich eine Formel hin, die das berechnet, wenn
- der A...
31.10.2008 11:20:00
Thread-ID: 1020821
10 Beiträge
Formel mit Text Datum und wert in Zeitreihe
Karel

Hallo Forum,
Habe ein bezahl blatt mit betragen in eine Spalte wird eingetragen als Text Bezahlt oder Offen wie kann ich an hand von Datum und Text (bezalt oder Offen) diese wert in eine Zeitreihe darstellen ab Zelle i11 und i12
Tabelle1

 BCDEFGHIJKLMN11   &...
19.11.2008 20:37:00
Thread-ID: 1026214
5 Beiträge
Formel wenn dann zellvergleich Text
Karel

Hallo Forum,
wie kann ich Zellwert C mit Zellwert E vergleichen ausgaben in Zelle A
wenn C und D Leer dsnn A auch Leer
Tabelle1

 ABCDE2Ausgabe Textwert Textwert3Offen Bezahlt Offen4Bezahlt Bezahlt Bezahlt5Offen Bezahlt  6Of...
28.11.2008 20:04:52
Thread-ID: 1028782
5 Beiträge
Formelproblem "wenn(text - beinhaltet, dann....)
Andi

Hallo Experten,
Ich steh bei folgender Excelformel an.
=WENN(D13=....folgender text beinhaltet ist (AA).....;"True";"false")
Ich würde gerne überprüfen ob im Feld D13 der Text "AA" vorkommt (z.B. Artikel "AA01"), falls dies zutrifft bitte "True" schreiben, ansonsten "false".
Da...
04.12.2008 11:42:00
Thread-ID: 1030117
3 Beiträge
Text in einer Spalte formatieren
Martin

Hallo
in einer Zelle habe ich sehr viel Text hineingeschrieben. Möchte für den Ausdruck die Spalte aber nur ca. 5 cm breit formatieren. Der Text soll dann automatisch Linie für Linie untereinander zu stehen kommen. Keine Ahnung wie das möglich ist. Wenn ich die Spalte schmaler formatiere bl...
04.01.2009 10:57:00
Thread-ID: 1036687
5 Beiträge
Formel WENN DANN
Hirtenanna

Hallo Gemeinde,
wende mich heute mit einem Formelproblem an Euch, wo ich bisher keine Lösung für ergoogeln bzw. im Forum finden konnte. Weiß nur, das es sich wohl um eine WENN DANN Formel handeln muß.
Also:
Ich habe in den Zellen V4 R4 N4 J4 F4 Z4 Zeiten stehen, welche als Summe in...
25.01.2009 12:12:00
Thread-ID: 1043536
11 Beiträge
Formel mit festem Textinhalt
Felix

Hallo Zusammen
Könnte mir jemand diese Formel überprüfen warum sie nicht geht!
C8 = ist der Name der Gesellschaft
C9 = ist das Datum z.b. 31.Dezember 2008
="Abschlussmemo für die "&TEXT(Stammdaten!$C$8;"per")&TEXT(Stammdaten!$C$9;"TT. MMMMMMMM JJJJ")
Für Eure hilfe...
30.01.2009 21:22:49
Thread-ID: 1045527
3 Beiträge
Anzeige
Text in Zelle abfragen und formatieren
Bernd

Hallo Zusammen,
folgendes Problem: In einer Tabelle mit mehreren Spalten beinhaltet eine Spalte einen Text. Wie kann ich aus dieser Spalte eine bestimmte Zeichenfolge auslesen/erkennen und die betreffende Zelle dann farblich formatieren? Zum Beispiel beinhaltet eine Zelle den Text ABCDEF. W...
19.02.2009 15:19:00
Thread-ID: 1052173
5 Beiträge
Anzeige
Formel mittels TextBox eingeben
Frank

Hallo und Guten Abend Zusammen!!!
Der Hilflose meldet sich mit folgender Frage: Kann ich aus einer UF heraus mittels TextBox eine Formel in ein Blatt schreiben lassen. Wenn ja, wie?
Danke!!!
Gruß Frank H.
26.03.2009 21:03:00
Thread-ID: 1064383
6 Beiträge
Anzeige
Texte in Textfeldet per Makro umformatieren
Michael

Guten Tag,
ich bekomme von vielen diversen Personen Kommentare in Form von Textfeldern (ca. 90 pro Monat) zugesandt, die ich dann in mein Layout umformatieren muss (Bitten an die Sender mein benötigtes Format zu nehmen, finden leider selten Gehör:-(().
Jetzt habe ich mir die Frage geste...
02.07.2009 12:41:55
Thread-ID: 1085928
3 Beiträge
Formel interpretiert Feldwerte als Text
pietsch.st@gmx.de

Hallo Forum,
habe Werte in vier Zellen. Die Werte stammen jeweils aus folgender selbstgeschriebener Funktion mit Rückgabewert Long:
= Anz_Unf($B$2, "Arbeitsunfall", "3","e").
Die Werte dieser Formel sind im Feld als Zahl dargestellt und sind korrekt. Als Zahl gemäß Excel "Format-Zel...
08.07.2009 22:59:54
Thread-ID: 1087292
3 Beiträge

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Anzeige