Excel のシート名を列挙する (ADO) lesson007.vbs Dim cn' As ADODB.Connection Set cn = CreateObject("ADODB.Connection") With cn .Provider = "Microsoft.Jet.OLEDB.4.0" .ConnectionString = "Data Source=" & WScript.Arguments(0) & ";Extended Prope…