Live-Forum - Die aktuellen Beiträge
Datum
Titel
04.05.2024 20:49:40
Listbox - ausgewählte Zeile aus Tabellenblatt markieren
04.05.2024 16:03:54
Problem mit einer Regel bei bedingter Formatierung
04.05.2024 10:29:31
.Find(what:=..., Lookat:=xlWhole, LookIn:=xlValues) ->For
04.05.2024 09:44:33
Bestimmten bereich aus einem String per VBA separieren
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1392to1396
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
1392to1396
1392to1396
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

ArrayFormel via VBA einfügen

ArrayFormel via VBA einfügen
20.11.2014 16:57:21
Chris
Hallo Leute,
ich habe gerade ein Makro aufgezeichnet und würde dieses nun gerne nochmal ausführen. Aber sobald ich das versuche kommt der Fehler: "Die Formel Array Eigenschaft des Range-Objektes kann nicht festgelegt werden."
Waran kann das leigen? Das Makro habe ich doch genau so aufgezeichnet?!
Dh Die Formel funktioniert im Excel genau so...
Hier der Code: 

Sub test6()
' test6 Makro
Range("G24").Select
ActiveCell.FormulaR1C1 = ""
Range("G24").Select
Selection.FormulaArray = _
"=IF(ROW('OpRisk Reference Data'!R[-23]C[-6])>SUM(COUNTIF('OpRisk Reference Data'!C[5],{ _
_
11;12})), """",INDEX('OpRisk Reference Data'!C[-6],SMALL(IF('OpRisk Reference Data'!C[5]={""11"" _
,""12""},ROW('OpRisk Reference Data'!C[-6])), ROW('OpRisk Reference Data'!R[-23]C[-6]))))"
Range("G24").Select
End Sub

Danke schon mal
Chris

15
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
kannst Du die Formel aus der Zelle zeigen? oT.
20.11.2014 17:03:59
Tino

AW: kannst Du die Formel aus der Zelle zeigen? oT.
20.11.2014 17:07:44
Chris
In der Zelle sieht sie so aus...
=WENN(ZEILE('OpRisk Reference Data'!A1)>SUMME(ZÄHLENWENN('OpRisk Reference Data'!L:L;{11;21})); ""; INDEX('OpRisk Reference Data'!A:A;KKLEINSTE(WENN('OpRisk Reference Data'!L:L={"11"."21"}; ZEILE('OpRisk Reference Data'!A:A)); ZEILE('OpRisk Reference Data'!A1))))

String für die Formel zu lang >255 Zeichen
20.11.2014 17:45:37
Tino
Hallo,
habe mal die relativen Bezüge durch absolute ersetzt, dadurch wird er etwas kürzer damit es reicht.
Dim sFormel$

sFormel = _
        "=IF(ROW('OpRisk Reference Data'!R1C1)>SUM(COUNTIF('OpRisk Reference Data'!C[5],{11;21}))," & _
            """"", INDEX('OpRisk Reference Data'!C[-6],SMALL(IF('OpRisk Reference Data'!C[5]={""11"",""21""}," & _
            "ROW('OpRisk Reference Data'!C1)),ROW('OpRisk Reference Data'!R1C1))))"
        
Range("G24").FormulaArray = sFormel
Gruß Tino

Anzeige
AW: String für die Formel zu lang >255 Zeichen
21.11.2014 09:49:42
Daniel
Hi
ein weitere Trick um formeln für die eingabe zu verkürzen ist folgender:
1. Benenne die verwendeten Tabellenblätter um mit kurzen Namen
2. gib die Formel mit den kurzen Namen ein
3. ändere die Namen auf den alten Wert. Excel passt automatisch die verwendeten Formeln an.
Sheets("OpRisk Reference Data").Name = "ORD"
sFormel = "=If(Row(ORD!R1C1)>SUM(CountIf(ORD!C[5],...)"
Range("G24").FormulaArray = sFormel
Sheets("ORD").Name = "OpRisk Reference Data"
Gruß Daniel

AW: String für die Formel zu lang >255 Zeichen
21.11.2014 10:29:34
Beverly
Hi Daniel,
genau das steht schon in meinem Beitrag ;-)

Anzeige
AW: ArrayFormel via VBA einfügen
20.11.2014 18:03:31
Beverly
Hi Chris,
benenne zuerst das Tabellenblatt um, trage dann die Formel ein und benenne es wieder zurück:
With Worksheets("OpRisk Reference Data")
.Name = "OpRisk"
.Range("G24").FormulaArray = "=IF(ROW('OpRisk'!A1)>SUM(COUNTIF('OpRisk'!L:L,{11;21})),""""," _
& _
"INDEX('OpRisk'!A:A,SMALL(IF('OpRisk'!L:L={""11"",""21""}, ROW('OpRisk'!A:A))," & _
"ROW('OpRisk'!A1))))"
.Name = "OpRisk Reference Data"
End With

gute Idee den Tabellennamen zu kürzen oT.
20.11.2014 18:50:17
Tino

AW: gute Idee den Tabellennamen zu kürzen oT.
20.11.2014 18:55:14
Chris
Hallo ihr beiden,
danke für euren Hinweis auf die zu lange Formel. Das ist ja sau bescheuert, dass Excel das nicht packt :(
Die Option mit den absoluten Zellbezügen war bei mir nicht möglich, da ich danach noch mit Autofill weitermachen will.
Das mit dem umbenennen ist wirklich eine gute Idee, wusste gar nicht, dass das auch so einfach geht in VBA. Da ich aber noch viele dieser Formeln habe, meine ich dass darunter die Performance sehr leiden wird. Daher habe ich mein Tabellenblatt einfach in RefData umbennant. Das tuts auch :)
Nochmal vielen Dank
Man lernt hier wirklich jede MINUTE was Neues!!!

Anzeige
AW: gute Idee den Tabellennamen zu kürzen oT.
20.11.2014 18:55:17
Chris
Hallo ihr beiden,
danke für euren Hinweis auf die zu lange Formel. Das ist ja sau bescheuert, dass Excel das nicht packt :(
Die Option mit den absoluten Zellbezügen war bei mir nicht möglich, da ich danach noch mit Autofill weitermachen will.
Das mit dem umbenennen ist wirklich eine gute Idee, wusste gar nicht, dass das auch so einfach geht in VBA. Da ich aber noch viele dieser Formeln habe, meine ich dass darunter die Performance sehr leiden wird. Daher habe ich mein Tabellenblatt einfach in RefData umbennant. Das tuts auch :)
Nochmal vielen Dank
Man lernt hier wirklich jede MINUTE was Neues!!!

Anzeige
AW: Noch ein Trick für lange Formeln
21.11.2014 14:26:12
Daniel
Es gib noch eine Möglichkeit, überlange Formeln per VBA nach Excel zu schreiben:
1. Schreibe die Formel als normalen Text in die Zelle, das ist der Fall, wenn der übertragene Wert nicht mit "=" beginnt.
Als Text kannst du wesentlich längere Inhalte in die Zelle schreiben als als Formel: 
Range("A1").Value = "xxx=Hier dann die weiter Formel"
2. Ersetze per .Replace das "xxx" durch nichts.
das Ersetzen ist für Excel wie eine Neueingabe, dh es prüft, was da eingeben wurde und erkennt an dem "=" am Anfang, dass es ein Formel sein soll und behandelt die Eingabe entsprechend.
Da jetzt Excel diese Umwandlung in eine Formel macht, gilt die knappe Beschränkung für die Länge von Formeln beim Übertrag von VBA nach Excel nicht, sodern nur das normale Excellimit, welches wesentlich grösser ist.
Damit die Umwandlung in eine Formel funktioniert, musst du für den Text die .Formula-Schreibweise verwenden (A1-Bezüge, englische Schreibweise)
Klappt zumindest für normale Formeln, mit Matrixformeln so direkt nicht.
Gruß Daniel

Anzeige
Bei MatrixFormeln könnte man sich mit ...
21.11.2014 19:06:37
Luc:-?
…dieser Methode behelfen: 
Sub MxFmlText()
With ActiveWindow.RangeSelection.Cells(1)
.Value = "=" & .Value
End With
SendKeys "^,^+~"
End Sub
Gruß, Luc :-?
Besser informiert mit …

fehlt da nicht noch Select auf die Formelzelle? oT
21.11.2014 19:21:02
Tino

Ja, aber auf alle für die MxFml vorgesehenen ...
21.11.2014 19:42:45
Luc:-?
…Zellen, Tino;
die hatte ich beim Test manuell ausgewählt. Da hier ja auch das Eintragen des FmlTextes (und die anschld Erweiterung auf den vorgesehenen MxFmlBereich) fehlt, bin ich offensichtlich davon ausgegangen, dass das das HptPgm erledigt, in dem dann in diesem Fall die dafür relevanten CodeZeilen nur ergänzt wdn müssten…
Gruß, Luc :-?

Anzeige
ist ja nur wenn einer diesen Beitrag ließt...
21.11.2014 19:48:53
Tino
Hallo,
würde dieser Vorschlag ohne select nicht funzen.
Gruß Tino

Richtig! Ist so vollständiger... ;-) owT
21.11.2014 20:50:33
Luc:-?
:-?

305 Forumthreads zu ähnlichen Themen

7 a in eine Zelle schreiben
Kai

Hallo zusammen,
wie bekomme ich es hin, in eine Zelle "7 a" (7 Leerzeichen a) zu schreiben? Excel macht mir dann immer 7:00 AM daraus oder 0,29...
Danke
07.08.2008 16:45:31
Thread-ID: 1000024
6 Beiträge
Anzeige
Userform Textboxinhalte in Zellen schreiben
Gerd

Guten Tag zusammen!
Bitte helft mir bei folgendem Problem:
In einer Userform habe ich eine ganze Reihe Textboxen, in die zum größten Teil Zahlen eingegeben werden.
Nun ist ja bekannt, dass beim Schreiben in Zellen der Inhalt der Textboxen als Text interpretiert wird. Mit der Anweisu...
11.08.2008 14:34:08
Thread-ID: 1000867
5 Beiträge
VBA-Formel um nur Berechnungswerte einzutragen
Matthias

Hallo Excel und Makrofans.
Ich habe folgende 2 Probleme. Erstmal zum ersten Problem:
Ich habe eine Datei in der ich Daten (Betriebsparameter [Druck, Temperatur usw.]) aus einem externen Programm einlese. Aus diesen Werten möchte ich gerne einige Werte Berechnen.
Zur Zeit mache ich d...
12.08.2008 08:51:00
Thread-ID: 1001053
6 Beiträge
Anzeige
VBA Formel finden
Baywatch

Hi,
ich brauche etwas hilfe, mit einer VBA programmierung, vielleicht hat jemand ein paar MInuten Zeit.
Ich habe eine Tabelle 1 in der eine eingabe passiert und eine TAbelle 2 sollen die Einträge aus TAbelle 1 hinkopiert werden und erst nach Spalte G dann nach B und dann nach A sortiert...
25.08.2008 08:47:34
Thread-ID: 1004371
7 Beiträge
Mit VBA In Zelle Excelformel schreiben
Gho-Reg

Hi Leute
Ich habe hier diesen netten VBA Code geschrieben und leider wie solls auch anders sein kommt dauernd eine Fehlermeldung :)
CODE:
rowbeforeinteger = 2
Dim text As String
text = "=IF(" & epsoldcolumn & rowbeforeinteger & "=""x"";1;0)+IF(" & emailsoldco...
25.08.2008 11:08:33
Thread-ID: 1004403
6 Beiträge
Makrostart wenn in Zelle was geschrieben wird
Bernd

Hallo,
wie stelle ich es an, damit ein Makro startet, sobald ich in einer bestimmten Zelle etwas schreibe?
Mein Code will irgendwie nicht so wie ich will. Der läuft ohne nonstop.
Private Sub Worksheet_SelectionChange(ByVal Target As Range) If Range("D3") "" Then Call tabelle_kopi...
31.08.2008 11:09:00
Thread-ID: 1006152
2 Beiträge
Matrix-formel via VB-Skript in die Zelle einfügen
Wladimir

Hallo zusammen,
ich soll via VB-Skript eine
Excel-Matrix-formel in die Zelle der
geschlossenen Datei einfügen.
Ich habe die Formel entsprechend
angepasst und versuchte sie mit
FormulaArray in die Zelle einzufügen,
aber erfolglos. Es kommt die Meldung:
"Die For...
01.09.2008 12:08:24
Thread-ID: 1006391
14 Beiträge
Formel immer nur in bestimmter Zelle
Katrin

Hallo Zusammen!
Folgendes Problem würde ich gerne lösen, weiß aber nicht wie :)
Ich habe in Spalte A in jeder Zeile Uhrzeiten stehen:
00:15:00
00:30:00
00:45:00
01:00:00
01:15:00
01:30:00
01:45:00
02:00:00
02:15:00
02:30:00
02:45:00
...
02.09.2008 10:30:00
Thread-ID: 1006672
3 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
5
2
4
5
16
6
5
1
13
2
3
4
3
2
8
5
4
30
3
8
11
10
12
5
4