dataDAD

I was thinking of using the "split" does this sound right?? I am not a programmer but know enough to cause damage, can some one help. Dim MyString, MyArray, Msg MyString = "VAN-220-001" MyArray = Split(MyString, "-", -1, 1) ' MyArray(0) contains "VAN". ' MyArray(1) contains "220". ' MyArray(2) contains "001". Msg = MyArray(0) & " " & MyArray(1) Msg = Msg & " " & MyArray(2) MsgBox Msg

I have all my computer names in a standard format LOC-DEP-XXX the first three characters represent the location the next 3 numerics are department codes and the final three are the computer number e.g. VAN-220-001 would be Vancouver - Payroll - computer 1. What I am looking for is a way to extract the first 3 characters from the computer name and apply location specific mappings and printers, then I would like to extract characters 5,6,7 for the department (there is a hyphan seperating each set of three) and apply drive and printer mappings specific to the department. Can somone please assist me. Thank you in advance