morboss

Thro' the Wall on the ZX Spectrum from 1982

I would use the 4K machine to play VIC-20 games in full 5K.

As the previous poster @bald_pig has already pointed out, we need to be able to read your code to help you. You have given your us code in code tags but put it all on one line. However, I've managed to work out that your code should look something like this: $appToMatch = '*Ninite Agent*'; function Get-InstalledApps { if ([intPtr]::Size -eq 4) { $regpath = 'HKLM:\Software\Microsoft\Windows\CurrentVersion\Uninstall\*' } else{ $regpath = @( 'HKLM:\Software\Microsoft\Windows\CurrentVersion\Uninstall\*' 'HKLM:\Software\Wow6432Node\Microsoft\Windows\CurrentVersion\Uninstall\*' ) } Get-ItemProperty $regpath | . { process { if ($_.DisplayName -and $_.UninstallString) { $_ } } } | Select DisplayName, Publisher, InstallDate, DisplayVersion, UninstallString | Sort DisplayName } try { $file = 'Ninite+Agent.msi' $link = "https://niniteice.s3.eu-west-2.amazonaws.com/Ninite+Agent.msi" $software = 'Ninite+Agent' $result = Get-InstalledApps | Where-Object { $_.DisplayName -like $appToMatch } If ($result -eq $null) { Write-Host "'$software' NOT is installed."; Write-Host "Starting download"; $tmp = "c:\Windows\System32\$file" Write-Host "tmp --> "+$tmp; $client = New-Object System.Net.WebClient $client.DownloadFile($link, $tmp) msiexec /i $tmp /qn Remove-Item $tmp Write-Host "Tried installing $software" # $soft_name has no value so will come up blank } else { Write-Host "'$software' is already installed." } } catch { $ErrorMessage = $_.Exception.Message Write-Host "An error occurred." Write-Host $ErrorMessage } It all seems to be working correctly. The only thing is that you had the unassigned variable $soft_name in the "Tried installing" message. So instead I have used $software variable... Write-Host "Tried installing $software" I hope that helps!

Normally the video would be uploaded to Microsoft Stream only. If the recording can't be uploaded to Stream it remains in the Teams service in a holding area for 20 days as a download link. If the download link cannot be accessed it might be blocked because user account does not have permissions to access it, possibly due to Firewall settings.

Hello, If I have understood the problem correctly, this is the way I would solve it... Sub button_Click() Dim CurrentWorksheet As Worksheet Dim ValidationType As Integer Dim rangeToCheck As String Dim rng As Range ' Range to check in each worksheet rangeToCheck = "C4:L6" ' Loop through all worksheets For Each CurrentWorksheet In Worksheets ' Set range to current worksheet Set rng = CurrentWorksheet.Range(rangeToCheck) ' Check each cell in range For Each cell In rng ValidationType = 0 On Error Resume Next ValidationType = cell.Validation.Type On Error GoTo 0 ' Check for dropdown list If ValidationType = xlValidateList Then ' Change to "Not Checked" cell.Value = "Not Checked" End If Next Next End Sub You can change the rangeToCheck near the top to check more cells.