|
| Lire une image dans un fichier Excel |
| Started by Josian, Dec., 09 2016 6:57 PM - 5 replies |
| |
| | | |
|
| |
Registered member
26 messages
Popularité : +1 (1 vote) |
|
Posted on December, 09 2016 - 6:57 PM |
Bonsoir à tous,
Est-ce que quelqu'un à déjà du récupérer une image dans une cellule Excel ? Et surtout comment avez-vous fait ?
J'ai essayé en déclarant un XLSDocument, je lis bien toutes mes colonnes mais la photo : rien, chaine vide.
J'affecte ma colonne photo à une variable image ou à une colonne de table de type image mais je ne récupère rien...
imgPhoto est une Image = xlsDOC[1, "P"]
Dans mon Excel, si je Copie/Colle la photo sous paint je la récupère bien.
Merci par avance de votre aide. |
| |
| |
| | | |
|
| | |
| |
Posted on December, 10 2016 - 1:00 PM |
et avec un buffer, un variant ?
Le 12/9/2016 à 12:57 PM, Josian a écrit :
Bonsoir à tous, Est-ce que quelqu'un à déjà du récupérer une image dans une cellule Excel ? Et surtout comment avez-vous fait ? J'ai essayé en déclarant un XLSDocument, je lis bien toutes mes colonnes mais la photo : rien, chaine vide. J'affecte ma colonne photo à une variable image ou à une colonne de table de type image mais je ne récupère rien... imgPhoto est une image = xlsDOC[1, "P"] Dans mon Excel, si je Copie/Colle la photo sous paint je la récupère bien. Merci par avance de votre aide. |
| |
| |
| | | |
|
| | |
| |
Registered member
948 messages
Popularité : +11 (13 votes) |
|
Posted on January, 26 2022 - 5:08 PM |
Bonjour,
très vieux posts ... vous avez trouvé quelque chose ?
merci
OB |
| |
| |
| | | |
|
| | |
| |
Registered member
946 messages
Popularité : +102 (110 votes) |
|
Posted on January, 27 2022 - 2:22 PM |
| |
| |
| | | |
|
| | |
| |
Registered member
962 messages
Popularité : +183 (185 votes) |
|
Posted on January, 27 2022 - 2:54 PM |
hello,
comme le propose Philippe Pasquali il y a possibilité de faire cela avec Excel Automation si tu as Excel installé sur ton ordinateur mais le message initial Josian parle de xlsDocument donc en utilisant que windev . Obtuli tu es dans quel cas de figure ? Il y a aussi possibilité aussi d'utiliser openoffice automation si LibreOffice ou OpenOffice est installé sur l'ordinateur.
--
Ami calmant, J.P |
| |
| |
| | | |
|
| | |
| |
Registered member
189 messages
Popularité : +4 (8 votes) |
|
Posted on January, 27 2022 - 5:44 PM |
Bonjour,
Un petit exemple à adapter.
XLS est un objet Automation "Excel.Application"
MaCellule est un objet Automation dynamique
ficxls est un entier
XLS>>DisplayAlerts = False
ficxls = fCrée("monfichier.xls")
fFerme(ficxls)
ficnomxls est une chaîne=(fRepEnCours()+"\monfichier.xls")
XLS>>Visible=OLEFaux
XLS>>WorkBooks>>Open(ficnomxls)
XLS>>Range("A1")>>Select()
XLS>>Selection
XLS>>Selection>>Columns>>ColumnWidth = 22.29
XLS>>Selection>>Rows>>RowHeight = 89
MaCellule= XLS>>activeSheet>>Range("A1")
monimage est une chaîne="maphoto.jpg" // le chemin de ta photo
MaChaîne1 est une chaîne= "%1"
MonRésultat est une chaîne = ChaîneConstruit(MaChaîne1, monimage)
XLS>>ActiveSheet>>Shapes>>AddPicture(MonRésultat, False, True, ...
MaCellule>>Left+8,MaCellule>>Top+4,MaCellule>>Width,MaCellule>>Height)
XLS>>ActiveWorkBook>>SaveAs(ficnomxls,-4143)
XLS>>ActiveWorkBook>>close(ficnomxls) |
| |
| |
| | | |
|
| | | | |
| | |
|