Accueil > Forum > > > > Excel et cellule de type LiCi au lieu de Ai
Excel et cellule de type LiCi au lieu de Ai
mardi 23 octobre 2007 à 13:57:20 |
Excel et cellule de type LiCi au lieu de Ai

furax13
|
bonjour, je désire piloter Excel depuis une application Delphi.
j'ai fait une partie du code qui ouvre un fichier excel, récupère dans le fichier excel le nombre de valeurs par données et le nombre de données à récupérer.
Ensuite, je désire lire en une seule fois la plage de valeurs comprise entre 2 cellules. Cela marche parfaitement avec la notation suivante : cellDebut := 'D12'; cellFin := 'CT545';
mais j'aimerais le faire fonctionner avec la notation L12C4 eà L545C98 Comment faire ?
Ci-joint le code : ExcelApplication1.Connect; ExcelApplication1.ReferenceStyle[xlR1C1]; MonClasseur := ExcelApplication1.Workbooks.Open('l:\bremen_trial3_5-6_5coils_normalized_EMO.xls', False, False, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, EmptyParam, 0);
ExcelApplication1.Visible[0] := true; MaFeuille := MonClasseur.Worksheets[1] AS _worksheet;
cellDebut := 'L'+ IntToStr(PremiereLigne) + 'C' + IntToStr(ColonneTemps); colFin := nbDataReal +ColonneTemps; ligneFin := PremiereLigne +nbColonnesTotal; cellFin := 'L'+ IntToStr(ligneFin-1) + 'C' + IntToStr(colFin);
//cellDebut := 'D12'; //cellFin := 'CT545';
Resultat := MaFeuille.Range[cellDebut, cellFin].Value; FOR comptLig := 1 TO VarArrayHighBound(Resultat, 1) DO FOR comptCol := 1 TO VarArrayHighBound(Resultat, 2) DO begin mesValeurs[comptlig,comptcol] := Resultat[comptlig, comptcol]; Resultat[comptlig, comptcol] := Resultat[comptlig, comptcol] * 3 + 2; StatusBar1.SimpleText := IntToStr(Resultat[comptlig, comptcol]) + ' valeurs pour ' + IntToStr(comptLig) + ' ligne' + IntToStr(comptCol) + ' colonnes'; end; MaFeuille.Range[cellDebut, cellFin].Value := Resultat; ExcelApplication1.disConnect;
merci pour votre aide
|
|
mardi 23 octobre 2007 à 15:20:11 |
Re : Excel et cellule de type LiCi au lieu de Ai

pers
|
Salut
Au lieu de "Range" il me semble plus simple d'utiliser "Cells(column,row)" dans les boucles 'For'
@+
|
|
mardi 23 octobre 2007 à 15:22:30 |
Re : Excel et cellule de type LiCi au lieu de Ai

furax13
|
En utilisant Cells, le problème est celui des performances.
|
|
mardi 23 octobre 2007 à 15:22:54 |
Re : Excel et cellule de type LiCi au lieu de Ai

pers
|
pardon "Cells[column,row]"
|
|
mardi 23 octobre 2007 à 15:24:09 |
Re : Excel et cellule de type LiCi au lieu de Ai

