Hi All,

I am trying to get all the domain and project (respective of domain selected) in Excel Macro
Below is the code that i am using but giving the output as below

Domain:
D1
D1
D1
D1
D2

Project:
P1
P2
P3
(P1 to P3 are from D1)
P4 (P4 is from D2)

Dim QCConnection
‘Return the TDConnection object.
Set QCConnection = CreateObject("TDApiOle80.TDConnection")

Dim sUserName, sPassword
sUserName = txtUname.Text
sPassword = txtPass.Text
Application.ScreenUpdating = False

QCConnection.InitConnectionEx "http://tac-qc-prod.cibc.com/qcbin/"
QCConnection.Login sUserName, sPassword

For Each project In projectList
cmbdom.AddItem (project.DomainName)
cmbprj.AddItem (project.Name)

Next project

Debug.Print domaintext
Debug.Print Ptext
End Sub