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

Zu Einfach - aber ich krieg´s nicht hin

Forumthread: Zu Einfach - aber ich krieg´s nicht hin

Zu Einfach - aber ich krieg´s nicht hin
03.01.2004 16:44:33
Roland
Hallo Zusammen,
sorry - die Frage ist wahrscheinlich zu einfach - aber ich komme nicht weiter.

Möchte aus dem Worksheet("Liqui_Tag") der Spalte S (Integer) von IntRow (Integer) bis Zähler (Integer) die Werte addieren und den Durchschnitt daraus ermitteln. In der Spalte S von Liqui_Tag stehen Zahlen.

Herzlichen Dank

Roland
Anzeige

2
Beiträge zum Forumthread
Beiträge zu diesem Forumthread

Betreff
Datum
Anwender
Anzeige
AW: Zu Einfach - aber ich krieg´s nicht hin
03.01.2004 17:34:10
Martin Beck
Hallo Roland,


Sub mw_berechnen()
Dim ws As Worksheet
Dim rg As Range
Dim s As Integer
Dim IntRow As Integer
Dim Zähler As Integer
Dim mw As Double
Set ws = Worksheets("Liqui_Tag")
s = 3
IntRow = 5
Zähler = 20
Set rg = ws.Range(ws.Cells(IntRow, s), ws.Cells(Zähler, s))
mw = Application.WorksheetFunction.Average(rg)
MsgBox mw
End Sub


Gruß
Martin Beck
Anzeige
AW: Zu Einfach - aber ich krieg´s nicht hin
03.01.2004 21:24:16
Roland
Herzlichen Dank Martin - BESTENS

Beliebteste Forumthreads (12 Monate)

Anzeige
Anzeige
Anzeige