StrPrefix = "LDAP://cn="
StrContainer = StrOffice
StrSuffix = ",ou=Temp,dc=primaryt,dc=co,dc=uk"
StrFQDN = StrPrefix & StrContainer & StrSuffix

Set objGroup = GetObject(StrFQDN)
objGroup.Add(objUser.ADsPath)