Live-Forum - Die aktuellen Beiträge
Datum
Titel
04.11.2025 16:13:59
AddIn erstellen und mit Passwort schützen
04.11.2025 15:31:37
Die Summendifferenz zwischen 01.01. und heute berechnen
04.11.2025 13:05:47
Frage Bed.Format mit Reihenfolge
04.11.2025 11:17:34
Datumsberechnung Konfirmation
Keine passende Antwort im Forumarchiv gefunden?
Stelle deine Frage im Live-Forum
Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
764to768
764to768
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Funktion in einer Zelle aufrufen

Forumthread: Funktion in einer Zelle aufrufen

Funktion in einer Zelle aufrufen
26.05.2006 14:14:42
Stephan
Hallo,
besteht in Excel die Möglichkeit eine Funktion / ein Makro, das in VBA geschrieben ist nur für die Zelle ausführen zu lassen?
Es geht um folgendes:
Ich habe ein Datei TestD mit der Tabelle Versuch. In dieser muss in Zelle B1 die Funktion ausgelöst werden, der Vergleicht ob der Wert in A1 gleich dem ist in der Zelle T5 im Blatt Liste aus der Datei Angaben.
Gruß
Anzeige

10
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Funktion in einer Zelle aufrufen
26.05.2006 15:01:25
EtoPHG
Hallo Stephan,
3. Möglichkeiten:
Eine Funktion kannst Du so schreiben, dass sie mit dem Gleichheitszeichen in die Zelle geschrieben wird =DeineFunktion(Parameter1, [Parameter2]...).
Du musst sie nur Public in einem Modul beschreiben.
Ein Makro muss immer von extern (z.B. Button_click, Picture_click oder Excel (Alt-F8)) ausgelöst werden.
In beiden Fällen musst Du prüfen ob Deine Zelle angesprochen ist, wenn die Einschränkung auf Deine Zelle zutrifft, also etwa:
If Sheet("TestD").Activecell.Address "$B$1" then exit sub
3. Möglichkeit in das Tabellenereignis:

Private Sub Worksheet_SelectionChange(ByVal Target As Range)
If Target.Row = 1 And Target.Column = 2 Then
'DeinCode...
End If
End Sub

