Modifier valeur cellule Excel en VBA Access

Modifier valeur cellule Excel en VBA Access - VB/VBA/VBS - Programmation

Marsh Posté le 21-02-2018 à 12:47:50    

Bonjour à tous,

 

Je bosse sur Access et j'ai fait une macro VBA qui m'exporte une table (qui s'appelle 48475) et qui modifie la valeur d'une autre cellule dans le fichier excel (le but étant de faire des calculs sous excel pour récupérer ensuite des résultats dans Access).

 

L'export se passe bien, mais au moment de modifier ma case excel (qui s'appelle Date_dernier_Vendredi), j'obtiens une erreur d’exécution '91' "Variable object ou variable de bloc with non définie". (à la dernière ligne de code)

 

Même en essayant de simplement clearer la case il me sort cette erreur... Auriez vous une idée ?
Mon code est le suivant :

Code :
  1. Private Sub Commande51_Click()
  3. Dim Xl As Excel.Application
  4. Dim XlBook As Excel.Workbook
  6. Set Xl = CreateObject("Excel.Application" )
  7. Xl.Visible = True
  9. DoCmd.TransferSpreadsheet acExport, , "48475", "Mon fichier.xls", True, "Output_Valos"
  11. Xl.Workbooks.Open ("Mon fichier.xls" )
  13. XlBook.Application.Range("Date_dernier_Vendredi" ).Clear
  16. End Sub
 

Bonne journée !


Message édité par Slymous le 21-02-2018 à 13:00:24
Reply

Marsh Posté le 21-02-2018 à 12:47:50   

Reply

Marsh Posté le 21-02-2018 à 13:06:33    

Ligne 13, Xl au lieu de XlBook  :D

Reply

Sujets relatifs:

Leave a Replay

Make sure you enter the(*)required information where indicate.HTML code is not allowed