ConvertFrom-ExcelClipboard.ps1

<#
.SYNOPSIS
    Wandelt aus Excel kopierte Zellen in PowerShell-Objekte um.

.DESCRIPTION
    In Excel den Bereich markieren und kopieren (Strg+A, Strg+C), dann in
    PowerShell `e2p` aufrufen: die Zwischenablage wird als
    tabulatorgetrennter Text gelesen, die erste Zeile als Spaltenueberschrift
    genommen und daraus ein Array von PSCustomObject gebaut.

    Spart den Umweg ueber eine CSV-Datei, wenn man nur schnell mit ein paar
    Zeilen aus einer Tabelle weiterarbeiten will.

.NOTES
    Die Funktion heisst absichtlich kurz `e2p` (Excel to PowerShell) - sie ist
    zum Tippen an der Konsole gedacht.

    Der hintere Teil der Datei prueft zusaetzlich den Online-Status der
    eingelesenen Rechnernamen. Test-ConnectionInParallel kommt dafuer aus dem
    Modul modules/PSCollections.Connectivity, das oben geladen wird - frueher
    wurde die Funktion aufgerufen, ohne dass sie irgendwo herkam.
#>
# Gemeinsames Modul laden. Der Suchlauf nach oben macht den Import
# unabhaengig davon, wie tief die Datei im Verzeichnisbaum liegt.
$repoRoot = $PSScriptRoot
while ($repoRoot -and -not (Test-Path (Join-Path $repoRoot 'modules'))) {
    $repoRoot = Split-Path $repoRoot -Parent
}
Import-Module (Join-Path $repoRoot 'modules/PSCollections.Connectivity/PSCollections.Connectivity.psd1') -Force

# This function enables you to copy information from Excel to a pscustomobject
# In Excel CTRL+A CTRL+C, then in powershell type e2p, return is a pscustomobject which can then be used in powershell afterwards
function e2p {
    [CmdletBinding()]

    # This object holds the rows and columns in form of multiple pscustomobject in this array
    $excelsheet = @()

    # Get the marked and copied Excel content
    $clip = Get-Clipboard 

    # get the columnheaders
    $spaltennamen = $clip | Select-Object -First 1 | Where-Object { $_ -and $_.Length -ge 1 } | ForEach-Object {
        $_.Trim() -split "`t"
    }
    
    # Get the content from line 2 onwards
    $clip | Select-Object -Skip 1 | Where-Object { $_ -and $_.Length -ge 1 } | ForEach-Object {
        $zeile = $_.Trim() -split "`t"
        $myline = [pscustomobject]@{}
        $j = 0
        foreach ($spaltenname in $spaltennamen) {
            # Add-Member is needed, because the column headers have to be dynamically added
            $myline | Add-Member -MemberType NoteProperty -Name $spaltenname -Value $zeile[$j]
            $j += 1
        }
        # add the line as pscustomobject to the array
        $excelSheet += $myline 
    }
    
    return $excelSheet
}

# get the clipboard content and add it to a variable
$erg = e2p
# use the $erg where the column Hostname and the column are set and then use the column Hostname to...
$a = ($erg | Where-Object {$_.Hostname -ne ""} | Select-Object Hostname).Hostname
# $a = ($erg | Where-Object {$_.Hostname -ne "" -and $_.TeamViewerID -eq ""} | Select-Object Hostname).Hostname
# ... Online-Status der Hosts pruefen (Funktion aus PSCollections.Connectivity)
$online = Test-ConnectionInParallel -ComputerNames $a | Where-Object Online -eq $True
$online.ComputerName | Set-Clipboard
# This example is a quick an easy way to convert excel sheet contents into json
$erg | ConvertTo-Json
# This example is a quick an easy way to convert excel sheet contents into json and the save it directly to a mytest.json file
$erg | ConvertTo-Json | Out-File -LiteralPath "c:\temp\mytest.json" -Encoding utf8