FormulaLocal

Ich benötige wieder einmal eure Hilfe!
Da ich über die, von mir im WEB gefundenen VBA Formeln leider immer ein falsches Ergebnis bekomme,

letztezeile = ActiveSheet.Cells(1048576, 4).End(xlUp).Row 'Ab Excel 2007

oder

letztezeile = ActiveSheet.Cells(Rows.Count, 4).End(xlUp).Row

habe ich mal versucht das Problem über eine Formel in der besagten Zelle zu lösen. Ja hier bekam ich das richtige Ergebnis!

=AGGREGAT(14;4;(D:D"")*ZEILE(D:D);1)

Sagte mir dann, dann schreibe ich mit VBA diese Formel über FormulaLocal eben nach T1 und lese das Ergebnis dann von dort aus.

Range("T1").FormulaLocal = "=AGGREGAT(14;4;(D:D"")*ZEILE(D:D);1)"

Funktioniert mir aber leider nicht der Eintrag und komme aber auch nicht drauf wieso und kann auch leider nicht sagen was der Laufzeitfehler'1004' bedeutet und aussagt?
Die Abfragen "letztezeile" zeigen immer um zwei Zeilen zu viel an, siehe dazu bitte die Bilder, hoffe es stört sich nicht wieder gleich wer daran!
Gruß Siegfried
Userbild

Beiträge zum Forumthread

Beiträge zu diesem Forumthread

Betreff

Datum

Anwender

Public Function FindeInD() As Long On Error Resume Next 'weil der Find könnte Nothing zurückgeeb, worauf ".Row" ein Fehler erzeugt FindeInD = Range("D:D").Find(what:="*", LookIn:=xlValues, searchdirection:=xlPrevious).Row End Function

…spreche bspw ich nie, Yal,
denn ein jedes Huhn ist intelligenter als eine Tabelle, die höchstens intelligent gemacht sein kann. Ich verwende stattdessen den Begriff definierte Tabelle, denn der trifft es eher.
Mit einer UDF ist es ähnlich. Zwar sind alle selbstgeschriebenen Fktt in VBA quasi user defined, aber in VBA sind sie einfach nur Fktsprozeduren (function procedures), die formal den eigentlichen VBA-Fktt gleichgestellt sind und bei Standort in einem allgemeinen Modul (~.bas) genausowenig per 2.Parameter der vbMethode CallByName erreicht wdn können wie Letztere, da dafür so das als 1.Parameter benötigte Objekt fehlt (bei Standort in einem KlassenModul ist diese Objekt für eine UDF aber idR vorhanden!). Der Terminus u.d.f. bezieht sich folglich nur auf die Anwendung in einer Xl-Zell-Fml und ist dort den Xl-Standard Fktt gleichgestellt. Dass dabei schon ein einziger argumentierter Fktsaufruf eine Fml bilden kann, ist unbestritten und gilt sowohl für UDFs als auch Standard-Fktt. Genauso gilt aber auch, dass man beide Fktsarten mit anderen Fktt, Standard u/o UDF, in einer Fml kombinieren kann, was bei mir oft die Regel ist, denn ich schreibe UDFs in Ergänzung des Xl-Standard-Fktsinventars. Auch deshalb halte ich es für unangebracht, nicht sauber zwischen Fktt und Fmln unterscheiden zu wollen, denn das fördert nur eine Begriffsverwirrnis, die bei Xl- und VBA-Anfängern ohnehin schon vorhanden sein wird bzw kann.
Eigene Fktt, die primär für den VBA-Einsatz als Hilfsfktt gedacht sind, würde ich deshalb auch nicht als UDFs bezeichnen. Oft sind sie auch nicht universell genug, im Sinne von mit allen möglichen EinsatzSituationen zurecht (zu) kommen, um für mehr als einen (sehr) speziellen Zweck verwendbar zu sein. So etwas sollte man dann aber auch nicht für den Einsatz in ZellFmln anbieten, denn das passt nicht zum Gros der Xl-Standard-Fktt und damit den Intentionen der ursprünglichen Xl-Macher.
Luc :-?

Beliebteste Forumthreads (12 Monate)

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

Beliebteste Forumthreads (12 Monate)

Beliebteste Forumthreads (12 Monate)

15
Beiträge zum Forumthread

Beiträge zu diesem Forumthread