Bonjour à tous
J'ai un truc que je ne comprend pas, j'ai fait 2 fichiers avec le même code et la même présentation sur l'onglet, sur l'un je fais en vba copier/coller formule, ça marche, sur l'autre j'ai "Erreur 1004" "impossible de modifier une cellule fusionné". Si je fais ActiveSheet.Paste ça marche. Pourquoi l'une et pas l'autre???
Même présentation toutes les cellules on le même format B18:G53 (BC,DE,FG).
code:
Merci
J'ai un truc que je ne comprend pas, j'ai fait 2 fichiers avec le même code et la même présentation sur l'onglet, sur l'un je fais en vba copier/coller formule, ça marche, sur l'autre j'ai "Erreur 1004" "impossible de modifier une cellule fusionné". Si je fais ActiveSheet.Paste ça marche. Pourquoi l'une et pas l'autre???
Même présentation toutes les cellules on le même format B18:G53 (BC,DE,FG).
code:
Code:
Sheets("xxx").Select
Range("B18:G53").Select
Selection.Copy
Range("A1").Select
Sheets("xxxx").Select
Rows("17:118").EntireRow.Hidden = False
Range("B18").Select
Application.DisplayAlerts = False
Selection.PasteSpecial Paste:=xlPasteFormulas, Operation:=xlNone, _
SkipBlanks:=False, Transpose:=False
Range("B1").Select
Application.DisplayAlerts = True
Application.CutCopyMode = False
Merci