Gruss Hansueli
Anzeige
AW: Funktion in einer Zelle aufrufen
26.05.2006 15:43:13
Stephan
Danke Hansueli für die Info.
Wie du auf dem Bild sehen kannst, geht es um sehr viele Zelle:
http://img154.imageshack.us/my.php?image=pfadformel5b9li.jpg
Dort wo momentan der Curser ist, dort würde das hineinkommen und in die nächsten 52 Zeilen, bzw 20 Spalten.
Dann müsste ich im VBA für jede einzelne Zelle das
If Sheet("TestD").Activecell.Address "$B$1" then exit sub
hineinschreiben.
Das mit dem Tabellenereignis, habe ich nciht ganz verstanden. Wird das automatisch ausgeführt, oder muss dazu auch hineingeklickt werden? Was für eine andere Möglichkeit gebe es, damit ich ein Ereignis automatisch ausgeführt wird? Oder ist das nur über WorkbookOpen() möglich?
Gruß
Anzeige
AW: Funktion in einer Zelle aufrufen
26.05.2006 15:43:24
Stephan
Danke Hansueli für die Info.
Wie du auf dem Bild sehen kannst, geht es um sehr viele Zelle:
http://img154.imageshack.us/my.php?image=pfadformel5b9li.jpg
Dort wo momentan der Curser ist, dort würde das hineinkommen und in die nächsten 52 Zeilen, bzw 20 Spalten.
Dann müsste ich im VBA für jede einzelne Zelle das
If Sheet("TestD").Activecell.Address "$B$1" then exit sub
hineinschreiben.
Das mit dem Tabellenereignis, habe ich nciht ganz verstanden. Wird das automatisch ausgeführt, oder muss dazu auch hineingeklickt werden? Was für eine andere Möglichkeit gebe es, damit ich ein Ereignis automatisch ausgeführt wird? Oder ist das nur über WorkbookOpen() möglich?
Gruß
Anzeige
AW: Funktion in einer Zelle aufrufen
26.05.2006 15:43:39
Stephan
Danke Hansueli für die Info.
Wie du auf dem Bild sehen kannst, geht es um sehr viele Zelle:
http://img154.imageshack.us/my.php?image=pfadformel5b9li.jpg
Dort wo momentan der Curser ist, dort würde das hineinkommen und in die nächsten 52 Zeilen, bzw 20 Spalten.
Dann müsste ich im VBA für jede einzelne Zelle das
If Sheet("TestD").Activecell.Address "$B$1" then exit sub
hineinschreiben.
Das mit dem Tabellenereignis, habe ich nciht ganz verstanden. Wird das automatisch ausgeführt, oder muss dazu auch hineingeklickt werden? Was für eine andere Möglichkeit gebe es, damit ich ein Ereignis automatisch ausgeführt wird? Oder ist das nur über WorkbookOpen() möglich?
Gruß
Anzeige
AW: Funktion in einer Zelle aufrufen
26.05.2006 15:43:58
Stephan
Danke Hansueli für die Info.
Wie du auf dem Bild sehen kannst, geht es um sehr viele Zelle:
http://img154.imageshack.us/my.php?image=pfadformel5b9li.jpg
Dort wo momentan der Curser ist, dort würde das hineinkommen und in die nächsten 52 Zeilen, bzw 20 Spalten.
Dann müsste ich im VBA für jede einzelne Zelle das
If Sheet("TestD").Activecell.Address "$B$1" then exit sub
hineinschreiben.
Das mit dem Tabellenereignis, habe ich nciht ganz verstanden. Wird das automatisch ausgeführt, oder muss dazu auch hineingeklickt werden? Was für eine andere Möglichkeit gebe es, damit ich ein Ereignis automatisch ausgeführt wird? Oder ist das nur über WorkbookOpen() möglich?
Gruß
Anzeige
AW: Funktion in einer Zelle aufrufen
26.05.2006 17:19:17
EtoPHG
Hallo Stephan,
Dort wo momentan der Curser ist, dort würde das hineinkommen...
Was würdest Du denn dort reinschreiben ?
Das Ereignis Worksheet_SelectionChange wird jedesmal ausgeführt, wenn die aktive Zelle (cursor) in einem Tabellenblatt wechselt. Target enthält dabei die Angabe über die aktive Zelle (Range-Selection), d.h. damit kannst Du prüfen wo der Cursor ist.
Im Beispiel von oben:
.Row =1 (Zeile 1), .Column = 2 heisst Spalte 2 (also B1).
Wenn Du mehr Angaben, was Deine Funktion oder Dein Makro denn genau macht, oder machen soll wäre die Hilfe vielleicht einfacher.
Gruss Hansueli
Anzeige
AW: Funktion in einer Zelle aufrufen
26.05.2006 17:20:31
EtoPHG
Hallo Stephan,
Dort wo momentan der Curser ist, dort würde das hineinkommen...
Was würdest Du denn dort reinschreiben ?
Das Ereignis Worksheet_SelectionChange wird jedesmal ausgeführt, wenn die aktive Zelle (cursor) in einem Tabellenblatt wechselt. Target enthält dabei die Angabe über die aktive Zelle (Range-Selection), d.h. damit kannst Du prüfen wo der Cursor ist.
Im Beispiel von oben:
.Row =1 (Zeile 1), .Column = 2 heisst Spalte 2 (also B1).
Wenn Du mehr Angaben, was Deine Funktion oder Dein Makro denn genau macht, oder machen soll wäre die Hilfe vielleicht einfacher.
Übrigens kannst Du Dateien auch hier ins Forum laden: Services-Upload oder hier
https://www.herber.de/forum/file_upload.html
Gruss Hansueli
Anzeige
AW: Funktion in einer Zelle aufrufen
26.05.2006 17:57:44
Stephan
Also, dann eine Erklärung für die Aufgabe.
Ich möchte in dieser Datei http://mach-stg.beeven.de/download/zeit_ist_soll.xls , in Zelle K9 eine Funktion einbauen, die so aussieht, wie die momentane Wenn-Formel, d.h. es wird aus der Tabelle Dateiliste der Pfad zusammengesetzt und es soll der Inhalt von der Vorlage!S5 mit dem Januar 2006!S4 verglichen werden. Falls die Beiden übereinstimmen, dann soll die Summe aus dem Bereich S8-S10 zusammengezählt werden und übertragen werden.
https://www.herber.de/bbs/user/33926.xls
Gruß
PS: Wie kann man einen Beitrag editieren / löschen?
Anzeige
AW: Funktion in einer Zelle aufrufen
27.05.2006 12:05:36
Herbert
"PS: Wie kann man einen Beitrag editieren / löschen?"
Gar nicht! Wie wärs, wenn du dich zunächst mal mit den Forumregeln vertraut machst?
mfg Herbert
;

