[Résolu][Calc] Variable non définie

[Claudius723]

Bonjour, je ne trouve pas la solution pour exécuter une macro qui ne fonctionne pas dans un fichier mais qui fonctionne dans un autre fichier avec les mêmes données, message d'erreur "Erreur d'exécution Basic, variable non définie"
Celle qui fonctionne:

Code : Tout sélectionner

Sub ChoixVins
GlobalScope.BasicLibraries.loadLibrary ("zBasic")
      oTableDepart=zPlage.VersTable("A3:F3", "Interface2")
       nLigne=zPlage.LigneVide("ListeVins2", "A2:F100")
      zTable.Ecrit("ListeVins2", "A" & nLigne, oTableDepart)

Celle qui ne fonctionne pas :

Code : Tout sélectionner

Sub EnregistrerSaisieVins
GlobalScope.BasicLibraries.loadLibrary ("zBasic")
     oPlageCopie = "A35:F35"
     oFeuilleCopie = "Interface"
      oTableDepart=zPlage.VersTable(oPlageCopie, oFeuilleCopie)
       nLigne=zPlage.LigneVide("ListeVins", "A2:F100")
      zTable.Ecrit("ListeVins", "A" & nLigne, oTableDepart)
End sub

Merci à ceux qui me donneront la solution, la deuxième macro est détaillée, mais cela ne change rien.

[Dude]

Salut,

Celle qui ne fonctionne pas :

Ca ne fonctionne pas sur ton classeur parce qu'il n'y a pas de feuille nommée "Interface", pas plus que "Liste Vins" d'ailleurs :

capture.png

[Claudius723]

La première macro "ChoixVins" est associée au classeur joint, _ListeVins2 et Interface2_, (il y a 2 classeurs) je ne peut malheureusement pas joindre le fichier de la deuxième macro car trop lourd, mais c'est les mêmes paramètres, et celle ci ne veut pas fonctionner

[Dude]

A quoi cela sert de remettre un 2e classeur avec les mêmes noms de feuille ?
Nous joindre quelque chose qui fonctionne n'avancera pas à grand chose.

[Tad]

et en ajoutant ceci

Code : Tout sélectionner

Dim oPlageCopie as object
dim oFeuilleCopie as object

dans les définitions de la macro ?

[Bidouille]

Dernière visite : 09 sept. 2024 07:31

Réponses lues et aucune nouvelle > fil clos