Live-Forum - Die aktuellen Beiträge
Datum
Titel
24.10.2025 09:22:50
Filter aktualisieren bei Blattaufruf
24.10.2025 09:06:52
Zählenwenn
23.10.2025 22:02:44
Warum NV bei meiner Rang Formel?
23.10.2025 20:59:30
Buchstaben aus Zelle auftrennen
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
564to568
564to568
Aktuelles Verzeichnis
Verzeichnis Übersicht
Verzeichnis Übersicht
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

Sub FlächeBerechnen(Länge, Breite)-VBA hilfe

Forumthread: Sub FlächeBerechnen(Länge, Breite)-VBA hilfe

Sub FlächeBerechnen(Länge, Breite)-VBA hilfe
10.02.2005 08:43:30
roland_k
hoi guten morgen .....
mit dem basiswissen habe noch probleme ....in der vba hilfe habe unter 

Sub begriff folgendes beispiel:


Sub FlächeBerechnen(Länge, Breite)
Dim Fläche As Double    ' Lokale Variable deklarieren.
If Länge = 0 Or Breite = 0 Then
' Wenn ein Argument = 0,
Exit 


Sub    ' dann 


Sub unmittelbar
' verlassen.
End If
Fläche = Länge * Breite    ' Rechteckfläche berechnen.
Debug.Print Fläche    ' Fläche im Testfenster
' ausgeben.
End Sub



in der klammer in der ersten zeile steht (Länge, Breite)

ich kenne bisher nur 


Sub FlächeBerechnen()
ich habe den code im vba editor in ein tabellenblatt eingefuegt  dann versuche ich das ding laufen lassen ueber einen commandbutton ,,,, nix geht
blicks nicht wie das zusammenspielt  vor allem woher der länge und breitee nimmt
koennte mir jemand das beispiel umsetzten so dass ich das verfolgen kann
danke für eure muehe ,,,
gruss roland
PS: ich weiss ist grundwissen aber genau da haperts  mangels didaktisch guter anleitung
Anzeige

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

Betreff
Datum
Anwender
Anzeige
AW: Sub FlächeBerechnen(Länge, Breite)-VBA hilfe
Jan
Hi roland_k,
Wenn Du statt "Sub" "Function" setzt, hast Du eine benutzerdefinierte Funktion zur Flächenberechnung. Diese kannst Du in Deinem Tabellenblatt über den Funktionsassistenten aufrufen und die Parameter "Länge" und "Breite" eingeben.
Jan
nix umbauen genau wie in hilfe steht :-))
10.02.2005 09:21:42
roland_k
hi jan...danke fuer die antwort
bitte das beispiel ...will ich wissen ,,,,genau so wie es da steht anwenden
nicht umbauen ,...oder abers gestalten (funktionsassistent )?
ich will das im kern kapieren ....es kann ja nicht sein dass ein beispiel aus der hilfe nicht nachvolziehbar nachgestellt werden kann
ev wäre ein beispiel in ner mappe hilfreich dass ich die anweisungen verfolgen kann
ich will ja nicht wissen ob was geht sonder wie ....und warum
danke
gruss roland
Anzeige
AW: Sub FlächeBerechnen(Länge, Breite)-VBA hilfe
10.02.2005 09:15:50
Josef
Hallo Roland!
"Länge" bzw. "Breite" sind Parameter die der Prozedur übergeben werden müssen!
Beispiel:

Sub FlächeBerechnen(Länge, Breite)
Dim Fläche As Double    ' Lokale Variable deklarieren.
If Länge = 0 Or Breite = 0 Then
' Wenn ein Argument = 0,
Exit Sub    ' dann Sub unmittelbar
' verlassen.
End If
Fläche = Länge * Breite    ' Rechteckfläche berechnen.
MsgBox Fläche    ' Fläche im Testfenster
' ausgeben.
End Sub
Sub test()
FlächeBerechnen 25, 10  'Sub "FlächeBerechnen mit den Parametern
'Länge=25 und Breite=10 aufrufen
End Sub

Gruß Sepp
P.S.: Rückmeldung nicht vergessen!
Anzeige
geht aber nix kapiert ...kann variable A1 zb sein
10.02.2005 09:43:55
roland_k
hi sepp danke
das funkts aber wie kann das z b einsetzen ...die variablen muss der docvh irgendwo variabel holen koennen...
na ja ...schalfe mal drueber ...
ichmach gleich eine tread an der geschihte studiere jetzt tage rum ...komme nicht dahinter
____________________________________________________________________________________
ich habe bei einem commandbutton (start)
eine sub platz1..........(berechnet was)
im code im commandbutton steht zb b
if checkbox1 = true then platz1
das das aber sehr lang wird bzw ist ....will ich den code in platz1 in ein modul stecken
aber nun habe das problem dass ich das ding nicht ansprechen kann aus dem code in commandbutton1
option explicit private ,,,? mach ich da was falsch
danke roland _k
hm sollte ich neuen beitrag schreibe ?
Anzeige
AW: geht aber nix kapiert ...kann variable A1 zb s
10.02.2005 09:47:13
Josef
Hallo Roland!
Natürlich können die übergebenen Werte auch variablen sein!

