I am trying to create a group using a variable which is a string. See below. Does anybody know if I can only use a literal string? ie in "quotes" Dim SomeName as string SomeName = Mid$(lb, 13, (lbpos - 13)) Set GroupObj = ThisDrawing.Groups.Add(SomeName) Anybody got any other ideas. It's been a bad day! Thankyou. Matt Metrology Dept Howmet Ltd Exeter