Les comparto un script que me pidieron medio de urgencia y tal vez les sea de utilidad en algun momento. Simplemente recorre todo el AD mira los usuarios bloqueados y los desbloquea automaticamente. Option Explicit Dim objRootDSE, strDNSDomain, adoConnection Dim strBase, strFilter, strAttributes, strQuery...