A window with the names of the worksheets

[sofas]

Hello. Use this code to display a list of worksheet names. Can I control its size to be larger?

Sub Sheetlist()

On Error Resume Next
Dim ws As Worksheet
For Each ws In Worksheets

'WS.Visible = True
Next
  Application.CommandBars("Workbook Tabs").Controls("More Sheets...").Execute
  If Err.Number > 0 Then
    Err.Clear
     Application.CommandBars("Workbook Tabs").ShowPopup
 
  End If
  ActiveWindow.ScrollColumn = 1
  ActiveWindow.ScrollRow = 1
  On Error GoTo 0


End Sub

 

[Micron]

I doubt it, but if you can it will only be if you can find API code that allows you to resize a dialog inside an application. I think it would be easier to create your own form.

 

[Micron]

Similar question about Name Manager dialog

Programmatically Resize Name Manager Dialog Box

Hi All, I use Excel's built-in Name Manager a LOT! Each time Excel is started, the dimensions, column widths etc. of the Name Manager dialog box are reset to default values which (I suppose!) are stored somewhere. The problem is that these default values are unsuitable for me, and I would like...

www.mrexcel.com

which seems leads to a code solution here based on the little animation

Programmatically Resize Name Manager Dialog Box [SOLVED]

Hi All, I use Excel's built-in Name Manager a LOT! Each time Excel is started, the dimensions, column widths etc. of the Name Manager dialog box are reset to default values which (I suppose!) are stored somewhere. The problem is that these default values are unsuitable for me, and I would...

www.excelforum.com

A ton of code, which is usually what you get when using API's.
Good luck, but I think I'd use my own form if it did what I want.