XL pour MAC ISBN

GGFuveau

XLDnaute Nouveau
Supporter XLD
Bonjour.
Je ne suis pas un expert en Excel, juste un utilisateur "averti". Je débute sur Excel Downloads et j'ai l'impression que c'est d'une grande richesse.
Je dois gérer des inventaires de livres pour une association qui organise un salon littéraire. Je peux scanner et importer dans un fichier Excel le code ISBN, mais je ne sais pas remplir automatiquement les informations du livre (titre auteur etc.) Merci beaucoup pour votre aide. Gérard
 
Solution
Bonsoir et merci pour votre aide !
Un ami a finalement trouvé la bonne syntaxe pour la commande Curl sur MAC :

En VBA :
#If MAC Then
Function GetBookFromISBN(ISBN As String) As String
Dim sCmd As String
Dim sResult As String
Dim lExitCode As Long

Const Url = "https://www.googleapis.com/books/v1/volumes?q=isbn13=<ISBN>"

sCmd = "curl " & Chr(34) & Replace(Url, "ISBN", ISBN) & Chr(34)

sResult = execShell(sCmd, lExitCode)

' ToDo check lExitCode
GetBookFromISBN = sResult

End Function
#End If

Ce qui produit des lignes de commande de ce genre (contenu de sCmd) :

curl...

GGFuveau

XLDnaute Nouveau
Supporter XLD
Merci ! ça a l'air prometteur. Je ne suis pas spécialiste API, mais j'ai un message d'erreur "Erreur d'exécution 429 Un composant ActiveX ne peut pas créer d'objet" quand je lance le test. Quand je lance alors "débogage", je vois apparaître "Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1") surligné en jaune. Dedans je vois WinHttp, est-ce que ce serait lié au fait que j'utilise Microsoft Office 365 pour Mac ? (version Excel 16.57). Si je vais dans "Aide", j'arrive sur une page que malheureusement je ne comprends pas bien : https://learn.microsoft.com/fr-fr/o...ct-or-return-reference-to-this-object-error-4 Aurais-tu encore une idée ?
Bonne soirée, et merci encore pour ton aide. GS
 
Dernière édition:

GGFuveau

XLDnaute Nouveau
Supporter XLD
merci, j'ai essayé, je n'ai plus le message d'erreur précédent, mais ceci : "Microsoft Visual Basic erreur de compilation - le code de ce projet doit être mis à jour pour une utilisation sur des systèmes 64 bits. Veuillez vérifier et mettre à jour les instructions Déclarer puis marquez-les avec l'attribut PtrSafe". J'avoue que je suis encore loin de saisir, mais ça me semble différent d'une erreur. Merci encore pour le temps que tu donnes. Bonne soirée, GS
 

GGFuveau

XLDnaute Nouveau
Supporter XLD
J'avoue ne pas connaître PtrSafe. J'ai essayé ton nouvel envoi, mais ce coup ci ça plante Excel qui se ferme avec le message d'erreur bien poli "Nous avons rencontré un problème avec Microsoft Excel. Veuillez nous excuser pour la gêne occasionnée. Microsoft Excel tentera de récupérer votre travail" ... GS
 

Statistiques des forums

Discussions
312 229
Messages
2 086 423
Membres
103 206
dernier inscrit
diambote