{ IF {NUMPAGES} > 1 "{PAGE}" ""}{ IF {Variable} operator {Vergleichwert} "Text wenn wahr" "Text wenn falsch"}=TEXT(ABS($F$1-E35);WENN($F$1-E35;“-”;)&“[hh]:mm”)[hh]:mm;[Rot]-[hh]:mmZa,hl*24
Folgenden Code in eine leere Textdatei kopieren (wichtig ist der Zeilenumbruch am Ende des letzten Kommentars) und die Textdatei in Neue Excel-Instanz.vbs umbenennen.
'==================== Neue Excel-Instanz.vbs ====================== Option Explicit Call NeueExcelInstanz Sub NeueExcelInstanz() With CreateObject("Excel.Application") .Workbooks.Open WScript.arguments(0) .Visible = True End With End Sub '===================================================================
Anschließend diese .vbs-Datei in den Ordner %appdata%\Microsoft\Windows\SendTo kopieren. So können Exceldateien nun mit einem Rechtsklick darauf und dann auf “Senden an..” → “Neue Excel-Instanz.vbs” geöffnet werden.
Alternativ kann man die .vbs-Datei auch an einen Ort seiner Wahl erstellen und in den SendTo-Ordner eine Verknüpfung setzen. Dies hat den Vorteil, dass man die Verknüpfung frei benennen kann (z.B. die “.vbs”-Endung löschen) und das Icon ändern (z.B. statt dem vbs- das Excel-Icon nimmt).