Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Berechnen nur wenn Bedingung erfüllt ist

Forumthread: Berechnen nur wenn Bedingung erfüllt ist

Berechnen nur wenn Bedingung erfüllt ist
24.08.2003 01:49:05
Stefan Glande

Excelanier,

ich möchte gerne in Spale C die Summe berechnen.Siehe Formel.
Wenn sich nun der Zinssatz in Tabellenblatt2 Spalte B ändert würden sich auch bei alle älteren Berechungen
die Werte im Tabellenblatt 1 in Spalte C ändern.DAs soll aber nicht passieren.

Am liebsten wäre mir eine Lösung in VBA
Excel Jeanie HTML
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Berechnen nur wenn Bedingung erfüllt ist
24.08.2003 09:03:58
GraFri
Hallo



'In Tabelle1

Option Explicit

Sub Worksheet_Change(ByVal Target As Excel.Range)
Dim dB1         As Worksheet
Dim dB2         As Worksheet
Dim Wert        As Variant

Set dB1 = Worksheets("Tabelle1")
Set dB2 = Worksheets("Tabelle2")

On Error GoTo Fehler
Application.EnableEvents = False
If Target.Column = 2 Then
    Wert = dB1.Range(Target.Address).Value
    If IsNumeric(Wert) Then   'Abfrage, ob Zahl
        dB1.Range(Target.Address).Offset(0, 1).Value = Wert * dB2.Range("B2").Value 'Ausgabe in Nachbarzelle
    Else
        dB1.Range(Target.Address) = vbNullString
        dB1.Range(Target.Address).Offset(0, 1) = vbNullString
    End If
End If
Application.EnableEvents = True
Exit Sub

Fehler:
Application.EnableEvents = True
End Sub


     Code eingefügt mit Syntaxhighlighter 2.4


mfg, GraFri


Anzeige
AW: Danke :-) o.T
24.08.2003 10:06:50
Stefan Glander
.


;

Forumthreads zu verwandten Themen

Anzeige
Anzeige
Entdecke relevante Threads

Schau dir verwandte Threads basierend auf dem aktuellen Thema an

Alle relevanten Threads mit Inhaltsvorschau entdecken

Beliebteste Forumthreads (12 Monate)

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