Anzeige
Anzeige
HERBERS
Excel-Forum (Archiv)
20+ Jahre Excel-Kompetenz: Von Anwendern, für Anwender
Inhaltsverzeichnis

Prozentuale Steigerung

Forumthread: Prozentuale Steigerung

Prozentuale Steigerung
27.06.2005 11:23:17
Thomas
Hallo,
hat jemand einen Ansatz in VBA für folgende Aufgabe:
Wie kann ich in vorhandene Zahlenwerte über einen Command Button um z.B.
5 % erhöhen,wenn ich die gewünschte Zeile markiere
Beispiel:
Ursprungswert
A1 =100
Neuer Wert
Command button anklicken
A1 = 105
Danke für die Hilfe
Thomas
Anzeige

3
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Prozentuale Steigerung
27.06.2005 11:33:06
Markus
Hallo Thomas
Vielleicht so?

Sub erhöhen()
Dim wert As Double
wert = Sheets("Blatt").Cells(8, 3)
Sheets("Blatt").Cells(8, 3) = wert * 1.05
End Sub


Sub senken()
Dim wert As Double
wert = Sheets("Blatt").Cells(8, 3)
Sheets("Blatt").Cells(8, 3) = wert / 1.05
End Sub

Gruss
Anzeige
AW: Prozentuale Steigerung
27.06.2005 13:10:26
Thomas
Hallo Markus,
Danke für die Hilfe.
Habe es so eingegeben, geht leider nicht
Was bedeutet den hinter Cells( 8, 3) sorry für die dumme frage
Gruß
;

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige