Lorsque je fais cette macro et que les cellules sont d=E9caler vers le
haut. les formules ne se mettent pas =E0 jour. C'est-=E0-dire par
exemple C40 reste tel quel alors qu'il devrait =EAtre C13 une fois
d=E9caler.
Sub CC()
Feuil1.Select
With Feuil1
.Range("G38").Copy
.Range("G11").PasteSpecial (xlPasteValues)
.Range("E13:I39").Delete Shift:=3DxlUp
.Range("R580:V606").Copy .Range("E580:I606")
.Range("A1").Select
End With
Feuil2.Select
With Feuil2
.Range("C19:H42").Delete Shift:=3DxlUp
.Range("P523:U546").Copy .Range("C523:H546")
.Range("A1").Select
End With
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
tiah
salut !
d'après mes tests, il faut que tu décale les lignes de la colonne C pour que ça s'ajuste. comme tu n'efface que dans la colonne E, tout ce qui fait référence à C reste tel quel...
tiah
Lorsque je fais cette macro et que les cellules sont décaler vers le haut. les formules ne se mettent pas à jour. C'est-à-dire par exemple C40 reste tel quel alors qu'il devrait être C13 une fois décaler.
Sub CC()
Feuil1.Select With Feuil1 .Range("G38").Copy .Range("G11").PasteSpecial (xlPasteValues) .Range("E13:I39").Delete Shift:=xlUp .Range("R580:V606").Copy .Range("E580:I606") .Range("A1").Select End With
Feuil2.Select With Feuil2 .Range("C19:H42").Delete Shift:=xlUp .Range("P523:U546").Copy .Range("C523:H546") .Range("A1").Select End With
End Sub
Que dois-je faire?
Merci MP
salut !
d'après mes tests, il faut que tu décale les lignes de la colonne C
pour que ça s'ajuste. comme tu n'efface que dans la colonne E, tout ce
qui fait référence à C reste tel quel...
tiah
Lorsque je fais cette macro et que les cellules sont décaler vers le
haut. les formules ne se mettent pas à jour. C'est-à-dire par
exemple C40 reste tel quel alors qu'il devrait être C13 une fois
décaler.
Sub CC()
Feuil1.Select
With Feuil1
.Range("G38").Copy
.Range("G11").PasteSpecial (xlPasteValues)
.Range("E13:I39").Delete Shift:=xlUp
.Range("R580:V606").Copy .Range("E580:I606")
.Range("A1").Select
End With
Feuil2.Select
With Feuil2
.Range("C19:H42").Delete Shift:=xlUp
.Range("P523:U546").Copy .Range("C523:H546")
.Range("A1").Select
End With
d'après mes tests, il faut que tu décale les lignes de la colonne C pour que ça s'ajuste. comme tu n'efface que dans la colonne E, tout ce qui fait référence à C reste tel quel...
tiah
Lorsque je fais cette macro et que les cellules sont décaler vers le haut. les formules ne se mettent pas à jour. C'est-à-dire par exemple C40 reste tel quel alors qu'il devrait être C13 une fois décaler.
Sub CC()
Feuil1.Select With Feuil1 .Range("G38").Copy .Range("G11").PasteSpecial (xlPasteValues) .Range("E13:I39").Delete Shift:=xlUp .Range("R580:V606").Copy .Range("E580:I606") .Range("A1").Select End With
Feuil2.Select With Feuil2 .Range("C19:H42").Delete Shift:=xlUp .Range("P523:U546").Copy .Range("C523:H546") .Range("A1").Select End With
End Sub
Que dois-je faire?
Merci MP
mboileau
Le problème est que j'ai besoin que la colonne C reste tel quel. Une autre solution?
merci MP
Le problème est que j'ai besoin que la colonne C reste tel quel. Une
autre solution?
