Live-Forum - Die aktuellen Beiträge
Datum
Titel
19.04.2024 09:26:26
Median für Zeilen mit gleichen Zeitstempel
19.04.2024 08:41:23
Zwei Makros in ein Arbeitsblatt - zweite wird nicht ausführt
18.04.2024 21:09:11
4 Spalten aus smarter Tabelle in andere smarte Tab. kopieren
18.04.2024 20:45:35
Worksheet_Activate für alle Sheets
Du findest keine passende Antwort auf Deine Frage?
Stelle Deine Frage in unserem Live-Forum
Anzeige
Archiv - Navigation
1320to1324
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
Vorheriger Thread
Vorheriger Thread
Rückwärts Blättern
1320to1324
1320to1324
Aktuelles Verzeichnis
Verzeichnis Index
Verzeichnis Index
Übersicht Verzeichnisse
Nächster Thread
Nächster Thread
Vorwärts blättern
Inhaltsverzeichnis

VBA Wert auslesen und dividieren

VBA Wert auslesen und dividieren
09.07.2013 15:13:05
Gunnar
Hallo Zusammen,
ich habe mal wieder eine Frage:
Ich habe in einer Tabelle verschiedene Parameter für eine Berechnung in einer Spalte untereinander stehen, von denen einzelne durch einen festen Divisor dividiert und an anderer Stelle in der Datei wieder eingetragen werden sollen.
Beispiel: In Tabelle1 in Zelle A1 steht der Wert 1.200,00
Diesen Wert möchte ich per VBA auslesen, durch 12 teilen und das Ergebnis (in diesem Falle 100) in Tabelle2 in Zelle A1 als Wert eintragen.
Wie müsste ein entsprechender Code aussehen?
Ich hoffe, mir kann jemand weiterhelfen.
Vielen Dank im Voraus & beste Grüße
Gunnar

5
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: VBA Wert auslesen und dividieren
09.07.2013 15:26:42
Hajo_Zi
Hallo Gunnar,
warum VBA
=Tabelle1!A1/12

AW: VBA Wert auslesen und dividieren
09.07.2013 17:26:40
Gunnar
Hallo Hajo,
um das zu erläutern, muss ich etwas weiter ausholen:
Ich habe eine etwas umfangreichere Kalkulationsdatei für die Berechnung von Liquiditätsszenarien. In einem Tabellenblatt in Spalte B ist ein Standardszenario mit 30 Parametern eingetragen. In den Spalten C - N sind Abweichungen der einzelnen Parameter vom Standardszenario. Mit einem wverweis hole ich mir die Daten des jeweils zu analysierenden Szenarios in Spalte B und verteile sie dann mit einem VBA-Makro (was im Wesentlichen nichts anderes tut als kopieren und einfügen), in die einzelnen relevanten Felder der Kalkulation. Die Ergebnisse (Liquidität, IRR, Zinsergebnis usw.) werden dann aus den verschiedenen Ergebniszellen der Kalkulation wieder ausgelesen und in eine Ergebnistabelle geschrieben.
Eine harte Verlinkung der Daten mit den Parametern (siehe oben Spalte B) in die einzelnen Tabellenblätter / relevanten Zellen der Kalkulationsdatei ist nicht gewünscht.
Einzelne dieser Parameter müssen aber vor Eintrag multipliziert oder dividiert werden. Mir ging es also um eine generelle Anfrage, wie ein VBA-Code aussehen könnte, der einen Zellwert ausliest, ihn mit einem festen Faktor (ggf. aus einer anderen Zelle) multipliziert (oder einem Divisor dividiert) und dann an anderer Stelle wieder einträgt.
Ich hoffe, ich konnte die Problematik etwas verständlicher machen.
Viele Grüße
Gunnar

Anzeige
AW: VBA Wert auslesen und dividieren
10.07.2013 06:37:18
Ass
Hallo Gunnar,
möglicherweise benutzt du eigene Funktionen in der Art: 
Function CellDiv(A As Range, Optional Devisor As Range) As Double
CellDiv = A / Devisor
End Function


Function CellMul(A As Range, Optional Multiplikator As Range) As Double
CellDiv = A * Multiplikator
End Function
Der Code gehört in ein allgemeines Modul.
Die Funktion findest du in Excel unter Kategorie Bentzerdefiniert.
Gruß
Rudi

