close

I need to somehow move the Data sort options file from one system to the next
and I cannot seem to locate the file. Any help on this matter would be
greatly appreciated.

EJ

Are you asking about the custom lists that you see in that dialog?

If yes, you can modify those lists manually via: Tools|Options|Custom lists

You could use a couple of macros, too.

The first exports the lists to a new worksheet.

Then save the workbook and open it on a different pc.

The second imports those extracted lists into excel on the new pc.

Option Explicit
Sub ExtractCustomList()

Dim iCtr As Long
Dim myArray As Variant
Dim newWks As Worksheet

Set newWks = Worksheets.Add
newWks.Cells.NumberFormat = quot;@quot;

For iCtr = 5 To Application.CustomListCount
myArray = Application.GetCustomListContents(iCtr)
newWks.Cells(1, iCtr - 4) _
.Resize(UBound(myArray) - LBound(myArray) 1).Value _
= Application.Transpose(myArray)
Next iCtr
End Sub
Sub ImportCustomList()

Dim iCol As Long
Dim wks As Worksheet
Dim myArray As Variant

Set wks = ActiveSheet

With wks
For iCol = 1 To .Cells(1, .Columns.Count).End(xlToLeft).Column
myArray = .Range(.Cells(1, iCol), _
.Cells(.Rows.Count, iCol).End(xlUp)).Value
Application.AddCustomList listArray:=myArray
Next iCol
End With
End SubNetwork wrote:
gt;
gt; I need to somehow move the Data sort options file from one system to the next
gt; and I cannot seem to locate the file. Any help on this matter would be
gt; greatly appreciated.
gt;
gt; EJ

--

Dave Peterson

ps...

If you're new to macros, you may want to read David McRitchie's intro at:
www.mvps.org/dmcritchie/excel/getstarted.htm

Network wrote:
gt;
gt; I need to somehow move the Data sort options file from one system to the next
gt; and I cannot seem to locate the file. Any help on this matter would be
gt; greatly appreciated.
gt;
gt; EJ

--

Dave Peterson

arrow
arrow
    全站熱搜
    創作者介紹
    創作者 software 的頭像
    software

    software

    software 發表在 痞客邦 留言(0) 人氣()