Live-Forum - Die aktuellen Beiträge
Anzeige
Archiv - Navigation
408to412
Aktuelles Verzeichnis
Verzeichnis Index
Übersicht Verzeichnisse
Vorheriger Thread
Rückwärts Blättern
Nächster Thread
Vorwärts blättern
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
408to412
408to412
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Inhaltsverzeichnis

Mehrere Zellen durch Wert dividieren

Mehrere Zellen durch Wert dividieren
Tessmann
Hallo!
Wie kann ich eine Fläche von Zellen so formatieren, dass alle Werte die ich eingebe sofort durch 1,16 geteilt werden!!
Gebe ich also 116 ein, gibt excel 100 aus!
Vielen Dank!

9
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Benutzer
Anzeige
AW: Mehrere Zellen durch Wert dividieren
Christoph
Hi Tessmann,
das ist eine Aufgabe für Worksheet_Change.
beschränke den Target-Bereich auf deinen relevanten Bereich und lass die Eingaben durch 1,16 teilen.
Gruß
Christoph
Auch für Hajo, ich kriegs nicht hin
Jörg
Hallo Christoph, hallo Hajo
ich VBA Anfänger habe mich mal versucht.

Private Sub Worksheet_Change(ByVal Target As Range)
If Not Intersect(Target, [a1:a3]) Is Nothing Then
'Target = Target.Value / 1.16
[B1]= Target.Value / 1.16
End If
End Sub

so funktioniert es, aber wenn ich stattdessen die Kommentarzeile einbaue, schaut selbst.
Wie also kann Target nach der Eingabe ein neuer Wert zugewiesen werden?
Löst etwa die Division erneut das Worksheet_Change Ereignis aus, so dass immer weiter dividiert wird?
Die Zahl läuft sichtlich nach unten, was aber führt zum Abbruch der Berechnung und letztendlich zur Anzeige eines Ergebnisses und keinem Fehlerwert?
Gruss Jörg
Anzeige
AW: Auch für Hajo, ich kriegs nicht hin
Hajo_Zi
Hallo Jörg
ja
Application.EnableEvents = False
' dein code
Application.EnableEvents = True
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro SP 3


Danke Hajo, habs begriffen ,Gruss Jörg oT
Jörg
AW: Mehrere Zellen durch Wert dividieren
08.04.2004 18:31:04
Hajo_Zi
Hallo Tessmann
siehe auch mal in Forums FAQ.
Das Forum lebt auch von den Rückmeldungen.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro SP 3


Anzeige
AW: Mehrere Zellen durch Wert dividieren
th.heinrich
hallo Tessmann,
vorname ist erwuenscht.
in C1 steht 1,16
in B1 A1/$C$1 und formel runterkopieren. spalte C kannst Du ausblenden.
gruss thomas
AW: warum neuer thraed ? mt.
Hajo_Zi
Hallo Thomas
da bin ich wohl nicht unschuldig. Ich hatte ja drauf hingewiesen das zwei so unterschiedliche Problem nicht in einem Beitrag angesprochen werden sollten.
Bitte keine Mail, Probleme sollten im Forum gelöst werden.
Microsoft MVP für Excel
Das Forum lebt auch von den Rückmeldungen.
Betriebssystem XP Pro und Excel Version XP Pro SP 3


Anzeige
sorry, soweit hatte ich nicht durchgezappt....
th.heinrich
hallo Hajo,
es ehrt Dich diese buerde zu tragen ;-))
zumal sich Tesse noch nicht gemeldet hat.
frohe ostern von thomas

41 Forumthreads zu ähnlichen Themen

Anzeige
Anzeige
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige