Bonjour à tous, j'ai une feuille ABC et une feuille XYZ
Je veux copier la cellule EU518 de la feuille ABC dans la cellule E11 de la
feuille XYZ, ensuite la cellule EU525 de la feuille ABC dans la cellule F11
de la feuille XYZ et ainsi de suite, la logique est toujours de +7. Est ce
qu'il y a une manière de pouvoir le faire automatique.
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
ChrisV
Bonjour Alain,
Selon les données de ton exemple, dans un module du classeur...
Sub zaza() Dim i As Long, j As Integer, derL As Long Application.ScreenUpdating = False derL = Sheets("ABC").[EU65536].End(xlUp).Row j = 1 For i = 525 To derL Step 7 Sheets("XYZ").Cells(11, j + 4) = Sheets("ABC").Cells(i, 151) j = 1 + j Next i End Sub
ChrisV
"Alain B" <Alain a écrit dans le message de news:
Bonjour à tous, j'ai une feuille ABC et une feuille XYZ Je veux copier la cellule EU518 de la feuille ABC dans la cellule E11 de la feuille XYZ, ensuite la cellule EU525 de la feuille ABC dans la cellule F11 de la feuille XYZ et ainsi de suite, la logique est toujours de +7. Est ce qu'il y a une manière de pouvoir le faire automatique.
Bonjour Alain,
Selon les données de ton exemple, dans un module du classeur...
Sub zaza()
Dim i As Long, j As Integer, derL As Long
Application.ScreenUpdating = False
derL = Sheets("ABC").[EU65536].End(xlUp).Row
j = 1
For i = 525 To derL Step 7
Sheets("XYZ").Cells(11, j + 4) = Sheets("ABC").Cells(i, 151)
j = 1 + j
Next i
End Sub
ChrisV
"Alain B" <Alain B@discussions.microsoft.com> a écrit dans le message de
news: C2C7245F-AD21-4D8A-A298-42DC5A621F58@microsoft.com...
Bonjour à tous, j'ai une feuille ABC et une feuille XYZ
Je veux copier la cellule EU518 de la feuille ABC dans la cellule E11 de
la
feuille XYZ, ensuite la cellule EU525 de la feuille ABC dans la cellule
F11
de la feuille XYZ et ainsi de suite, la logique est toujours de +7. Est
ce
qu'il y a une manière de pouvoir le faire automatique.
Selon les données de ton exemple, dans un module du classeur...
Sub zaza() Dim i As Long, j As Integer, derL As Long Application.ScreenUpdating = False derL = Sheets("ABC").[EU65536].End(xlUp).Row j = 1 For i = 525 To derL Step 7 Sheets("XYZ").Cells(11, j + 4) = Sheets("ABC").Cells(i, 151) j = 1 + j Next i End Sub
ChrisV
"Alain B" <Alain a écrit dans le message de news:
Bonjour à tous, j'ai une feuille ABC et une feuille XYZ Je veux copier la cellule EU518 de la feuille ABC dans la cellule E11 de la feuille XYZ, ensuite la cellule EU525 de la feuille ABC dans la cellule F11 de la feuille XYZ et ainsi de suite, la logique est toujours de +7. Est ce qu'il y a une manière de pouvoir le faire automatique.
Alain B
Rebonjour, j'ai oublié des informations essentielles pour mon problème, donc je reformule mon problème.
j'ai un classeurA avec une feuille ABC et un classeurB avec feuille XYZ. Je veux copier la cellule EU518 du classeurA, feuille ABC dans la cellule E11 du classeurb, feuille XYZ, ensuite la cellule EU525 du classeurA, feuille ABC dans la cellule F11 du classeurB, feuille XYZ et ainsi de suite, la logique est toujours de +7. Est ce qu'il y a une manière de pouvoir le faire automatique.
Rebonjour, j'ai oublié des informations essentielles pour mon problème, donc
je reformule mon problème.
j'ai un classeurA avec une feuille ABC et un classeurB avec feuille XYZ. Je
veux copier la cellule EU518 du classeurA, feuille ABC dans la cellule E11 du
classeurb, feuille XYZ, ensuite la cellule EU525 du classeurA, feuille ABC
dans la cellule F11 du classeurB, feuille XYZ et ainsi de suite, la logique
est toujours de +7. Est ce qu'il y a une manière de pouvoir le faire
automatique.
Rebonjour, j'ai oublié des informations essentielles pour mon problème, donc je reformule mon problème.
j'ai un classeurA avec une feuille ABC et un classeurB avec feuille XYZ. Je veux copier la cellule EU518 du classeurA, feuille ABC dans la cellule E11 du classeurb, feuille XYZ, ensuite la cellule EU525 du classeurA, feuille ABC dans la cellule F11 du classeurB, feuille XYZ et ainsi de suite, la logique est toujours de +7. Est ce qu'il y a une manière de pouvoir le faire automatique.
AV
En E11 (et recopie --> XX11) de la feuille"XYZ" du classeur "ClasseurB" :
