Una volta aperto un file con estensione .rtf, come copio tutto il testo negli appunti con l'oggetto clipboard?

ecco il codice che ho provato a fare:

codice:
Open App.Path & "\miofile.rtf" For Output As 1

Clipboard.Clear

'.....continuate voi.... :adhone:
ditemi anche se l'istruzione open è impostata correttamente, per copiare negli appunti, è giusta la modalità Output?

A cosa corrisponde il "numero file"?

grazie