mr.300さん、こんばんは。

＞wb = excel.Workbooks.open(\"sample_data.xls\")   // Excel ファイルのオープン
＞excel.visible= true
＞
＞ws = wb.Activesheet  
＞ws.sheets(\"10月\").select     <=ここでエラーになります。

Excel VBAの資料をよく読みましょう。
WorksheetクラスにSheetsプロパティはありません。

Workbook.Sheets(\"シート名\") で目的のオブジェクトを参照できます。
それを選択するのはプロパティではなく関数なので .Select() とします。

wb.sheets(\"10月\").select()

目的のシートがあれば良いのですが、存在しない場合Null参照でエラーになるので

oleobject obj
obj = wb.sheets(\"10月\")
if not isNull(obj) then
　obj.select()
else
　MessageBox(\"\",\"10月が見つからない。\")
end if

としておくと良いです。