Discussion :

[Ratafia67]

Bonjour,

J'ai besoin de créer puis de mettre à jour un classeur Excel à partir d'une application Windev.
J'aimerais copier une feuille dans le même classeur.
L'instruction xl>>ActiveSheet>>Copy() copie bien la feuille mais dans un nouveau classeur.
Est-ce que quelqu'un connaît le paramètre afin de dire que la feuille doit être copiée dans le classeur actif ?
Merci

[klbsjpolp]

Bonjour,

bien que quelqu'un dans ce forum puisse avoir la réponse, je pense que c'est une question concernant Excel plutôt que Windev.

[vmolines]

Regardez la documentation des éléments que vous utilisez, l'automation office est très bien documentée :

excel worksheet copy - Recherche Google


1er résultat :

Si vous ne spécifiez pas Before ou After, Microsoft Office Excel crée un nouveau classeur qui contient la feuille copiée.

Source :
http://msdn.microsoft.com/fr-fr/libr...py(VS.80).aspx

[Ratafia67]

Bonjour,

J'ai testé avec l'argument before :
xl>>Sheets("modele")>>Select
xl>>Sheets("modele")>>Copy(Before)

mais j'obtiens le message d'erreur suivant :
"L'élément 'Before' est inconnu"

Si je fais :
xl>>Sheets("modele")>>Copy("Before")

J'ai l'erreur :
Vous avez appelé la méthode Automation 'Copy' Erreur 800A03EC
Impossible de lire la propriété Copy de la classe Worksheet
La méthode Copy de la classe Worksheet a échoué
Impossible de définir la propriété Copy de la clase Worksheet

Est-ce que vous connaîtriez la syntaxe exacte à utiliser ?

Merci

[hpascal]

Bonjour

Voici une syntaxe qui fonctionne pour le Before, pour le After je n'ai pas cherché plus

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
oXls est un objet OLE "Excel.Application"
 
QUAND EXCEPTION
   Erreur(ExceptionInfo())
FIN
 
oXls>>Workbooks>>Add()
oXls>>visible=OLEVrai
 
// Copie de Feuil1 avant Feuil3
oXls>>Sheets("Feuil1")>>Copy(oXls>>Sheets("Feuil3"))
 
// On peut utiliser aussi la position
oXls>>Sheets("Feuil1")>>Copy(oXls>>Sheets(3))

[Ratafia67]

Bonjour,

Merci beaucoup hpascal, cela fonctionne très bien.