Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
2600 connectés 

  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Mettre une valeur dans un champ excel ...

 



 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Mettre une valeur dans un champ excel ...

n°452072
le duke
ça vous dérange si je fume ?
Posté le 09-07-2003 à 13:35:56  profilanswer
 

Salut tout le monde !!
Bon voilà j'étais parti sur un pgm vb sous excel mais c trop chiant donc ej me remets sur mon bon vieux delphi et decide, via des variants, de lancer excel à partir d'un pgm.
 
Tout se passe bien, l'ouverture du OLEObject, du workbooks, du worksheet, du cell mais quand je veux mettre un valeur dans un champ spécifier au préalable ben y'a rien qui se passe : voilà mon code :  
 
 
 
  vXLApplication := CreateOleObject('Excel.Application');
  vXLApplication.Visible := true;
  vXLWorkbooks := vXLApplication.Workbooks;
  vXLWorkbook := vXLWorkbooks.Add;
  sSheetName := 'Feuil2';
  vWorksheet := vXLWorkbook.WorkSheets[sSheetName];
  sCell := 'B2';
  vCell := vWorkSheet.range[sCell];
  sValue := Edit1.Text;
  vCell.value := sValue;
 
le "svalue" est non nul mais pourtant rien ne se passe sous excel .....
 
qu'est-ce que vous en pensez ?

mood
Publicité
Posté le 09-07-2003 à 13:35:56  profilanswer
 

n°453255
le duke
ça vous dérange si je fume ?
Posté le 10-07-2003 à 09:12:45  profilanswer
 

personne ?  
j'ai vraiment pas de pot moi !!!!!

n°454918
_gtm_
Posté le 11-07-2003 à 11:58:40  profilanswer
 

Moi je fais plutôt comme ça (j'ouvre un fichier et j'écris dedans):
 

Code :
  1. exc:OleVariant;
  2. exc:=createoleobject('excel.application');
  3. exc.workbooks.open(un_fichier);
  4. exc.goto('L'+inttostr(l+1)+'C'+inttostr(c+1)); 
  5. exc.activecell.value := 'quelque chose';


 
Ou alors avec un composant Excelapplication de l'onglet serveur. Ici je prends le fichier qui est ouvert et j'écris s dans L1C1.
 

Code :
  1. ExcelApplication1.Connect;
  2. ExcelApplication1.Goto_('L1C1');
  3. ExcelApplication1.ActiveCell.Value:=s;

 


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  Delphi/Pascal

  Mettre une valeur dans un champ excel ...

 

Sujets relatifs
Excel: comment lier une combobox aux alias ODBC?Mettre une image dans une image ....
[VBA] Executer une macro à l ouverture d'un fichier excel [resolu][Javascript] Mettre le focus sur un champ, mais avec un nom bizarre
prob upload champ dans BD à partir d'un formulaire[PHP] Cookie - ou je peut le mettre ??
[PHP] Récupérer la valeur d'un urlexcel:combobox
[VBA] Excel : comment tester la "visibilité" d'une cellule ? 
Plus de sujets relatifs à : Mettre une valeur dans un champ excel ...


Copyright © 1997-2018 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR