tell application "Adobe Acrobat Pro"
  tell active doc
    repeat with i from 1 to count of pages
      tell page i
        set cbox to crop box
        set media box to cbox
      end tell
    end repeat
  end tell
end tell

tell application "Adobe Acrobat Pro"
  tell active doc
    repeat with i from 1 to count of pages
      tell page i
        set tbox to trim box
        set media box to tbox
      end tell
    end repeat
  end tell
end tell