Sub test()
FlächeBerechnen Range("A1"), Range("B1")
End Sub

Gruß Sepp
P.S.: Rückmeldung nicht vergessen!
danke sepp bin eben svb .....habs verstanden
10.02.2005 10:11:01
roland
danke sepp
wegen dem modulgeschichte probiere ich mal noch rum ....
schoenen tag
gruesse v schweizer grenze
Anzeige
;
Anzeige

Infobox / Tutorial

Flächenberechnung in Excel mit VBA

Schritt-für-Schritt-Anleitung

  1. Öffne den VBA-Editor: Drücke ALT + F11, um den VBA-Editor in Excel zu öffnen.

  2. Einfügen eines Moduls: Klicke im Menü auf Einfügen und wähle Modul, um ein neues Modul zu erstellen.

  3. Code einfügen: Füge den folgenden Code ein, um die Funktion zur Flächenberechnung zu erstellen:

    Sub FlächeBerechnen(Länge As Double, Breite As Double)
    Dim Fläche As Double    ' Lokale Variable deklarieren.
    If Länge = 0 Or Breite = 0 Then
        Exit Sub            ' Wenn ein Argument = 0, dann Sub verlassen.
    End If
    Fläche = Länge * Breite ' Rechteckfläche berechnen.
    MsgBox Fläche           ' Fläche im Testfenster ausgeben.
End Sub

  4. Zusätzliche Testprozedur: Erstelle eine Testprozedur, um die Funktion aufzurufen:

    Sub test()
    FlächeBerechnen 25, 10  ' Beispiel mit Länge=25 und Breite=10
End Sub

  5. Makro ausführen: Führe die test-Sub aus, um die berechnete Fläche zu sehen.

Häufige Fehler und Lösungen

  • Fehler: "Sub oder Function nicht gefunden"
    Lösung: Stelle sicher, dass der Name der Sub korrekt geschrieben ist und dass diese im richtigen Modul platziert ist.

  • Problem: Keine Ausgabe im MsgBox
    Lösung: Überprüfe, ob die Parameter in der FlächeBerechnen-Sub korrekt übergeben werden. Achte darauf, dass die Länge und Breite nicht 0 sind.

  • Fehler beim Aufruf mit Variablen
    Lösung: Verwende Range in der test-Sub, um Zellenwerte zu übergeben:

    Sub test()
    FlächeBerechnen Range("A1").Value, Range("B1").Value
End Sub

Alternative Methoden

Wenn Du eine benutzerdefinierte Funktion in Excel erstellen möchtest, kannst Du den Code wie folgt anpassen:

Function FlächeBerechnen(Länge As Double, Breite As Double) As Double
    If Länge = 0 Or Breite = 0 Then
        FlächeBerechnen = 0
        Exit Function
    End If
    FlächeBerechnen = Länge * Breite
End Function

Jetzt kannst Du =FlächeBerechnen(A1, B1) direkt in eine Zelle eingeben, um die Fläche zu berechnen.

Praktische Beispiele

Hier sind einige praktische Beispiele, um die FlächeBerechnen-Sub zu verwenden:

  1. Berechnung mit festen Werten:

    Sub Beispiel1()
    FlächeBerechnen 5, 10 ' Gibt 50 aus
End Sub

  2. Berechnung mit Zellreferenzen:

    Sub Beispiel2()
    Range("C1").Value = FlächeBerechnen(Range("A1").Value, Range("B1").Value)
End Sub

    Stelle sicher, dass in Zelle A1 die Länge und in B1 die Breite steht.

Tipps für Profis

  • Verwende Option Explicit: Füge am Anfang Deines Moduls Option Explicit hinzu, um sicherzustellen, dass alle Variablen deklariert sind. Das hilft, Fehler zu vermeiden.

  • Debugging: Nutze Debug.Print, um Werte während der Ausführung zu überprüfen. Dies ist besonders hilfreich, um den Wert der Fläche zu sehen, bevor die MsgBox angezeigt wird.

  • Erweiterte Flächenberechnung: Du kannst die Funktion erweitern, um verschiedene Formen zu berechnen, wie z.B. Kreise oder Dreiecke.

FAQ: Häufige Fragen

1. Wie kann ich die Fläche in einer Excel-Zelle anzeigen?
Verwende die benutzerdefinierte Funktion wie folgt: =FlächeBerechnen(A1, B1), wobei A1 die Länge und B1 die Breite ist.

2. Kann ich die Fläche auch mit Variablen berechnen?
Ja, Du kannst die Werte aus Zellen oder Variablen an die FlächeBerechnen-Sub übergeben, wie in den Beispielen gezeigt.

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