Copie de lignes sous conditions
Résolu/Fermé
RSISO
Messages postés
3
Date d'inscription
mardi 30 avril 2013
Statut
Membre
Dernière intervention
4 mai 2013
-
30 avril 2013 à 22:29
RSISO Messages postés 3 Date d'inscription mardi 30 avril 2013 Statut Membre Dernière intervention 4 mai 2013 - 4 mai 2013 à 12:54
RSISO Messages postés 3 Date d'inscription mardi 30 avril 2013 Statut Membre Dernière intervention 4 mai 2013 - 4 mai 2013 à 12:54
A voir également:
- Copie de lignes sous conditions
- Copie cachée - Guide
- Super copie - Télécharger - Gestion de fichiers
- Copie écran samsung - Guide
- Copie disque dur - Guide
- Site de vente en ligne particulier - Guide
2 réponses
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
Modifié par michel_m le 1/05/2013 à 09:22
Modifié par michel_m le 1/05/2013 à 09:22
Bonjour
quelles sont ces colonnes ?
Michel
quelles sont ces colonnes ?
Michel
RSISO
Messages postés
3
Date d'inscription
mardi 30 avril 2013
Statut
Membre
Dernière intervention
4 mai 2013
1 mai 2013 à 09:28
1 mai 2013 à 09:28
Bonjour,
Les 50 premières de la colonne "A" à la colonne "AX".
Merci d'avance
RSISO
Les 50 premières de la colonne "A" à la colonne "AX".
Merci d'avance
RSISO
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
1 mai 2013 à 16:23
1 mai 2013 à 16:23
Bonjour,
Je regarderai demain mais cet aprèm j'ai profité du soleil, chose rare chez moi en ce moment
Je regarderai demain mais cet aprèm j'ai profité du soleil, chose rare chez moi en ce moment
michel_m
Messages postés
16603
Date d'inscription
lundi 12 septembre 2005
Statut
Contributeur
Dernière intervention
16 décembre 2023
3 303
2 mai 2013 à 14:19
2 mai 2013 à 14:19
bonjour,
avec une macro
avec une macro
Sub dispatcher() Dim page As Byte Application.ScreenUpdating = False For page = 1 To 20 With Sheets("BT" & page) .Range("A1:AX1") = Sheets("recap").Range(Cells(page, "A"), Cells(page, "AX")).Value End With Next End Sub
RSISO
Messages postés
3
Date d'inscription
mardi 30 avril 2013
Statut
Membre
Dernière intervention
4 mai 2013
4 mai 2013 à 12:54
4 mai 2013 à 12:54
Merci à tous pour votre aide