Befüllung von Zellen

05/05/2008 - 09:53 von Andreas H. | Report spam
Hi Excelianer !

Ich möchte gerne, z.B. bei Brutto - Netto, also 2 Zellen den Preis
eingeben können, und das dann automatisch die 2te Zelle umgerechnet
wird.

Also bei Befüllung Netto in Zelle A1 soll in A2 Brutto mit ausgegeben
werden und wenn ich in A2 Brutto eingebe, soll A1 mit Netto befüllt
werden.

Problem was ich habe ist, das wenn ich die Zelle mit einem Wert
befülle ich die Umrechnungsformel ja lösche..wie kann ich das
machen !?

Gibt es da eine Lösung, wenn ja welche ?!

Danke im Voraus !
 

Lesen sie die antworten

#1 Claus Busch
05/05/2008 - 10:31 | Warnen spam
Hallo Andreas,

Am Mon, 5 May 2008 00:53:54 -0700 (PDT) schrieb Andreas H.:

Ich möchte gerne, z.B. bei Brutto - Netto, also 2 Zellen den Preis
eingeben können, und das dann automatisch die 2te Zelle umgerechnet
wird.

Also bei Befüllung Netto in Zelle A1 soll in A2 Brutto mit ausgegeben
werden und wenn ich in A2 Brutto eingebe, soll A1 mit Netto befüllt
werden.

Problem was ich habe ist, das wenn ich die Zelle mit einem Wert
befülle ich die Umrechnungsformel ja lösche..wie kann ich das
machen !?



da hilft nur VBA. Formatiere die Spalten A und B entweder Wàhrung oder
Zahl mit 2 Dezimalstellen und probiere es mit dem Code im Codemodul des
entsprechenden Arbeitsblattes:

Private Sub Worksheet_Change(ByVal Target As Range)

If Intersect(Target, Range("A:B")) Is Nothing _
Or Target.Count > 1 Then Exit Sub

Select Case Target.Column

Case 1
Target.Offset(0, 1) = _
Target * 1.19
Case 2
Target.Offset(0, -1) = _
Target / 1.19
End Select

End Sub


Mit freundlichen Grüssen
Claus Busch
Win XP Prof SP2 / Vista Ultimate
Office 2003 SP2 / 2007 Ultimate

Ähnliche fragen