Votre question

[VBA] Chercher dans du code VBA

Tags :
  • true
  • Programmation
Dernière réponse : dans Programmation
31 Janvier 2011 10:52:22

Bonjour,

Je cherche un moyen de pouvoir trouver une parti de code dans une macro VBA. Je ne trouve pas la fonction. J'ai bien la fonction CodeModule.Replace. Mais je veus juste chercher pour ensuite transférer ceci ailleurs.

Merci d'avance.

Autres pages sur : vba chercher code vba

31 Janvier 2011 17:03:18

Salut, Jacouille35

En tapant CodeModule.Replace dans Gogole, le premier résultat me renvoie sur ce lien qui comporte le code suivant (à tester) :
  1. Dim SL As Long, EL As Long, SC As Long, EC As Long
  2. Dim S As String
  3. Dim Found As Boolean
  4. With ThisWorkbook.VBProject.VBComponents("Module1").CodeModule
  5. SL = 1
  6. SC = 1
  7. EL = 99999
  8. EC = 999
  9. Found = .Find("find this", SL, SC, EL, EC, True, False, False)
  10. If Found = True Then
  11. S = .Lines(SL, 1)
  12. S = Replace(S, "find this", "replace with")
  13. .ReplaceLine SL, S
  14. End If
  15. End With
Ceci dit, j'espère que tu sais ce que tu fais : modifier du code par du code doit répondre à un besoin très spécifique (ou ponctuel).
En tous cas, bonne continuation.
m
0
l
1 Février 2011 09:48:00

Bonjour,

Je ne veux pas modifier du code, je veux juste récupérer une partie du code. J'explique , j'ai des
Windows("Classeur.xls").Active
par exemple. Et je veux pouvoir récupérer Classeur.xls et l'envoyer dans une BDD Access. Je me suis dis , si je toruve un .xls dans mon code alors je récupère ce qu'il y à dans mes guillemets. Quelqu'un aurai une idée?

Merci d'avance
m
0
l
Tom's guide dans le monde
  • Allemagne
  • Italie
  • Irlande
  • Royaume Uni
  • Etats Unis
Suivre Tom's Guide
Inscrivez-vous à la Newsletter
  • ajouter à twitter
  • ajouter à facebook
  • ajouter un flux RSS