Forumthreads zu verwandten Themen

Public Function mit Call aufrufen möglich?!
Lutz

Hallo zusammen,
habe mal eine kurze Frage: Kann meine eine Funktion (Public Function) in einem Sub mittels "Call" aufrufen? Also so wie man sonst eine Sub aufruft (Call XY())?
Über eine kurze Antwort würde ich mich sehr freuen!
Vielen Dank!
Gruß
Lutz
04.10.2012 16:44:35
Thread-ID: 1280576
5 Beiträge
VBA-Funktionen aus Sheet aufrufen (Matrix als Arg)
Maxi Allwein

11.07.2002 10:57:33
Thread-ID: 135682
4 Beiträge
VBA - Funktion in Zelle schreiben
J.

Hallo Forumsteilnehmer,
zunächst ein großes Lob für die super Excel-Hilfeseite. Ich bin m.E. grundsätzlich relativ fit in Excel, jedoch noch Einsteiger in VBA-Programmierung und konnte mir über die Recherche auf dieser Seite schon einige Arbeit durch Makros ersparen, die ich bisher durch "m...
20.02.2016 15:20:52
Thread-ID: 1476890
5 Beiträge
[VBA] Eigene Funktion auch ohne Argument zulassen
Nils

Hallo,
ich habe eine eigene Funktion gebastelt:
wie fange ich das fehlen eines Arguments ab? Ich möchte das auch gerne zulassen? Public Function BLATTNAME(Nummer As Integer) As String ' Neuberechnungen aktivieren mit Application.Volatile Application.Volatile If Nummer ActiveWorkbook.W...
29.03.2017 20:15:30
Thread-ID: 1550188
5 Beiträge
VBA-Typenkonflikt bei Public Function
Tom

Hallo zusammen,
im Zuge einer Studienarbeit muss ich ein paar VBA-Zeilen programmieren.
Grundlage ist die Berechnung verschiedener Zustandsgrößen in Unterscheidung verschiedener Temperatur und Druckbereiche durch verschiedene Formeln.
Dazu habe ich eine einfache aufrufbare Funktion...
14.11.2017 08:35:59
Thread-ID: 1591235
6 Beiträge
VBA-in Range suche, eigene Funktion
Herrmann

