Isso é baseado no script fornecido por Evan Anderson (para que ele receba o crédito de resposta aceito), mas eu queria fornecer o código exato que usei (claro, com algumas redações):
Option Explicit
Dim colSourceGroups, colDestinationGroups, objSourceGroup, objDestinationGroup, objDestinationGroupName, objSourceUser
' Debugging
Const DEBUGGING = True
' Source and destination OUs
Const SOURCE_OU = "OU=SourceOU,DC=example,DC=local"
Const DESTINATION_OU = "OU=DesintationOU,DC=example,DC=local"
' Source and Destination Prefixes to use
Const OriginalPrefix = "YC"
Const NewPrefix = "SB"
' Get groups in each OU
Set colSourceGroups = GetObject("LDAP://" & SOURCE_OU)
Set colDestinationGroups = GetObject("LDAP://" & DESTINATION_OU)
colSourceGroups.Filter = Array("group")
colDestinationGroups.Filter = Array("group")
' Delete groups in the target to avoid conflict on creation
For Each objDestinationGroup in colDestinationGroups
colDestinationGroups.Delete "group",
objDestinationGroup.Name
Next 'objDestinationGroup
'Copy source group to destination
For Each objSourceGroup in colSourceGroups
objDestinationGroupName = "CN=" & NewPrefix & Mid(objSourceGroup.Name,LEN(OriginalPrefix)+4)
If (DEBUGGING) Then WScript.Echo "Creating Group: " & objDestinationGroupName
Set objDestinationGroup = colDestinationGroups.Create("group", objDestinationGroupName)
'objDestinationGroup.Put ("Description", objSourceGroup.Get("Description"))
objDestinationGroup.SetInfo
'Add users in the source group to the destination group
'Non-recursive. Currently only supports flat groups (no nesting allowed at this time)
For Each objSourceUser In objSourceGroup.Members
If (DEBUGGING) Then WScript.Echo "Adding user " & objSourceUser.Name & " to group " & objDestinationGroup.Name
objDestinationGroup.Add(objSourceUser.aDSPath)
Next ' objUser
Next ' objSourceGroup
Observe que isso somente copia nomes de grupos e seus usuários. As descrições não apareceriam, e devo usar o Universal em vez de grupos globais, mas até agora parece funcionar bem o suficiente para o banco de dados do sandbox.