pers
|
Ah ... à ce point là ??
|
|
Cette discussion est classée dans : resultat, inttostr, emptyparam, comptcol, comptlig
Répondre à ce message
Sujets en rapport avec ce message
Sql et Bdd [ par viper ]
Je cherche depuis qq temps à récupérer le resultat d'une requet SQL avec un TQuery et une base de donnée mais sans succès...J'aimerais donc savoir com
Savegarder les resultat de requetes [ par liangyu ]
J'ai une interface qui afficher les résultat d'une requete sur une base de donnée. Je voudrais enregistrer cette interface ou les résultat en RTFou PD
variable dans le nom d'un composant [ par thonyboy ]
Bonjour,Je cherche a faire un truc du genre :Supposons X composants Tlabels et 1 variable ICase of I 1: Tlabel1.caption := 'Label1' 2: Tlabel2.capti
Problème avec Emptyparam [ par didyer ]
Bonjour,J'ai placé un composant TWordApplication sur une fiche et un boutonEn réponse au Click du bouton, j'ai écrit les lignes suivantes:if opendialo
Probleme de Conversion RGB en Color [ par Lennemi ]
Lorsque je selection une couleur de mon TColorDialog, peu importe la couleur choisi y me retournera toujours les valeurs suivante :R = 212G = 208B = 2
faire de probabilité avec VBA [ par imsse ]
SAlut a tous Voila j'ai une certain nombre de listes deroulante(comboxbox) qui sont soit "vide" , soit "plein".En fonction de cela et selon la ou les
Comment dupliquer une base de données avec une requette SQL [ par thonyboy ]
BonjourJ'utilise delphi 7 et j'aimerais connaitre le moyen le plus simple pour enregistrer le resultat d'une requette SQL dans une base de données.Voi
enregistrer dans un format html avec word [ par jobtunisieyasser ]
DocWord.SaveAs(F_H, wdFormatHTML ,EmptyParam, EmptyParam,EmptyParam,EmptyParam,EmptyParam, EmptyPara
Help : Excel veut pas ouvrir mon fichier [ par Banban113 ]
Bijour tout le monde !!!!!Bon Banban est encore dans la merdeVoila je veux faire mumuse avec Excel depuis Delphi 7 mais ce pignouf m'affiche une erreu
Application ne fonctionnant que sur le PC où je développe. [ par blood01 ]
Bonjour à tous,Je suis en train de développer un logiciel permettant d'envoyer des données dans EXCEL. Apres traitement, je récupère les résultats et
Livres en rapport
|
Derniers Blogs
[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL?[WF4] UN BINDING ACTIVITY/ACTIVITYDESIGNER QUI PASSE MAL? par JeremyJeanson
Certain d'entre vous on peut être vécu cette situation embarrassante après quelques temps passer avec WF4 : Au début avec mon " ActivityDesigner" , tout allait bien. Et puis un jour j'ai au des problèmes de " Binding" . Alors nous sommes allé sur le site ...
Cliquez pour lire la suite de l'article par JeremyJeanson MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ?MYTIC - SHAREPOINT 2010 : DéJà UN MYTHE MICROSOFT ? par junarnoalg
La prochaine session de MyTIC aura lieu à Namur, le 23 mars prochain. Pendant presque une heure, nous parlerons de SharePoint 2010. Voici un aperçu du programme.
Accueil : 17h30 Début de la session : 18h00 - Les nouvelles int...
Cliquez pour lire la suite de l'article par junarnoalg [MIX10] KEYNOTE DEUXIèME JOURNéE - INTERNET EXPLORER 9, HTML5, VISUAL STUDIO 2010, ODATA[MIX10] KEYNOTE DEUXIèME JOURNéE - INTERNET EXPLORER 9, HTML5, VISUAL STUDIO 2010, ODATA par cyril
Le deuxième keynote du mix fut très riche en contenu. Internet Explorer 9 Juste un après le lancement de Internet Explorer 8, Microsoft a dévoilé les nouveautés de Internet Explorer 9. Désormais, IE supportera HTML5, SVG et CSS3. L'élément ...
Cliquez pour lire la suite de l'article par cyril
Logiciels
Academy System (10.9.4.0)ACADEMY SYSTEM (10.9.4.0)Logiciel de gestion des établissements.
- élèves/étudiants (inscription, dossier, absence...)
-... Cliquez pour télécharger Academy System Xilisoft Convertisseur Vidéo Ultimate (5.1.39.0305)XILISOFT CONVERTISSEUR VIDéO ULTIMATE (5.1.39.0305)Xilisoft Convertisseur Vidéo Ultimate est un outil puissant de conversion vidéo, facile à utilise... Cliquez pour télécharger Xilisoft Convertisseur Vidéo Ultimate Xilisoft DVD Ripper Ultimate (5.0.64.0304)XILISOFT DVD RIPPER ULTIMATE (5.0.64.0304)Xilisoft DVD Ripper Ultimate est un logiciel excellent pour copier et convertir DVD vers presque ... Cliquez pour télécharger Xilisoft DVD Ripper Ultimate Rigs of Rods (63.3)RIGS OF RODS (63.3)c'est un jeu de multi-simulation camions,autobus voitures, avions, bateaux, hélicoptère avec défo... Cliquez pour télécharger Rigs of Rods
|