下面是使用Bloomberg API和Excel VBA计算债券到期的预期总回报的示例代码：

首先，确保已安装并启用了Bloomberg Excel插件。然后，在Excel中按下Alt + F11打开Visual Basic for Applications（VBA）编辑器。

在VBA编辑器中，选择“插入”>“模块”，然后将以下代码粘贴到新模块中：

' 设置对Bloomberg对象的引用
Dim Bloomberg As Object
Set Bloomberg = CreateObject("Bloomberg.API.1")

Sub CalculateBondTotalReturn()
    ' 定义所需的变量
    Dim Security As String
    Dim StartDate As Date
    Dim EndDate As Date
    Dim Price As Double
    Dim Coupon As Double
    Dim FaceValue As Double
    Dim TotalReturn As Double
    
    ' 设置债券相关参数
    Security = "US912828V550"
    StartDate = DateSerial(2021, 1, 1)
    EndDate = DateSerial(2022, 1, 1)
    Price = 100.0
    Coupon = 2.0
    FaceValue = 100.0
    
    ' 连接到Bloomberg
    Bloomberg.EnableAutoLogin = True
    Bloomberg.Start
    
    ' 获取债券的到期总回报
    TotalReturn = Bloomberg.Bond.TotalReturn(Security, StartDate, EndDate, Price, Coupon, FaceValue)
    
    ' 在单元格A1中显示结果
    Range("A1").Value = TotalReturn
    
    ' 断开与Bloomberg的连接
    Bloomberg.Stop
End Sub

请注意，上述代码中的Security、StartDate、EndDate、Price、Coupon和FaceValue是示例参数。您需要根据您要计算预期总回报的实际债券的信息进行相应更改。

完成后，关闭VBA编辑器。然后，在Excel中选择一个单元格，输入“=CalculateBondTotalReturn()”（不包括引号），然后按Enter键。这将调用CalculateBondTotalReturn子过程，并在单元格A1中显示计算得到的债券到期的预期总回报。

请注意，此示例代码仅用于演示目的。在实际使用中，您可能需要添加错误处理和其他逻辑来适应不同的情况和需求。