Hallo liebes Forum,
anbei eine Datei mit einem Versuch eine VBA-Funktion zu schreiben.
Dabei werden 2 Ranges definiert, einmal Spalte B und einmal Spalte C in Tabelle 2.
Die Funktion soll sein: =TBNr(Ort,Nr)
eingegeben werden hier als Bedingungen Werte aus Spalte A und B in Tabe...
22.01.2018 16:02:17
Thread-ID: 1603882
4 Beiträge
vba-funktion in excel aufrufen
Maximilian
hi,
möchte in meinem excel-projekt eine Function einbauen, welche beim überschreiten eines gewissen zeitpunktes ausgeführt wird und eine mail verschickt. die ganze sache läuft ohne probleme, aber seltsamerweise nur, wenn ich die Function mit F8 durchlaufe (schritt für schritt). wenn die Fu...
05.08.2003 13:39:25
Thread-ID: 289954
7 Beiträge
per VBA die Funktion Summe in Zelle eintragen
Claudia

Hallo,
ich bräuchte bitte dringend Hilfe:
Ich habe in einer Tabelle für jeden Monat eine Spalte (A bis L) und frage per Inputbox eine Monatszahl ab, bis der ich in Spalte M die Summe der Monate haben will.
Beispiel: Ich gebe die Zahl 11 (für November) ein, dann soll in M2 die Formel...
09.12.2004 17:20:04
Thread-ID: 530703
3 Beiträge
Anzeige
Mit vba Funktionen in Excel Zellen
Squooshie

Hallo
Ich habe folgendes Problem:
Ich möchte in ein Tabellenblatt mittels vba eine summewenn Funktion in eine bestimmte Zelle einfügen.
Wie mache ich das am besten?
Meine bisherigen Versuche mit
cell(x,x).value = "=summewenn(...)"
haben nichts gebracht.
Wenn ich das...
06.08.2008 12:06:53
Thread-ID: 999474
4 Beiträge
VBA Funktion nur aufrufen wenn vorhanden
W

Hallo Forum,
ich bastle gerade an einer neuen Funktion, welche ggf. eine weitere Funktion aufrufen soll. Das soll aber nur geschehen, wenn diese Funktion auch Bestandteil meiner Mappe ist.
Gibt es auch eine Lösung für Variablen? Wie kann ich prüfen, ob eine Variable vorhanden ist, ohne...
13.04.2020 10:41:41
Thread-ID: 1752183
25 Beiträge
VBA eigene Funktion im code verwenden
David

Hallo zusammen,
folgende Aufgabenstellung: ich soll in einer Matrix in der ersten Spalte Aktienkurse angeben, in der zweiten die Tagesrendite. Dies soll über eine Funktion geschehen die ich ausgelagert habe.
Mein Ansatz bisher (Funktion stimmt aufjedenfall)
Option Explicit
'Fu...
30.11.2020 11:23:24
Thread-ID: 1796432
11 Beiträge
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken
Anzeige
Anzeige

Infobox / Tutorial

Funktion in einer Zelle aufrufen

Schritt-für-Schritt-Anleitung

Um eine Excel VBA Funktion in einer Zelle aufzurufen, kannst Du folgende Schritte befolgen:

  1. Öffne den VBA-Editor (drücke ALT + F11).
  2. Füge ein neues Modul hinzu: Rechtsklicke im Projektfenster auf „VBAProject (DeinWorkbook)“ > „Einfügen“ > „Modul“.
  3. Schreibe Deine Funktion. Stelle sicher, dass die Funktion als Public deklariert ist, damit sie in Excel aufgerufen werden kann: 
    Public Function DeineFunktion(Parameter1 As Double, Optional Parameter2 As Double) As Double
   DeineFunktion = Parameter1 + Parameter2 ' Beispiel: Summiert zwei Werte
End Function
  4. Schließe den VBA-Editor und kehre zu Excel zurück.
  5. Gib in die Zelle B1 folgende Formel ein: 
    =DeineFunktion(A1, 10) ' Beispiel: Ruft die Funktion mit A1 und 10 als Parameter auf

