Excel免费函数库来了，多种实用函数一睹为快

jok22

流氓插件………………

小小小豹猫

怒赞。网上其他的翻译基本都是失效的。只有这里的一直在维护！

lovesjh

楼主好，为什么getbook 函数查找都是error

ExcelAPInet

lovesjh 发表于 2018-7-25 16:29
楼主好，为什么getbook 函数查找都是error

GetBook(ISBN,"title")函数使用的是豆瓣网查询接口，如果返回错误，请检查豆瓣网是否存在该图书，检查方法如下：https://api.douban.com/v2/book/isbn/:9787111529385

擎、天

ExcelAPInet 发表于 2017-12-13 09:37
斑竹大人，是我建的。

1. Function bdfy(myV As String) As String  '百度翻译
   
2. 'On Error GoTo line
   
3.   Set oDoc = CreateObject("htmlfile")
   
4.   With CreateObject("Microsoft.XMLHTTP")
   
5.     Set X = CreateObject("msscriptcontrol.scriptcontrol")
   
6.     X.Language = "JavaScript"
   
7.     .Open "POST", "http://fanyi.baidu.com/transapi", False
   
8.     .setRequestHeader "Referer", "http://fanyi.baidu.com/#en/zh/"
   
9.     .setRequestHeader "x-requested-with", "XMLHttpRequest"
   
10.     .setRequestHeader "Content-Type", "application/x-www-form-urlencoded; charset=UTF-8"
    
11.     .setRequestHeader "Connection", "Keep-Alive"
    
12.     .send "from=en&to=zh&query=" & Replace(myV, " ", "+")
    
13.     tt = "a=" & .responseText
    
14.     X.addcode tt
    
15.     bdfy = X.eval("a.data[0].dst")
    
16.   End With
    
17. 'line:
    
18.   
    
19. End Function

复制代码

请教下我这段出问题了，该怎么改

zxrsnake02

暂时用不上，mark一下

shaobl

太给力了, 希望作者能够继续更新维护~~
加油~

ExcelAPInet

shaobl 发表于 2018-9-24 21:26
太给力了, 希望作者能够继续更新维护~~
加油~

感谢关注，大家的理解是我坚持的动力。

23382958395

我安装时提示未检测到excel 版本，请重试。什么问题？

ExcelAPInet

23382958395 发表于 2018-10-3 16:08
我安装时提示未检测到excel 版本，请重试。什么问题？

如果确认已经安装了Office，可以下载离线版，独立安装。