要刷新工作簿，可以使用Excel VBA代码来调用Bloomberg的刷新功能。下面是一个示例代码，演示了如何使用Bloomberg API刷新工作簿中的数据：

Sub RefreshBloombergData()
    Dim blp As Object
    Dim ws As Worksheet
    
    ' 创建Bloomberg对象
    Set blp = CreateObject("Bloomberg.Data.1")
    
    ' 设置工作表
    Set ws = ThisWorkbook.Worksheets("Sheet1")
    
    ' 定义需要刷新的数据范围（比如A1:D10）
    Dim dataRange As Range
    Set dataRange = ws.Range("A1:D10")
    
    ' 设置Bloomberg数据的请求字符串（比如"BDP(AAPL US Equity, LAST_PRICE)"）
    Dim requestData As String
    requestData = "BDP(AAPL US Equity, LAST_PRICE)"
    
    ' 调用Bloomberg API刷新数据
    blp.Refresh requestData, dataRange
    
    ' 释放对象
    Set blp = Nothing
End Sub

在这个示例代码中，我们首先创建了一个Bloomberg对象，然后设置了需要刷新的工作表，接着定义了需要刷新的数据范围，最后设置了Bloomberg数据的请求字符串。使用blp.Refresh方法来刷新数据，并将结果存储在指定的数据范围内。

请注意，在运行此代码之前，您需要安装并启动Bloomberg终端软件，并确保已经使用正确的Bloomberg API密钥进行身份验证。

希望这个示例代码对您有所帮助！