R4+Z

Ok

First you need to find out if any memories have been allocated. Check commands 73 and 94. If there is no allocation then you have the arduous task of working out what memories are available. This isn't easy as they are spread across the two commands and can overlap, they can even be allocated to multiple stations. Once you have the next available blocks simply assign them using either cmd 73, cmd 94 or both. Cmd 94 allocates memories to the dedicated one touch keys. Cmd 73 allows you to add them to the programmable keys using a setting of F11XX where XX is the memory location. and if you want the DSS function you assign the memory in both.

See here for DSS programming....http://www.tek-tips.com/faqs.cfm?fid=6338

dmad

In my experience, if you don't know what you're working with and you have the authority, it's best to clear all the personal speed dial/one touch speed dial allocations on every extension and start again. As R4+Z has said, there isn't a simple way to reverse-lookup speed dial allocations and so it's hit an miss whether you'll double assign anyone. If you have a new enough copy of matworx, you can easily manually set them up using the Station Assignment GUI which will listup all your station speed dials and allow you to map them using the one-touch function.

Having been there and done that to make it really work across the board, you need a spreadsheet, a mach script and proper change control methods to manage the whole thing....If it's just the boss and his PA then it's simple to setup.

R4+Z

Actually there a relatively easy way to check the memories but you would need the Excel spreadsheet that I wrote to do it. There is a macro behind it that adds a rather lengthy formula to the page that analyses whether there are overlaps and spaces for you. All you have to do is list up the memories using matworx export them into an excel sheet then cut and paste the data into my worksheet. If anyone can tell me how to post the worksheet along with the macro I'll let you all have the use of it!

Alternatively you can try pasting in the formulae which I will list below and drag and fill it on the worksheet but you will have to sort by the memory allocation column first.

The memory details should be in column D

=IF(D2="NONE","",IF(D2="DATA NOT FOUND","",IF(D2="DATA ERROR","",IF(VALUE(LEFT(D2,3))<(VALUE(LEFT(D1,3))) +(VALUE(RIGHT(D1,1))),"Overlap",IF(VALUE(LEFT(D2,3 ))=(VALUE(LEFT(D1,3)))+(VALUE(RIGHT(D1,1))),"",IF( VALUE(LEFT(D2,3))>(VALUE(LEFT(D1,3))+(VALUE(RIGHT( D1,1)))),"Space",))))))

Note that when you copy and paste this you may end up with unwanted spaces or carriage returns so make sure it goes in as one continuous line.

I also have one for finding screwups in call pickup groups but that is much to complicated to just post the formula for.

R4+Z

Just a note.

I usually list up both CMD73 & CMD94, merge the two, then sort them and just accept that it will show them as overlaps. If you want it prettier you could write the macro to delete overlaps like that from the list.

The macro that does the job automatically if you know how to create it is .....
Sub check_list()

totrows = Range("D1").CurrentRegion.Rows.Count
Range("I1").Select
ActiveCell.FormulaR1C1 = "="
Range("H1").Select
ActiveCell.FormulaR1C1 = "IF(D2=""NONE"","""",IF(D2=""DATA NOT FOUND"","""",IF(D2=""DATA ERROR"","""",IF(VALUE(LEFT(D2,3))<(VALUE(LEFT(D1,3 )))+(VALUE(RIGHT(D1,1))),""Overlap"",IF(VALUE(LEFT (D2,3))=(VALUE(LEFT(D1,3)))+(VALUE(RIGHT(D1,1)))," """,IF(VALUE(LEFT(D2,3))>(VALUE(LEFT(D1,3))+(VALUE (RIGHT(D1,1)))),""Space"",))))))"
Range("G1").Select
ActiveCell.FormulaR1C1 = "=RC[2]&RC[1]"
Range("G1").Select
Range("G1").Select
Selection.Copy
Selection.PasteSpecial Paste:=xlPasteValues, Operation:=xlNone, SkipBlanks _
:=False, Transpose:=False
ActiveWindow.SmallScroll Down:=-6
ActiveSheet.Paste
Application.CutCopyMode = False
Columns("G:G").Select
Selection.Replace What:="2", Replacement:="2", LookAt:=xlPart, _
SearchOrder:=xlByRows, MatchCase:=False, SearchFormat:=False, _
ReplaceFormat:=False
Range("H1:I1").Select
Selection.ClearContents
Range("G1").Select
Selection.AutoFill Destination:=Range("G1:G" & totrows), Type:=xlFillDefault
Range("G1:G400").Select

Range("H2").Select
End Sub

dmad

Ah - the pickup groups! Yes that's another nightmare - and screwed up UCD groups. You have to list every possible extension to see if something has an attribute. Thanks for the macros - they should come in handy!