How to sort buttons

[Ray C]

I have a VBA loop that reads file names from a directory. In the end I have a
worksheet with a bunch of filename listed (plus other file info). I also add
a button on each line that allows me to open the file. It all works
fine...until the user plays around with the sorting...When columns are
sorted, everything gets sorted except the buttons. In other words, after the
user sorts, the buttons on each line open the wrong files.

Here's the code that adds the button on each line:

sht.Range("AA" & intCurrentLine).Select
With mySheet.Buttons.Add(ActiveCell.Left, ActiveCell.Top, ActiveCell.Width,
ActiveCell.Height)
.Name = ...
.OnAction = ...
.Characters.Text = ...
End With

This code is inside another bigger loop that reads each file.

Thanks in advance
Ray

 

[Tom Hutchins]

Just a thought ... If you create hyperlinks instead of buttons on each row,
you will still get one-click functionality to open the files, and the cells
with the hyperlinks will sort normally.

Hope this helps,

Hutch

 

[Ray C]

Hi Tom,

I solved my problem with the buttons, but I like your idea better. Oh well.

Thanks anyways
Ray