runden?
07.11.2005 06:52:55
gnilk
irgendwie rundet der VBA-Code die Division. Was kann man denn da machen? Ich brauche den Wert bis auf 15 Kommastellen.
Hier mein Code ohne
Sub und End Sub
' alle Set und Dim und Variablen
Dim x As Workbook
Set x = Workbooks("backlog_02.xls")
' hier wird der Faktor fuer die Ziele gebildet damit man es berechnen kann
Dim faktor As Long
Dim bklgmnth As Long
Dim rng As Range
' Filter zur Sicherheit noch entfernen!
Set rng = Range(x.Worksheets("Daten").Range("I2"), _
x.Worksheets("Daten").Range("I65536").End(xlUp))
faktor = UserForm2.TextBox1 / WorksheetFunction.Sum(rng)
x.Worksheets("target").Range("A1") = faktor
Vielen Dank im Voraus
Ciao Gnilk