Live-Forum - Die aktuellen Beiträge
Datum
Titel
26.04.2024 21:51:33
Idee für Grafik
26.04.2024 21:29:07
PQ zufällige Reihenfolge
26.04.2024 17:18:47
Große Datenmenge in komplexes Diagramm verpacken
26.04.2024 16:22:47
Aktualisierung Verknüpfung bei geschlossener Quelldatei
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1900to1904
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1900to1904
1900to1904
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Variable in Formel einsetzen

Variable in Formel einsetzen
27.09.2022 09:44:16
Kai
Hallo Community,
ich stehe gerade vor der Frage wie ich in einer Formel für eine Zeile eine Variable setzen kann, die ich am Anfang meines Makros setzen kann.
Ich lasse mir in Spalte G nur Werte anzeigen, wie viele Werte in Zeile 4 vorhanden. Sollte ich aber mehr als 5000 Einträge bekommen, wird die Formel nicht weitergeführt. Ich möchte jetzt quasi am Anfang des Skripts eine Variable festlegen mit einer Zahl. Wie i = 6000, dann wird auch die Formel bis dahin fortgeführt.
Dim LetzteZeile As Long
With ActiveSheet
LetzteZeile = .Cells(Rows.Count, 4).End(xlUp).Row
Range("G2").Select
ActiveCell.FormulaR1C1 = "=MaxWenn(R3C5:R5000C5,R3C6:R5000C6,RC[-1])"
Selection.AutoFill Destination:=Range("G2:G" & LetzteZeile)

6
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Variable in Formel einsetzen
27.09.2022 10:09:42
Oberschlumpf
Hi Kai,
änder...

Dim LetzteZeile As Long
...um in...

Dim LetzteZeile As Long, liGrenze As Integer
und änder...

"=MaxWenn(R3C5:R5000C5,R3C6:R5000C6,RC[-1])"
...um in...

"=MaxWenn(R3C5:R" & liGrenze & "C5,R3C6:R" & liGrenze & "C6,RC[-1])"
Hilfts?
Wenn nicht, zeig bitte ein Bsp-Datei.
Ciao
Thorsten
AW: Variable in Formel einsetzen
27.09.2022 10:11:52
onur
Ungetestet:

Dim i
i = 6000
ActiveCell.FormulaR1C1 = "=MaxWenn(R3C5:R" & i & "C5,R3C6:R" & i & "C6,RC[-1])"

Anzeige
AW: Variable in Formel einsetzen
27.09.2022 11:00:16
Kai
Vielen Dank an beide. Es funktioniert
Gruß Kai
AW: Variable in Formel einsetzen
27.09.2022 11:06:29
Yal
Hallo Kai,
eigentlich schon fast alles drin: 

Sub Formel_einsetzen()
Dim LetzteZeile As Long
With ActiveSheet
LetzteZeile = .Cells(Rows.Count, 4).End(xlUp).Row
Range(.Range("G2"), .Cells(LetzteZeile, "G")).FormulaR1C1 = "=MaxWenn(R3C5:R" & LetzteZeile & "C5,R3C6:R" & LetzteZeile & "C6,RC[-1])"
End With
End Sub
(bitte poste vollständige Sub/Function inkl. "End Sub"/"End Function". "With" sollten auch mit "End With" abgeschlossen sein. Sonst muss jeder "nachbasteln". Poste den Code innerhalb des Code-Tags -zweiter blauer Knopf)
VG
Yal
Anzeige
AW: Variable in Formel einsetzen
27.09.2022 11:22:22
Daniel
Hi
noch ne Variante, die ich bei längeren Formeln bevorzuge, weil sie übersichtlicher ist vorallem wenn die Variable so wie hier mehrfach benötigt wird.
btw, Autofill ist hier nicht notwendig, man kann die Formel gleich in alle Zellen schreiben:

Dim LetzteZeile As Long
FO as string
With ActiveSheet
LetzteZeile = Cells(Rows.Count, 4).End(xlUp).Row
FO = "=MaxWenn(R3C5:RzzzC5,R3C6:RzzzC6,RC[-1])"
FO = Replace(FO, "zzz", LetzteZeile)
.Range("G2:G" & LetzteZeile).FormulaR1C1 = FO
End with
Beim Dummytext "zzz" muss man darauf achten, dass man eine Zeichenfolge verwendet, die ansonsten in der Formel nicht vorkommt, damit man sich diese nicht "versaut". Denkbar wäre auch sowas wie "_letzteZeile_"
Vorteilhaft wird diese Austauschmethode dann, wenn die Formeln länger werden, oder die Variable mehrfach in der Formel auftaucht, oder wenn Texte mit Anführungszeichen in der Formel benötigt werden, dann verliert man schnell die Übersicht wenn man da mit Verketten agiert.
btw ist MaxWenn eine von dir selbst geschriebene Funktion?
meines Wissens nach hat MS diese Funktionalität erst mit Version 2019 eingeführt und dann konsequenterweise auch nur als MaxWenns.
MaxWenn müsste also eine UDF sein, ansonsten müsste sie im Formelstring für R1C1 auch in Englisch als MaxIfs erscheinen.
Gruß Daniel
Anzeige

