TabExpansionPlusPlus for AD Users and Groups

ADCompleters.ps1

function ADuserCompletion {
          [ArgumentCompleter(
              Parameter = 'Identity',
              Command = { Get-CommandWithParameter -Module ActiveDirectory -Noun ADUser -ParameterName Identity },
              Description = 'Complete AD Users')]
          param($commandName,$parameterName,$wordToComplete,$commandAst,$fakeBoundParameter)

                if ($wordToComplete -eq "") {$filter = "(ObjectClass=User)"}
                else {$filter = "(&(ObjectClass=User)(ANR=$wordToComplete))"}
                Get-ADuser -LDAPFilter $filter | sort SamAccountname | 
                % {New-CompletionResult -ToolTip $_.SamAccountname -completiontext $_.SamAccountName}          
  }
  
  
 function ADGroupCompletion {
          [ArgumentCompleter(
              Parameter = 'Identity',
              Command = { Get-CommandWithParameter -Module ActiveDirectory -Noun ADGroup -ParameterName Identity },
              Description = 'Complete AD Groups')]
          param($commandName,$parameterName,$wordToComplete,$commandAst,$fakeBoundParameter)

                if ($wordToComplete -eq "") {$filter = "(ObjectClass=Group)"}
                else {$filter = "(&(ObjectClass=Group)(ANR=$wordToComplete))"}
                Get-ADGroup -LDAPFilter $filter | sort SamAccountname | 
                % {New-CompletionResult -ToolTip $_.SamAccountname -completiontext $_.SamAccountName}          
  }