gistfile1.lua

-- Change the name to the name of the WeakAura
local name = "A Test Group"
local GetRegion = function(name)
   local DisplayType = function(name)
      if WeakAuras then
         if WeakAuras.auras and WeakAuras.auras[name] then return 'auras' end
         if WeakAuras.regions and WeakAuras.regions[name] then return 'regions' end
      end
   end
   local displayType = DisplayType(name)
   if not displayType then return end
   if displayType == 'auras' then
      if WeakAuras 
      and WeakAuras[displayType] 
      and WeakAuras[displayType][name] 
      and WeakAuras[displayType][name][0]
      and WeakAuras[displayType][name][0]['region'] then
         return WeakAuras[displayType][name][0]['region']
      end
   elseif displayType == 'regions' then
      if WeakAuras 
      and WeakAuras[displayType] 
      and WeakAuras[displayType][name] 
      and WeakAuras[displayType][name]
      and WeakAuras[displayType][name]['region'] then
         return WeakAuras[displayType][name]['region']
      end
   end
end

local region = GetRegion(name)
if not region then return end
local location, relativeTo, relativePoint, x, y = region:GetPoint(1)
region:SetPoint(location, relativeTo, relativePoint, x, y+150)