PB : VBA fichier intranet

Bonjour,

Je suis debutante en VBA j'ai pratiqué un peu en cours mais pas plus. Je voudrais trier un base de donnée que j'extrait d'intranet. Je vous expliquer, ma base de donnée est sur une base intranet quand je l'extrait elle se me automatiquement dans excel.
Je voudrais supprimer a chaque fois que j'extrait une base toutes les lignes qui commence par un certains mots pas exemple "mot 447". Je voudrais pouvoir le faire a chaque fois que j'exporte une base, sauf qu'elle n'ont pas toutes le meme nom, alors comment faire pour que cela se fasse automatiquement sans changer de nom ?

Mon code, bien aider grace à d'autre forum :
Sub test()
Dim Rg As Range, Nb As Long, g As Range
With Worksheets("Extract - 20120406-160205")
Set Rg = .Range("A:A")
Nb = Rg.Rows.Count
End With
For A = Nb To 1 Step -1
Set g = Rg.Rows(A).Find(What:="*mot 447*", LookAt:=xlPart)
If Not g Is Nothing Then
Rg.Rows(A).Delete
End If
Next
End Sub

Ce qui est en gras c'est ce qui change à chaque base.

deuxieme question, dans ma base les ligne que je veux supprimer sont fusionner dans une première colonne et apres non comment faire qu'elle soit aussi supprimé quand je fais mon trie ?

Je sais pas j'ai ete compréhensible.
J'espere avoir quelques conseils.
MERCI