Office: automatisch multiplizieren

Hallo,

ich habe ein kleines Problem.

Ich möchte das ein Wert den ich in eine Zelle eintrage automatisch mit 1,5 multipliziert wird.

Wie geht das am einfachsten?

-rah-

 

Hallo!
Soll der Wert wieder in der gleichen Zelle ausgegeben werden??

 

Hallo!

ja genau.. z.B.: in A1 schreib ich 5 und er gibt dann automatisch 7,5 aus, ist soetwas möglich?

mfg

-rah-

 

Bin mir sicher Excelgott Schatzi ist gleich mit dem richtigen Change Ereignis Makro zur Hilfe da!

 

hm, schade das ich noch keine Antwort bekommen habe oder ist das Problem so schwer? Oder so leicht das Niemand ne Antwort schreiben möchte?

mfg

-rah-

 

Das direkte Verändern der User-Eingaben ist per Makro möglich, aber, zumindest aus meiner Sicht, ein absolutes "no no!". Wenn man die Eingabe multiplizieren möchte, so sollte das Ergebnis in einer anderen Zelle stehen und nicht die User-Eingabe überschreiben.

Aber wenn Du es absolut unbedingt zwingend so machen willst... Das folgende erledigt das für Zelle "B2":

Code:

Option Explicit

Dim changing As Boolean

Private Sub Worksheet_Change(ByVal Target As Range)

    If (Not changing) Then
        If (Target.Row = 2) And (Target.Column = 2) Then
            changing = True
            Target.Value = Target.Value * 1.5
            changing = False
        End If
    End If

End Sub

Den Source dann zu dem Tabellenblatt in den VBA-Editor und sich wundern, wieso in B2 sich immer die Werte ändern, die man dort eingibt. Der nächste Anruf bei der Hotline mit "Hilfe, mein Excel spinnt, der nimmt meine Eingaben nicht mehr an!" ist vorprogrammiert.

Fehler-Abfang ist nicht dabei. Gibt es Fehler durch z.B. Eingabe von Text, kracht es. Gültigkeitsprüfung ist über "Daten - Gültigkeit..." einzustellen.

Gruß, Michael