UserFormでlistBoxにシート名を表示 選択したシートに処理 【MAIN】 Private Sub mth_Main() '============================ '// WorkSheet '============================ Dim ListNo As Long ListNo = Me.lst_Sht.ListIndex If ListNo < 0 Then MsgBox "い…