Häufige Fehler und Lösungen

  • Fehler: #NAME?
    Dieser Fehler tritt auf, wenn die Funktion nicht gefunden wird. Stelle sicher, dass die Funktion als Public deklariert ist und der Name korrekt geschrieben wurde.

  • Fehler: Ungültiger Parameter
    Überprüfe die Datentypen der Parameter in Deiner Funktion. Wenn Du beispielsweise einen String übergibst, die Funktion aber einen Double erwartet, wird ein Fehler angezeigt.

Alternative Methoden

  1. Verwendung von Worksheet-Events: Du kannst das Worksheet_SelectionChange-Ereignis verwenden, um eine Funktion automatisch auszuführen, wenn die aktive Zelle gewechselt wird: 
    Private Sub Worksheet_SelectionChange(ByVal Target As Range)
   If Target.Address = "$B$1" Then
       Call DeineFunktion(Target.Offset(0, -1).Value) ' Beispiel: Aufruf der Funktion mit Wert von A1
   End If
End Sub
  2. Makros für Batch-Verarbeitung: Erstelle ein Makro, das mehrere Zellen gleichzeitig verarbeitet und die Funktion aufruft. Dies ist besonders nützlich, wenn Du viele Zellen in einem Bereich hast.

Praktische Beispiele

Hier sind einige praktische Beispiele, wie Du eine Excel Funktion ausführen kannst:

  1. Einfacher Vergleich:

    Public Function Vergleich(A As Variant, B As Variant) As String
   If A = B Then
       Vergleich = "Gleich"
   Else
       Vergleich = "Ungleich"
   End If
End Function

    In Zelle B1 kannst Du dann =Vergleich(A1, T5) nutzen.

  2. Summenfunktion:

    Public Function SummeBerechnen(StartZelle As Range, EndZelle As Range) As Double
   Dim Summe As Double
   Dim Zelle As Range
   For Each Zelle In Range(StartZelle, EndZelle)
       Summe = Summe + Zelle.Value
   Next Zelle
   SummeBerechnen = Summe
End Function

    Dies kannst Du in B1 verwenden, um die Summe eines bestimmten Bereichs zu berechnen: =SummeBerechnen(A1, A10).

Tipps für Profis

  • Verwende Option Explicit: Füge Option Explicit am Anfang Deines Moduls hinzu, um sicherzustellen, dass alle Variablen deklariert werden. Dies hilft, Fehler zu vermeiden.
  • Debugging: Nutze die Debugging-Tools im VBA-Editor (z.B. Haltepunkte setzen), um Deine Funktionen zu testen und Fehler zu finden.
  • Code-Kommentare: Kommentiere Deinen Code ausreichend, um die Lesbarkeit und Wartbarkeit zu erhöhen.

FAQ: Häufige Fragen

1. Wie kann ich eine Excel VBA Funktion aufrufen, die kein Ergebnis zurückgibt?
Du kannst eine Subroutine (Sub) anstelle einer Funktion verwenden und diese einfach über einen Button oder ein Ereignis auslösen.

2. Gibt es Einschränkungen bei der Verwendung von VBA-Funktionen in Excel?
Ja, VBA-Funktionen können nicht in Array-Formeln verwendet werden und müssen in einem Modul als Public definiert sein, um in Excel aufgerufen zu werden.

3. Wie kann ich eine eigene Funktion in Excel nutzen?
Stelle sicher, dass die Funktion im VBA-Editor korrekt deklariert ist und rufe sie in einer Zelle mit der Formel-Syntax auf, z.B. =DeineFunktion(Parameter).

Beliebteste Forumthreads (12 Monate)

Jetzt das Excel-Portal bewerten: Deine Stimme zählt!
Anzeige
Anzeige
Entdecke mehr
Finde genau, was du suchst

Die erweiterte Suchfunktion hilft dir, gezielt die besten Antworten zu finden

Suche nach den besten Antworten
Unsere beliebtesten Threads

Entdecke unsere meistgeklickten Beiträge in der Google Suche

Top 100 Threads jetzt ansehen
Anzeige