tell application "Adobe Illustrator" 
	activate 
	set thisdoc to current document 
	tell thisdoc 
		set selection to every page item 
		set groupRef to make new group item at end of thisdoc 
				set selectedItems to selection 
		move selectedItems to end of groupRef 
		set MyYPosition to item 2 of position of group item 1 
		set position of group item 1 to {0, MyYPosition} 
	end tell 
end tell 

tell document 1 of application "Adobe Illustrator" 
  activate 
  set selection to every page item 
  set groupRef to make new group item at end 
  set selectedItems to selection 
  move selectedItems to end of groupRef 
  set {x, y} to position of groupRef 
  set position of groupRef to {0, y} 
end tell 

on open of finderObjects 
	repeat with nFile in finderObjects 
		tell document 1 of application "Adobe Illustrator" 
			activate 
			set selection to every page item 
			set groupRef to make new group item at end 
			set selectedItems to selection 
			move selectedItems to end of groupRef 
			set {x, y} to position of groupRef 
			set position of groupRef to {0, y} 
		end tell 
		tell application "Finder" 
			activate 
			delete nFile 
		end tell 
		 
	end repeat 
end open 

on open of finderObjects 
  repeat with nFile in finderObjects 
    tell application "Adobe Illustrator" 
      activate 
      open nFile 
      tell document 1 
        set selection to every page item 
        set groupRef to make new group item at end 
        set selectedItems to selection 
        move selectedItems to end of groupRef 
        set {x, y} to position of groupRef 
        set position of groupRef to {0, y} 
      end tell 
    end tell 
  end repeat 
end open 

on open of finderObjects 
	repeat with nFile in finderObjects 
		tell application "Adobe Illustrator" 
			open (nFile as alias) 
			set selection to every page item of current document -- path item, text item, group item  
			 
			---- Gruppierungsbefehl ??? ---- 
			 
			set {x, y} to position of selection 
			 
			set position of selection to {0, y} 
			 
			save current document as Illustrator 
			close current document saving no 
		end tell 
		tell application "Finder" 
			activate 
			delete nFile 
		end tell 
		 
	end repeat 
end open