Qual a unit do OLEobjects?

Recorro mais uma vz aos amigos do forum,
Qual a unit que devo declarar na secao uses para usar o funcao abaixo

const
olFolderContacts = $0000000A;
var
outlook, NameSpace, Contacts, Contact: OleVariant;
i: Integer;
begin
outlook := CreateOleObject(´Outlook.Application´); [color=red:09137fcf45][b:09137fcf45]//aqui da o erro[/b:09137fcf45][/color:09137fcf45]
NameSpace := outlook.GetNameSpace(´MAPI´);

Contacts := NameSpace.GetDefaultFolder(olFolderContacts);
for i := 1 to Contacts.Items.Count do
begin
Contact := Contacts.Items.Item(i);
{agora você precida ler as propriedades de contato. Por exemplo, nome completo e
endereço de email}
ShowMessage(Contact.FullName + ´ <´ + Contact.Email1Address + ´>´);
end;

Outlook := UnAssigned;
end;

deve ser a mesma para usar msWord ou o msExcel, mas Qual?

Um abraco e obrigado.