Copier coller même cellule de plusieurs feuil
Fermé
dyueo
Messages postés
5
Date d'inscription
lundi 30 mars 2009
Statut
Membre
Dernière intervention
17 avril 2009
-
30 mars 2009 à 14:14
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 30 mars 2009 à 18:22
michel_m Messages postés 16603 Date d'inscription lundi 12 septembre 2005 Statut Contributeur Dernière intervention 16 décembre 2023 - 30 mars 2009 à 18:22
A voir également:
- Copier coller même cellule de plusieurs feuil
- Copier coller pdf - Guide
- Copier une vidéo youtube - Guide
- Copier coller plusieurs éléments - Guide
- Super copier - Télécharger - Gestion de fichiers
- Aller à la ligne dans une cellule excel - Guide
1 réponse
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
30 mars 2009 à 18:22
30 mars 2009 à 18:22
par une petite macro transforme B4 en R6 ou autre
Sub recuperer_B4()
Dim coll As Collection
Dim cptr As Byte, nbre As Byte
Set coll = New Collection
nbre = ThisWorkbook.Sheets.Count
cptr = 1
Do Until cptr = nbre
If Sheets(cptr).Name <> "recap" Then
coll.Add Sheets(cptr).Range("B4").Value
End If
cptr = cptr + 1
Loop
With Sheets("recap")
For cptr = 1 To coll.Count
.Cells(cptr + 1, 2) = coll(cptr)
Next
End With
set cool=nothing
End Sub