303 Forumthreads zu ähnlichen Themen

A & Variable in Formel
Klaus

Hallo Forum,
habe grad einen Formel-Syntax-Hänger:
=WENN(Buttons2="Gutscheine";Daten!A70;"")
So weit so gut. Ich möchte jetzt den Bezug zu "Daten!A70" mit der Zelle "GebZaehler"
addieren - also wenn "GebZaehler" =1 dann Bezug = "Daten!A71",
wenn "GebZaehler" =-2 dann Bezug =...
10.11.2008 21:12:00
Thread-ID: 1023343
5 Beiträge
Anzeige
Array als Public Variable definieren...?
Horst

Hey !
Wie kann ich (kann ich überhaupt) ein Array als Public definieren, also als Globale-Variable?
Also so in etwa:
Public meinArray As Array
Dieses möchte ich dann an einer Stelle füllen und an andere Stelle wieder aufrufen...
Gibt Funktionen die ich auf ein Array anwenden...
16.04.2009 08:35:35
Thread-ID: 1068981
2 Beiträge
Variabler Speicherpfad einer Datei - Formelproblem
Susi

Hallo,
ich habe ein Problem für dass ich einfach keine Lösung finden kann.
In einer Datei wird ein Feld mit Daten einer anderen Datei befüllt (per Verknüpfung) z.B. ='D:\[Verknüpfung_Datei.xls]Tabelle1'!A1
So weit so gut. Nun wird die Datei aber zu verschiedenen Nutzern gesendet, di...
22.04.2009 12:12:51
Thread-ID: 1070306
5 Beiträge
Anzeige
Variable in Formel übernehmen
Peter

Hallo zusammen,
vermutlich eine simple Sache, aber ich komme nicht drauf. Das Ende (hier Zeile: 1328) in der Formel ist variabel. Dazu habe ich die Variable a definiert (as long) und übergebe darin jeweils die letzte Zeile. Wie bekomme ich nun die Variable a in die Formel (Syntax). Das Teil...
04.10.2009 18:52:03
Thread-ID: 1107160
4 Beiträge
Formel als Text in Variable schreiben
Frank

Hallo zusammen,
in Zelle A1 habe ich eine einfache Formelverknüpfung in eine andere Datei. Sie sieht so aus:
='\\dfs\es-groups\cor\uhh\blabla\01_Forecast\2009\12_09\[datei.xls]2009'!A1
besteht die Möglichkeit die gesamte Formel (nicht das Ergebnis der Formel) in eine Textvariable zu...
27.11.2009 14:51:54
Thread-ID: 1120544
11 Beiträge
Variabler Bereich in Excel Formeln
valentin

Hallo
ICh hätte ein kleines problem:
ICh würde gerne in VBA die Formel "count if" für einen Bereich einsetzen, welcher von der Anzahl der ausgefüllten Zeilen abhängt... Sprich es sollen immer alle ausgefüllten Zeilen gezählt werden so soll der Bereich bei 5 Zeilen etwa A1:A5 betragen.
05.03.2010 10:40:42
Thread-ID: 1143585
7 Beiträge
VBA Namen definieren mit Variable
Philipp

Hallo,
ich bin seit Stunden dabei einen Dynamischen Datenbereich für eine Pivottabelle zu definieren und komm einfach nicht weiter. Meine bisherigen Lösungsansätze:
Sheets("PRO_Report_alle").Names.Add Name:="ReportBereich", RefersToR1C1:="PRO_Report_alle!" & "A1" & ":" & "...
11.06.2010 20:01:01
Thread-ID: 1161440
7 Beiträge
Wert einer Zelle als Liste definieren
Stu

Hallo alle zusammen,
mir stellt sich ein weiteres Excelproblem:
Ich möchte anhand von Optionsfeldern eine Liste auswählen und diese Liste in einer Combobox darstellen. Nun habe ich aus diesem Forum schon Hilfe für die Zuweisung der Listennamen für die Combobox bekommen. Mein Problem ist...
21.06.2010 11:11:38
Thread-ID: 1163081
5 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
4
3
1
4
2
3
10
6
6
4
6
4
4
9
1
6
5
6
9
2
4
5
11
5
2