Was ist TTist?
30.08.2013 16:45:17
Erich
Hi Karsten,
wofür steht TTist?
Soll das ein Bereich (Ramge) sein? Oder eine numerische Variable, vielleicht double?
Da gibt es ein paar Möglichkeiten:
Option Explicit ' immer zu empfehlen
Sub aaaaa1()
Dim TTist As Range
Set TTist = ActiveCell.Offset(0, -6)
TTist.Value = Application.Round(TTist.Value, 0)
End Sub
Sub aaaaa2()
Dim TTist As Double
TTist = ActiveCell.Offset(0, -6)
TTist = Application.Round(TTist, 0)
End Sub
Sub aaaaa3()
Dim TTist As Long
TTist = Application.Round(ActiveCell.Offset(0, -6), 0)
End Sub
Sub aaaaa4()
Dim TTist As Range
Set TTist = Cells(1, 1)
TTist = ActiveCell.Offset(0, -6)
TTist.Value = Application.Round(TTist.Value, 0)
End Sub
Rückmeldung wäre nett! - Grüße aus Kamp-Lintfort von Erich