ime lista v listbox

[gogi]

Pozdravljeni,
kako prenesemo imena listov (sheets) v listbox?
Hvala

[admin]

Skrajno preprosta

Koda: Izberi vse

    
  Dim sh As Worksheet
    
  For Each sh In Worksheets
      ListBox1.AddItem (sh.Name)
  Next

[gogi]

hvala