Formule Copier/Coller Automatique

scelera Messages postés 40 Statut Membre -  
michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   -
Bonjour,

Je travaille actuellement sur un fichier excel avec des centaines lignes de cellules. J'aimerai pouvoir automatiquement couper/coller la valeur de A1 en B1 et de A4 en C1 et répéter la même action pour tout le classeur de sorte que A7 soit en B2 et A10 en C2 et ainsi de suite.

Merci de votre aide !

2 réponses

  1. Theo.R Messages postés 585 Statut Membre 31
     
    Sub test()

    m = 1
    n = 1

    Do Until Cells(m,1) = "" And Cells(m+3,1) = ""
    Cells(n,2) = Cells(m,1)
    Cells(n,3) = Cells(m+3,1)

    m = m + 6
    n = n +1

    Loop
    End Sub
    0
    1. Theo.R Messages postés 585 Statut Membre 31
       
      Le code s'arrête lorsqu'il n'y a plus rien en Am et en A(m+3) (par exemple en A13 et en A16)
      0
    2. scelera Messages postés 40 Statut Membre
       
      Merci pour votre réponse rapide !
      Cependant je suis sur un document googledocs, n'y a t'il pas moyen de mettre une formule dans une cellule ?
      0
    3. Theo.R Messages postés 585 Statut Membre 31
       
      C'est du code VBA, donc à utiliser sur Excel.. vous pouvez extraire votre document sous excel puis le réimporter une fois la macro exécutée
      0
  2. michel_m Messages postés 18903 Date d'inscription   Statut Contributeur Dernière intervention   3 320
     
    Bonjour Scelera

    Sur Excel:
    en B1
    =DECALER($A1;(NBVAL($A1:A1)-1)*3;0)
    et tu tires vers la droite

    en espérant que ça marche sur Google...
    0