Bonjour à tous,

J'ai ce petit code :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
Sub intégration_prix()
Dim prixcpt, lignecpt As Integer
prixcpt = Range("e3").Value
lignecpt = Range("d3").Value
 
Rows("7:12").Select
    Selection.Copy
    Sheets("Nomenclature").Select
    Rows(lignecpt + 1).Select
    Selection.Insert Shift:=xlDown
    Selection.EntireRow.Hidden = True
 
Cells(lignecpt, 6) = prixcpt
 
End Sub
J'ai fait la partie copie/insertion de ligne via l'enregistreur de macro. Juste modifié pour définir la ligne d'insertion avec ma variable 'lignecpt'.
En théorie, je copie 6 lignes dans ma feuille active, je les insère et je les masque toutes. Ce sont les actions que j'ai faites lors de l'enregistrement et qui ont données le résultat escompté.
Mais quand je lance la macro...seule la 1ère des 6 lignes insérées est masquée !

Si je refait la manip manuellement, ça marche très bien ; les 6 lignes sont masquées.

Je comprends que seule la 1ère ligne reste sélectionnée au moment où la macro masque la sélection. Mais pourquoi?
That's the question...
Merci de votre aide
Benoit