Problème update avec les guillemets

Bonjour,

J'ai un table (Table1) avec 2 colonnes (ID,Libelle)
---------------------------------------------------------------------------
ID | Libelle
---------------------------------------------------------------------------
0001 | bonjour c'est un "test" que je suis en train de réaliser.
---------------------------------------------------------------------------

J'ai une autre table (Table2) VIERGE avec 2 colonnes (ID, Libelle)
Au début je crée une requête INSERT pour créer une ligne dans la table2. ce qui me fait :
---------------------------------------------------------------------------
ID | Libelle
---------------------------------------------------------------------------
0001 |
---------------------------------------------------------------------------
Je voudrais faire un UPDATE VBA de ma ligne dans la table2 à partir de table1 donc :
Déclaration des mes objets ADODB blablabla ... blablabla ...

Ct.Open "MaConnexion"
Rs.Open "select * from Table1 where ID=1"
Cd.CommandText = "UPDATE Table2 SET Libelle=""" & rs("Libelle").value & """ where ID = 0001"
Cd.CommandType = 1
Cd.Execute

Fermeture des mes objets blablabla blablabla ...

VOICI MON PROBLEME :
Cette fonction VBA fonctionne très bien mais SI j'ai un libellé où la valeur contient des guillemets alors une erreur intervient.

COMMENT FAIRE POUR REMEDIER A CE PROBLEME DE GUILLEMETS ?

PS : Je sais que certaines personnes vont me dire qu'il faut que je fasse différemment mais il faut absolument traiter mon problème dans le contexte que j'ai donné.

En vous remerciant d'avance.