HERBERS Excel-Forum - die Beispiele

Thema: Zahlen in Abhängigkeit von ihrem Wert multiplizieren

Home

Gruppe

Allgemein

Problem

Wie kann ich Zahlen in einem vorgegebenen Bereich in Abhängigkeit ihres Wertes mit anderen Zahlen multiplizieren?

Lösung
Geben Sie den nachfolgenden Code in ein Standardmodul ein und weisen Sie ihn einer Schaltfläche zu.
StandardModule: basMain

Sub Berechnung()
    Dim rngAct As Range
    For Each rngAct In ActiveSheet.UsedRange
        Select Case CStr(rngAct.Value)
            Case "1"
                rngAct = rngAct * 12
            Case "3"
                rngAct = rngAct * 8
            Case "4"
                rngAct = rngAct * 6
        End Select
    Next rngAct
End Sub

Beiträge aus dem Excel-Forum zu den Themen Allgemein und Berechnen

scrollen berechnen Anfangskapital berechnen
Makro/VBA: Neu berechnen bis *Teil 2* Makro/VBA: Neu berechnen bis
Bestimmte Zelle mit Makro berechnen Range-Wert aus der Statistik berechnen
Zeiten (diff. in Monaten) berechnen Auflistung von Zahlen, ohne diese zu berechnen
nach 2 Werten suchen und berechnen Trend/Entwicklung berechnen
zellen berechnen Staus des Berechnens anzeigen
Zwischenzeiten berechnen Pivot - Berechnendes Feld
Allgemeine Frage zur Fehlerbehandlung allgemeine Fragen zu einer Datenbank
XY-Diagramm, Funktionswerte berechnen Werte bereichsweise berechnen
Arbeitstage berechnen Zinsen berechnen in VBA (Fehler)
Kalendarwoche berechnen Anzahl Tage berechnen
Problem mit copy-paste bei manuellem berechnen Matrix / Korridor berechnen
Arbeitstage berechnen Daten aus Pivottabelle berechnen
berechnen mit Combobox Soll eintragen und Zwischenstände berechnen
Doppelte Werte nicht berechnen Zinssatz mit Hilfe des Datums berechnen
Trend berechnen Restliche Tage berechnen
Zwischensumme nicht mitberechnen Bei gleichen Texten Summe berechnen
Überstunden berechnen Dynamisches Diagramm + berechnende Zellen
Formel berechnen? Zellenanzahl eines Bereiches berechnen
allgemein Wie kann ich Exccel beim berechnen *bremsen*?
Abfahrtszeit berechnen Zwischenwerte berechnen
Inhalt+Anzahl berechnen liefertermine berechnen
Rang berechnen summe aus zellen berechnen
Bundesliga Tabellenplatz berechnen ohne Matrix Intervalle berechnen und aufs Tabellenblatt
Arbeitszeit incl. Pausen berechnen Excel bleibt im Berechnen-Modus