Red de conocimiento informático - Material del sitio web - Cómo abrir Excel usando vbs.

Cómo abrir Excel usando vbs.

Métodos comunes para abrir Excel en VBS

¿atenuar oExcel, oWb, oSheet?

¿Establecer oExcel= CreateObject("Excel.Application")?

¿Establecer oWb = oExcel.Workbooks.Open("E:\Others\New Installed Phone Sheet.xls")?

¿Establecer oSheet = oWb.Sheets("Hoja1")?

MsgBox oSheet.Range("B2").Value '#¿Extraer el contenido de la celda B2?

'.....?

Si es un XP sistema, puede utilizar el siguiente código:

Dim objFileDlg?

Set objFileDlg = CreateObject("UserAccounts.CommonDialog")?

objFileDlg.Filter = " ¿Archivo Excel (*.xls) | *.xls"?

Si objFileDlg.ShowOpen ¿entonces?

msgbox "El archivo que seleccionó es:" amp; objFileDlg.FileName amp; vbCrLf ?

¿Finalizar si?