Txt zeilennummeriert anzeigen und ändern

D:\batches\temp-auslesen\dateiname.ps1 : Die Datei "D:\batches\dateiname.ps1" kann nicht geladen werden,  
da die Ausführung von Skripts auf diesem System deaktiviert ist. Weitere Informationen finden Sie unter
"about_Execution_Policies" (https:/go.microsoft.com/fwlink/?LinkID=135170).  
In Zeile:1 Zeichen:1
+ D:\batches\temp-auslesen\dateiname.ps1
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : Sicherheitsfehler: (:) , PSSecurityException
    + FullyQualifiedErrorId : UnauthorizedAccess

set /p Werte=<werte.txt
powershell -ExecutionPolicy ByPass  -NoProfile -Command "Add-Type -A Microsoft.VisualBasic; return [Microsoft.VisualBasic.Interaction]::InputBox('Bitte Daten eingeben %Werte%','Eingabe')" >"auswahl.txt"  

D:\batches\temp-auslesen>powershell.exe -ExecutionPolicy Bypass -File 'D:\batches\temp-auslesen\dateiname.ps1'  
Fehler beim Verarbeiten von -File "'D:\batches\temp-auslesen\dateiname.ps1'": Das angegebene Pfadformat wird nicht unterstützt. Geben Sie einen gültigen Pfad für den -File-Parameter an.  

$FontBold = new-object System.Drawing.Font("Arial",8,[Drawing.FontStyle]'Bold' )  

$objLabel = New-Object System.Windows.Forms.Label
$objLabel.Location = New-Object System.Drawing.Size(10,20)
$objLabel.Size = New-Object System.Drawing.Size(300,20)
$objLabel.Font = $fontBold
$objLabel.text = "Bitte entsprechende Tage kennzeichnen:"  
$objForm.Controls.Add($objLabel)

Es ist nicht möglich, eine Methode für einen Ausdruck aufzurufen, der den NULL hat.
In D:\batches\temp-auslesen\dateiname.ps1:54 Zeichen:1
+ $objForm.Controls.Add($objLabel)
+ ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~
    + CategoryInfo          : InvalidOperation: (:) , RuntimeException
    + FullyQualifiedErrorId : InvokeMethodOnNull

<Werte.txt more +1|sort >Werte-sort.txt

 >convert.vbs echo Set XL = CreateObject("Excel.Application")  
