Office: Daten aus EXCEL in Bloomberg

Schönen Nachmittag,

ich habe folgendes Problem:

In meinem EXCEL 2013 habe ich in Zelle A1 habe ich eine Wertpapierkennnummer stehen. Über ein Makro kann ich in das Nachrichtensystem Bloomberg switchen und mir z.B. die Beschreibung des Wertpapieres ansehen. Wie mache ich dem Makro klar, daß wenn ich auf B1 eine weitere andere Kennnummer stehen habe, er B1 als Bezugsquelle nehmen soll und nicht A1. Das Makro sieht wie folgt aus:
Blp = DDEInitiate("Winblp", "bbk")
Call DDEExecute(Blp, "<Blp-1>" & Range("A1").Text & "<Corp>DES<GO>")
Call DDETerminate(Blp)

durch was muß ich den Teil Range("A1") ersetzen?

Nochmals zur Veranschaulichung:
In A1 steht DE0001135283, im Bloomberg kommt bei Ausführung des Makros an: DE0001135283 Corp DES und ich sehe die Beschreibung.
In B1 steht DE0001135291, im Bloomberg soll bei Ausführung des Makros ankommen: DE0001135291 Corp DES und ich sehe die Beschreibung.

Vielen Dank im voraus

Albert

 

Habe mein Problem selber lösen können. Makro muß beginnen mit
Zeilennummer = ActiveCell.Row
Und Range("A1") wird ersetzt durch Cells(Zeilennummer, 1)

Dann geht es

Bis dann

Albert