Pilotage Excel via OLE
Stagiaire WDF
Inscrit:
05/06/2006 14:45
Post(s): 2
Bonjour à tous,


J'ai un problème pour piloter excel via windev.
Je dois en fait transférer le contenu d'un tableau dans un fichier excel existant et mise à part le copier coller ligne à ligne qui est très lent, je me casse la tête pour savoir s'il est possible de transférer le contenu du tableau complet en une fois.

Est-ce que quelqu'un aurait une idée.

Merci d'avance pour votre aide

voici le code que j'utilise actuellement


PROCEDURE Excel::versligne(Premiere_col="A",lig=1,Valeur="")
//valeur est la ligne à insérer dans excel -> séparée par des tab

cNewValue est une chaîne

cNewValue = Valeur
Premiere_col = Majuscule(Premiere_col)

cNewValue = Remplace(Valeur,"'","")
cNewValue = Remplace(cNewValue,"""","")

VersPressePapier(cNewValue)

:OLEExcel>>range(Premiere_col+lig)>>select()

:OLEExcel>>Activesheet>>Paste()


Contribution le : 05/06/2006 14:56
Créer un fichier PDF de la contribution Imprimer


Re: Pilotage Excel via OLE
Animateur WDF
Inscrit:
02/03/2003 04:07
De Noisy le grand(93)
Post(s): 2745
Bonjour,

Un peu plus explicite si vous désirez avoir une réponse, je pense que la question est mal comprise.

Contribution le : 06/06/2006 14:18
_________________
@A+
Contact (privé)......
email : drcharly@wdforge.org
[DrCharly93]
Créer un fichier PDF de la contribution Imprimer


Re: Pilotage Excel via OLE
ChefDeProjet WDF
Inscrit:
02/05/2006 21:28
Post(s): 160
tableversexcel() devrait faire ça très bien et tout seul

Contribution le : 06/06/2006 20:40
Créer un fichier PDF de la contribution Imprimer


Re: Pilotage Excel via OLE
Stagiaire WDF
Inscrit:
05/06/2006 14:45
Post(s): 2
Tableversexcel le fait mais le problème est qu'il écrase le fichier si il existe déjà moi je veux pouvoir envoyer le contenu de mon tableau dans un fichier excel existant qui contient tout une série de macro.

Je voudrait simplement trouver la commande ole excel qui me permet de "cracher" le contenu d'un tableau windev dans une sheet excel. Je sais le faire cellule par cellule via un formulaR1C1 ou un range()>>value = ... mais c'est super lent.

J'aimerais en gros le faire en une opération et ma question était surtout de savoir si c'était possible et si oui comment.

Merci à tous.

J'espère avoir été un peu plus clair

Contribution le : 07/06/2006 15:33
Créer un fichier PDF de la contribution Imprimer


Re: Pilotage Excel via OLE
DSI WDF
Inscrit:
03/12/2004 07:46
Post(s): 235
Pourquoi ne déclature pas ton fichier Excel directement dans l'analyse (Drag & drop du fichier) ?
et ensuite du fait ce que tu veux avec les fonctions classiques HAjoute, HModifie, ...
C'est tellement plus simple

Contribution le : 08/06/2006 07:45
Créer un fichier PDF de la contribution Imprimer


Re: Pilotage Excel via OLE
Animateur WDF
Inscrit:
26/06/2002 16:24
De wdforge.org
Post(s): 2822
... et si votre analyse est déjà figée, une piste non testées par mes soins, serait de le déclarer comme une source de données et la brancher sur le classeur. La suite est de l'hyperfile !

Contribution le : 08/06/2006 08:35
_________________
R&B
Contact, CV.
Créer un fichier PDF de la contribution Imprimer


Re: Pilotage Excel via OLE
Anonyme
Non en fait ça ne m'arrange pas trop, car le fichier doit être référencé au moment de l'envoie des données donc l'utilisateur doit pouvoir mettre son fichier où il veut, ce fichier excel n'est jamais pareil en plus, c'est un template comprenant des macro. Moi je veux juste pouvoir envoyer en une fois un tableau dans une sheet excel existante c tout.

Je sais que c'est faisable en lotus notes, c'est plus ou moins pareil à du vb script, tu déclares un array avec tes data et tu le passes le tout en bloc à excel via ole.

Merci qd même, je continue mes recherches et si je trouve je vous le fais savoir. Si vous avez plus d'ifo n'hésitez pas

Contribution le : 08/06/2006 08:47
Créer un fichier PDF de la contribution Imprimer


Re: Pilotage Excel via OLE
Animateur WDF
Inscrit:
26/06/2002 16:24
De wdforge.org
Post(s): 2822
J'ai la macro suivante qui sélectionne toute le range de totes les cellules d'une fenêtre. Cela peut accélerer les choses.

' compteur cellules
' Ligs = nombre de lignes
' cols = nombre de colonne
Dim ligs As Integer
Dim cols As Integer
ligs = ActiveWorkbook.ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).Rows.Count()
cols = ActiveWorkbook.ActiveSheet.UsedRange.SpecialCells(xlCellTypeVisible).Columns.Count()
' Sélectionne le tout !
Range("A1").Select
Range(Selection, ActiveCell.SpecialCells(xlLastCell)).Select
' autre méthode
Range(Cells(1, 1), Cells(ligs, cols)).Select


bon courage.

ps : je découvre, pour l'occasion, que Ooo ouvre les classeur MSOffice et peut en lire les macros !

Contribution le : 08/06/2006 21:03
_________________
R&B
Contact, CV.
Créer un fichier PDF de la contribution Imprimer


Re: Pilotage Excel via OLE
Developpeur WDF
Inscrit:
02/05/2003 09:10
Post(s): 103
je pense qu'il faut simplement ouvrir le fichier Excel,

copier les données du programme Windev dans le presse papier. --> MonObjetExcel>>ActiveSheet>>Cells(1,1)>>Select

sélectionner la cellule a partir de laquelle on veut coller le presse papier sous excell.

et faire un paste --> MonObjetExcel>>ActiveSheet>>Paste

ps: je vous ajoute un code, si ca vous interresse que j'utilise pour exporter une table mémoire vers Excell en faisant un resize des colonnes.

@+
Geo.

Attacher un fichier:


txt export.txt Taille: 4.89 KB; Hits: 405

Contribution le : 20/06/2006 10:31
Créer un fichier PDF de la contribution Imprimer



 Haut   Précédent   Suivant




Enregistrer votre réponse
CompteNom   Mot de passe   Authentification
Message:


Vous ne pouvez pas débuter de nouveaux sujets.
Vous pouvez voir les sujets.
Vous ne pouvez pas répondre aux contributions.
Vous ne pouvez pas éditer vos contributions.
Vous ne pouvez pas effacez vos contributions.
Vous ne pouvez pas ajouter de nouveaux sondages.
Vous ne pouvez pas voter en sondage.
Vous ne pouvez pas attacher des fichiers à vos contributions.
Vous ne pouvez pas poster sans approbation.

[Recherche avancée]


Connexion
Menu
Chercher WDForge
Chercher Web
Partenaires
Visualiser tous les Partenaires...
WinDev, WebDev, WinDev Mobile et HyperFile sont des marques déposées par PCSoft. |  Voter |  Legal |  Contact |   XOOPS 2.0.13.2