Copier-coller cellule vers une autre en VBA

Résolu
Lils_Bis Messages postés 65 Statut Membre -  
Pierre1310 Messages postés 8854 Statut Membre -
Bonjour,
Alors je vous explique mon problème :
J'ai une base de données que je dois traiter mais avant nettoyer quelque peu. Ainsi, j'ai choisi d'utiliser VBA grâce à Excel

Pour mon problème j'ai cela :
prio ?
prio ?
par defaut ?
par defaut ?
prio ?
par defaut ?
prio ?

Et je voudrais remplacer les "prio ?" par des "prio" et même histoire pour les "par defaut ?". Et ce, sur toute ma colonne (ici en l'occurrence la N). J'ai réussi à faire quelque chose mais le code s'arrête dès qu'il rencontre une cellule vide dans ma colonne. Alors, il m'affiche l'erreur d'exécution 5.

Quelqu'un pourrait-il me donner un petit coup de main car je n'y connais pas grand chose, pour ne pas dire, rien, en programmation VBA...

1 réponse

  1.
    Pierre1310 Messages postés 8854 Statut Membre 652
     
    Salut,

    Utilise la fonction replace.
    Tu mets dans une variable le nombre de lignes de ta feuille 
    Sheets("ta feuille").Cells.SpecialCells(xlCellTypeLastCell).Row

    Puis tu fais un compteur qui va compter dessus.
    0
    1. Lils_Bis Messages postés 65 Statut Membre
       
      Merci mais pourrais tu être un peu plus large dans ton code car je rame complètement... ^^
      0
    2. Pierre1310 Messages postés 8854 Statut Membre 652
       
      Ce que je t'ai montré comme code calcule automatiquement les lignes de ta feuille.

      Après tu n'as plus qu'a faire 

      For i = 1 to ma_variable

      cells(i,ta_colonne) = Replace(cells(i,ta_colonne), "prio ? ", "prio")
      cells(i,ta_colonne) = Replace(cells(i,ta_colonne), "par defaut ?  ", "par defaut")
      next i
      0
      1. Lils_Bis Messages postés 65 Statut Membre > Pierre1310 Messages postés 8854 Statut Membre
         
        Ca marche, super !!!
        Merci beaucoup !
        0
    3. Pierre1310 Messages postés 8854 Statut Membre 652
       
      De rien
      0

Discussions similaires

dessin avec symbole clavier
JSS -
Adraen -

79 réponses
Copier coller une image de Google sur Macbook
orianepark -
dede74000 -

1 réponse