>>convert.vbs echo Set fso = CreateObject("Scripting.FileSystemObject")  
>>convert.vbs echo Set wss = CreateObject("WScript.Shell")  
>>convert.vbs echo OrdnerEin = wss.currentdirectory
>>convert.vbs echo For Each Datei In fso.GetFolder(OrdnerEin).Files
>>convert.vbs echo If lcase(Datei.name) = "1.xlsx" or lcase(Datei.name) = "2.xlsx" then  
>>convert.vbs echo XL.Workbooks.Open Datei.Path
>>convert.vbs echo For Each Wsheet In XL.ActiveWorkbook.Worksheets
>>convert.vbs echo if fso.FileExists (OrdnerEin ^& "\" ^& fso.GetBaseName(Datei.Name) ^& "_" ^& Wsheet.Name ^& ".csv") Then  
>>convert.vbs echo fso.DeleteFile(OrdnerEin ^& "\" ^& fso.GetBaseName(Datei.Name) ^& "_" ^& Wsheet.Name ^& ".csv")  
>>convert.vbs echo end if
>>convert.vbs echo if wsheet.name ="VT-Plan" then  
>>convert.vbs echo Wsheet.SaveAs OrdnerEin ^& "\" ^& fso.GetBaseName(Datei.Name) ^& "_" ^& Wsheet.Name ^& ".csv",6 , , , , False  
>>convert.vbs echo End if
>>convert.vbs echo Next
>>convert.vbs echo XL.ActiveWorkbook.Close False
>>convert.vbs echo End If
>>convert.vbs echo Next
>>convert.vbs echo XL.Quit
>>convert.vbs echo Set XL = Nothing
>>convert.vbs echo Set wss = Nothing

$file = 'werte.txt'  

function GenerateForm {

#region Import the Assemblies
[reflection.assembly]::loadwithpartialname("System.Windows.Forms") | Out-Null  
[reflection.assembly]::loadwithpartialname("System.Drawing") | Out-Null  
#endregion

#region Generated Form Objects
$form1 = New-Object System.Windows.Forms.Form
$bSave = New-Object System.Windows.Forms.Button
$clb = New-Object System.Windows.Forms.CheckedListBox
$InitialFormWindowState = New-Object System.Windows.Forms.FormWindowState
#endregion Generated Form Objects

$handler_form1_Load= {
    gc $file | %{
        $line = $_.split(":")  
        $clb.Items.Add($line,($line[1].trim() -eq 'ja'))  
    }
}

$handler_bSave_Click={
    0..($clb.items.Count-1) | %{"$($clb.Items[$_]):$(@{$true="ja";$false="nein"}[$clb.GetItemChecked($_)])"} | sc $file  
    $form1.Close()
}
$OnLoadForm_StateCorrection=
{#Correct the initial state of the form to prevent the .Net maximized form issue
	$form1.WindowState = $InitialFormWindowState
}

#----------------------------------------------
#region Generated Form Code


# Beschriftung des Fensterinhalts / Objektklasse Label aus dem Forms Assembly
$objlabel = New-Object System.Windows.Forms.Label
# Textposition im Fenster
$objlabel.Location = "10,12"  
# Reservierte Größe der Textbox / wie jede andere Textbox, z.B. mit Umbruch bei Kürze
$objlabel.Size = "200,20"  
# Inhalt der Textbox
$objlabel.Text = "Auswahl treffen:"  
# Name des Objektes, um es aus anderen Programmteilen darauf zugreifen zu können / könnte entfallen
$objlabel.Name = "Anweisung"  
# Einbau des Objektes ins Hauptfenster
$form1.Controls.Add($objlabel)


$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 489
$System_Drawing_Size.Width = 392
$form1.ClientSize = $System_Drawing_Size
$form1.DataBindings.DefaultDataSourceUpdateMode = 0
$form1.MaximizeBox = $False
$form1.Name = "form1"  
$form1.Text = "MyForm"  
# Neue Position :-)
$form1.StartPosition = "CenterScreen"  
$form1.add_Load($handler_form1_Load)

$bSave.Anchor = 10

$bSave.DataBindings.DefaultDataSourceUpdateMode = 0

$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 305
$System_Drawing_Point.Y = 452
$bSave.Location = $System_Drawing_Point
$bSave.Name = "bSave"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 23
$System_Drawing_Size.Width = 75
$bSave.Size = $System_Drawing_Size
$bSave.TabIndex = 1
$bSave.Text = "Save"  
$bSave.UseVisualStyleBackColor = $True
$bSave.add_Click($handler_bSave_Click)

$form1.Controls.Add($bSave)

$clb.Anchor = 15
$clb.DataBindings.DefaultDataSourceUpdateMode = 0
$clb.FormattingEnabled = $True
$System_Drawing_Point = New-Object System.Drawing.Point
$System_Drawing_Point.X = 12
$System_Drawing_Point.Y = 42
$clb.Location = $System_Drawing_Point
$clb.Name = "clb"  
$System_Drawing_Size = New-Object System.Drawing.Size
$System_Drawing_Size.Height = 394
$System_Drawing_Size.Width = 368
$clb.Size = $System_Drawing_Size
$clb.TabIndex = 0

$form1.Controls.Add($clb)

#endregion Generated Form Code

#Save the initial state of the form
$InitialFormWindowState = $form1.WindowState
#Init the OnLoad event to correct the initial state of the form
$form1.add_Load($OnLoadForm_StateCorrection)
#Show the Form
$form1.ShowDialog()| Out-Null
$clb.SelectedItem
} #End Function

#Call the Function
GenerateForm