1
clic en la pestaña " Herramientas de base de datos" , haga clic en "Visual Basic ", y haga clic en el menú " Insertar". Haga clic en " módulos" para insertar un nuevo módulo de código VBA.
2 Haga clic en el menú " Herramientas" y haga clic en "Referencias ". Marque la casilla junto a " Excel inicio escribiendo el siguiente código para crear un nuevo sub procedimiento : updateSpreadSheet Private Sub () On Error GoTo Err_updateSpreadSheet : Escriba el siguiente código para crear el libro y los objetos de hoja de cálculo : xlSheet As Excel.Worksheet abrir un libro de Excel existente y utilizar Sheet1 como la hoja de actualizar añadiendo el siguiente código: Set wkBkObj = Workbooks.Open ("C: \\ mySpreadsheet.xlsx " ) Set xlSheet = wkBkObj.Worksheets ( "Sheet1 ") ( 1 ) . Visible = True Agregue el siguiente código de VBA para actualizar A1 de la hoja de cálculo : . . xlSheet Range (" A1") Seleccione . Range (" A1") . valor = " valor actualizado de acceso" End con fotos de 7 Guardar , cerrar el libro de Excel, y al final del procedimiento añadiendo el siguiente código: wkBkObj.Save wkBkObj.Close Exit_updateSpreadSheet : Exit Sub Err_updateSpreadSheet : Err.Description Reanudar Exit_updateSpreadSheet : End Sub Press "F5 " para ejecutar el procedimiento y actualizar la hoja de cálculo < br . >
4
< p> wkBkObj As Excel.Workbook
5
wkBkObj.Windows
6
MsgBox
8