AW: VBA Wert auslesen und dividieren
10.07.2013 09:22:06
Gunnar
Hallo Rudi, hallo Marc,
sensationell. Das war genau das, was ich gesucht habe.
Vielen Dank & beste Grüße
Gunnar

Anzeige
So geht´s
10.07.2013 06:49:39
Marc 

Sub teilen()
Sheets("Tabelle2").Range("A1") = Range("A1") / 2
End Sub
Gruß, MCO

13 Forumthreads zu ähnlichen Themen

Spalte A durchsucht klein 100 dann spalte b summe
Piola

Hallo
bräuchte eure Hilfe.
Und zwar brauche eine Formel die, die Spalte A durchsucht nach klein 100 dann soll die Einträge von Spalte B summieren
-----A-----------B--------C
1-Gewicht---Erträge
2---43---------234-----Summe Erträge
3---123--------...
21.07.2009 20:35:25
Thread-ID: 1090356
4 Beiträge
Anzeige
Spalte durchsuche nach 2 bestimmten Textteilen
Manuel

Hallo allerseits,
ich möchte eine Spalte (D7:D50) durchsuchen und die Anzahl der Treffer in D51 und D52 erhalten.
In der Spalte kommen zusammengesetzte Texte wie z.B. ReG-f, ReG-t, SoG-f, SoG-t vor.
Der erste Teil des Suchbegriffs ("ReG") wird durch eine Zelle vorgegeben(G2)jetzt mö...
03.07.2017 15:49:15
Thread-ID: 1567163
3 Beiträge
Werte auf die man sich bezieht durch 100 Teilen
Nero

Hallo zusammen!
Folgendes: ich möchte Prozentzahlen die untereinanderstehen in einer Tabelle beim auslesen für eine Funktion durch 100 teilen. Habe folgendes versucht:
=FluidString10('Tabelle1'!D213:K226;(('Tabelle1'!T213:V226)/100);"mass")
geht aber nicht, deswegen schreibe ich hie...
26.06.2019 12:45:51
Thread-ID: 1699621
3 Beiträge
Anzeige
Eingaben werden automatisch durch 100 geteilt
rebmann

Alle Eingaben in eine Excel-Mappe werden automatisch durch 100 geteilt.kein Prozentformat oder ähnlichesWas kann die Ursache sein?

28.04.2003 16:41:45
Thread-ID: 250134
3 Beiträge
Dividieren von Zellen
Ellen

Hallo,habe eine Frage. Habe den Bereich
Range("B9:B5000").Select
markiert und den Inhalt umgewandelt
Selection.NumberFormat = "0.00"Mit welchen Code schaffe ich es, den kompletten Bereich durch 1000 zu dividieren, also dividiere B):B5000 durch 1000.Gruß
Ellen

26.06.2003 13:25:43
Thread-ID: 274126
2 Beiträge
Dividieren von Zellen
Ellen

Hallo,habe eine Frage. Habe den Bereich
Range("B9:B5000").Select
markiert und den Inhalt umgewandelt
Selection.NumberFormat = "0.00"Mit welchen Code schaffe ich es, den kompletten Bereich durch 1000 zu dividieren, also dividiere B9:B5000 durch 1000.Gruß
Ellen
26.06.2003 13:26:07
Thread-ID: 274127
5 Beiträge
Alle Zahlen einer Selection durch 1000 teilen
cpete
Hallo!
ich würde gerne ein Makro programmieren, das mir alle Zahlen der Zellen, die ich gerade markiert habe, durch 1000 teilt.
Hat sowas schonmal einer gemacht ohne das er die Zahlen zunächst an einen anderen Ort kopiert?
Danke für jeden Tipp!
cpete
04.08.2003 18:26:55
Thread-ID: 289586
5 Beiträge
alle zahlen durch 100 teilen
sim

Hallo!
Ich habe folgendes Problem.
Wenn ich in Excel eine Zahl eingebe wird sie direkt durch 100 geteilt.
Weis jemand wie ich diese Option loswerde?
16.11.2004 10:37:35
Thread-ID: 518144
3 Beiträge
Anzeige

Beliebteste Forumthreads (12 Monate)

Anzeige
Jetzt das Excel-Portal bewerten: Deine Stimme zählt!

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige
Archiv - Verwandte Themen
Forumthread
Beiträge
3
3
2
2
1
2
1
4
4
2
4
4
20