Se connecter avec
S'enregistrer | Connectez-vous

Modification d'une formule d'une autre cellule par une macro

Dernière réponse : dans Programmation

Bonjour,

En fait, je souhaite copier le contenu de la cellule juste au dessus de la cellule active qui contient une formule: =Feuil1!D8 ceci dans la cellule active, là pas de problème mais j'aimerai en modifer la référence de la cellule, en fait augmenter la ligne D8 en D12 dans la formule, ceci par une macro, bien entendu.

En résumé: Faire un +4 (sur la ligne) dans la formule de la cellule juste au-dessus en la copiant dans la cellule active.

Salutations, DO.

Autres pages sur : modification formule cellule macro

Lassé par la pub ? Créez un compte
Expert Programmation

Bonjour,

après un petit de recherche dans mes maigres connaissance en VBA Excel j'ai réussi ce petit morceau de code ^^
  1. Sub plop()
    

  2.  
  3.     formule = ActiveCell.Offset(-1, 0).Formula
    

  4.     ligne = Mid(formule, 10)
    

  5.     garde = Mid(formule, 1, 9)
    

  6.     ligne = ligne + 4
    

  7.     ligne = CStr(ligne)
    

  8.     Chaine = garde + ligne
    

  9.     ActiveCell.Formula = Chaine
    

  10.  
  11. End Sub


Bon ça peut paraitre un peu sauvage lol mais ça marche :) 

Bonjour DivX-666,

Merci pour le coup de main mais j'obtiens une erreur durant l'exécution, ceci à la ligne 6., cela viendrait d'un conflit de type de variable entre une chaine de caractère dont vient ligne et le chiffre 4?

En fait, c'est correct, c'était simplement la longueur de ma chaine de caractère qui était différente de l'exemple de mon premiere message.

Encore merci, cela va me sauver du temps.

Salutations, DO.
Lassé par la pub ? Créez un compte

Créer un nouveau sujet

Tom's guide dans le monde