Rechercher : dans
Par :

[excel] copier une ligne

Dernière réponse le 14 avr 2006 à 11:18:36 lo, le 14 avr 2006 à 10:01:17 
 Signaler ce message aux modérateurs

Bonjour tout le monde !

est il possible de copier une ligne, la deuxième de la première feuille, dans toutes les feuilles de mon classeur ? (j'en ai une soixantaine)
merci d'avance et bonne journée !

Meilleures réponses pour « [excel] copier une ligne » dans :
Transformer des colonnes en lignes dans un fichier VoirDifférents outils de Linux sont très doués pour travailler avec des lignes, mais pas avec des colonnes (c'est leur rôle) Sed, Awk, Grep, etc. Cependant, il peut arriver pour X raisons que vous ayez un fichier où les données sont à lire en...
Copier une formule VoirAprès avoir laborieusement composé une formule dans une cellule, il est fréquent de vouloir la recopier d’autres cellules. Vous pouvez procéder de plusieurs façons. COPIER-COLLER La méthode la plus primaire consiste à sélectionner la cellule...

1

vieu bison boiteu, le 14 avr 2006 à 10:46:56

Salut lo

bien sûr
tu sélectionnes ta ligne "2" , clic droit et copier
puis faire tes feuilles une à une
sélectionner la première case de la ligne où tu veux "coller" ou "insérer la ligne"

à+ pas de lien sur page web en anglais
je vole déjà assez tout seul

Répondre à vieu bison boiteu

2

lo, le 14 avr 2006 à 10:55:44

Merci d'avoir répondu
j'esperais l'existence d'une solution plus pratique pour ne pas avoir à répéter 60 fois la même opération mais à priori elle n'existe pas...
bonne journée !

Répondre à lo

3

Armojax, le 14 avr 2006 à 11:02:32

Hello,

Ci-dessous une petite macro :

Sub Propage()

  Dim F           As Worksheet
  Dim NomFeuille  As String
  
  Application.ScreenUpdating = False
  NomFeuille = ActiveSheet.Name
  Rows("2:2").Copy
  For Each F In Worksheets
    With F
      If .Name <> NomFeuille Then
        .Activate
        .Rows("2:2").Select
        .Paste
        .Cells(2, 1).Select
      End If
    End With
  Next
  Sheets(NomFeuille).Activate
  Application.CutCopyMode = False
  Application.ScreenUpdating = True
  
End Sub
Il suffit que tu te positionnes sur ta feuille source avant de l'exécuter.

Répondre à Armojax

4

 lo, le 14 avr 2006 à 11:18:36

Merci beaucoup pour ta réponse..je vais tester !
A + !

Répondre à lo