Thema
Beispiele für die Zeitberechnung in Excel
Gruppe
Zeit
Problem
Beispiel für die Excel'sche Zeitberechnung. Die Einzelheiten gehen aus den Formeln hervor.
ClassModule: DieseArbeitsmappe
Private Sub Workbook_Open()
Dim txt As String
On Error Resume Next
ThisWorkbook.Names("Extern").Delete
On Error GoTo 0
txt = "'" & ThisWorkbook.Path & "\[TestXL4.xls]Tabelle1'!$A:$B"
txt = "=VLOOKUP(Extern!IV1," & txt & ",2,0)"
ThisWorkbook.Names.Add "Extern", txt
End Sub