Comment trouver une cellule spécifique et d'en faire la ActiveCell

Je suis en train d'écrire un code VBA qui va ouvrir une feuille de calcul spécifique dans mon classeur dans Excel, et ensuite trouver la cellule de la Colonne A qui a valeur "TOTALE". Ensuite, cela doit être défini comme le ActiveCell, de sorte que le reste de ma macro pouvez effectuer des actions sur la ligne contenant cette cellule.

Je veux que lorsque l'utilisateur exécute la macro, cette cellule est choisi de droit au large de la chauve-souris. La position de cette cellule va changer après la macro est exécutée, alors j'ai besoin de travailler à n'importe quelle cellule de cette valeur est en. Chaque fois que la macro s'exécute, une nouvelle ligne est ajoutée au-dessus de la ligne contenant "TOTAL" et donc la position de cette cellule est en constante évolution.

Jusqu'à présent, je viens avec cela, il suffit de readin par le biais de forums. Cela ne fonctionne toujours pas, mais je suis nouveau sur ce langage et je ne peux pas déterminer où est l'erreur.

Sub Macro2()

    Dim C As Range
    Worksheets("Project Total").Select
    With Selection
        C = .Find("TOTAL", After:=Range("A2"), MatchCase:=True)
    End With

End Sub
InformationsquelleAutor user3669425 | 2014-05-23