The created codes is to list worksheets name on listbox and combobox :“…Dim sayfa As Integer For sayfa = 1 To Sheets.Count ListBox1.AddItem Sheets(sayfa).Name ComboBox1.AddItem Sheets(sayfa).Name Next sayfa….“