SharePoint Online: Copy List Views using PowerShell

#Load SharePoint CSOM Assemblies
Add-Type -Path "C:\Program Files\Common Files\Microsoft Shared\Web Server Extensions\16\ISAPI\Microsoft.SharePoint.Client.dll"
Add-Type -Path "C:\Program Files\Common Files\Microsoft Shared\Web Server Extensions\16\ISAPI\Microsoft.SharePoint.Client.Runtime.dll"

#Function to copy list view
Function Copy-SPOListView()
{
  param
    (
        [Parameter(Mandatory=$true)] [string] $SiteURL,
        [Parameter(Mandatory=$true)] [string] $ListName,
        [Parameter(Mandatory=$true)] [string] $ViewName,
        [Parameter(Mandatory=$true)] [string] $NewViewName
    )
    Try { 
        #Get Credentials to connect
        $Cred= Get-Credential
        $Credentials = New-Object Microsoft.SharePoint.Client.SharePointOnlineCredentials($Cred.Username, $Cred.Password)
 
        #Setup the context
        $Ctx = New-Object Microsoft.SharePoint.Client.ClientContext($SiteURL)
        $Ctx.Credentials = $Credentials

        #Get the list by title
        $List=$Ctx.web.Lists.GetByTitle($ListName)
        
        #Get the View to Copy 
        $View = $List.Views.GetByTitle($ViewName)
        $Ctx.Load($view)
        $Ctx.Load($View.ViewFields)
        $Ctx.ExecuteQuery()

        #Copy the List View
        $ViewCreationInfo = New-Object Microsoft.SharePoint.Client.ViewCreationInformation
        $ViewCreationInfo.Paged = $View.Paged
        $ViewCreationInfo.PersonalView = $View.PersonalView
        $ViewCreationInfo.Query = $View.ViewQuery
        $ViewCreationInfo.RowLimit = $View.RowLimit
        $ViewCreationInfo.Title = $NewViewName
        $ViewCreationInfo.SetAsDefaultView = $View.DefaultView 
        $ViewCreationInfo.ViewFields = $View.ViewFields
        $ViewCreationInfo.ViewTypeKind = $View.ViewType
 
        $List.views.Add($ViewCreationInfo)  | Out-Null
        $Ctx.ExecuteQuery()

        write-host -f Green "List View has been Copied Successfully!"
     }
    Catch {
        write-host -f Red "Error Copying List View!" $_.Exception.Message
    }
}
 
#Set parameter values
$SiteURL="https://crescent.sharepoint.com/sites/Ops/"
$ListName="Projects"
$ViewName="All Items"
$NewViewName="All Projects"

#Call the function to copy view
Copy-SPOListView -SiteURL $SiteURL -ListName $ListName -ViewName $ViewName -NewViewName $NewViewName

#Parameters
$SiteURL = "https://crescent.sharepoint.com/sites/PMO"
$ListName = "Projects"
$ViewName = "Active Projects"
$NewViewName = "Current Projects"

Try {
    #Connect to PnP Online
    Connect-PnPOnline -Url $SiteURL -Interactive

    #Get the Source View
    $View = Get-PnPView -List $ListName -Identity $ViewName -Includes ViewType, ViewFields, Aggregations, Paged, ViewQuery, RowLimit
    
    #Get Properties of the source View
    $ViewProperties = @{
        "List" =  $ListName
        "Title" = $NewViewName
        "Paged" = $View.Paged
        "Personal" = $View.PersonalView
        "Query" = $View.ViewQuery
        "RowLimit" = $View.RowLimit
        "SetAsDefault" = $View.DefaultView 
        "Fields" = @($View.ViewFields)
        "ViewType" = $View.ViewType
        "Aggregations" = $View.Aggregations
    }
    #Create a New View
    Add-PnPView @ViewProperties
}
catch {
    write-host "Error: $($_.Exception.Message)" -foregroundcolor Red
}