Insertion de ligne selon résultat d'une cellule
Résolu
Pat3925tr
Messages postés
3
Date d'inscription
Statut
Membre
Dernière intervention
-
Pat3925tr Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
Pat3925tr Messages postés 3 Date d'inscription Statut Membre Dernière intervention -
A voir également:
- Insertion de ligne selon résultat d'une cellule
- Aller à la ligne dans une cellule excel - Guide
- Partage de photos en ligne - Guide
- Resultat foot - Télécharger - Vie quotidienne
- Mètre en ligne - Guide
- Excel cellule couleur si condition texte - Guide
2 réponses
Bonjour
Option Explicit
Const Lig As Integer = 550
Sub Macro()
Dim Nbre As Byte, Cptr As Byte
If Sheets(1).Range("A2") = Lig Then
Nbre = ThisWorkbook.Sheets.Count
For Cptr = 1 To Nbre
Sheets(Cptr).Rows(Lig).Insert
Next
End If
End Sub
sur la 2e ligne tu as écrit 550 (nombre fixe). Mais "A2" étant un résultat qui change. Si mon résultats est 10865, je veux insérer une ligne à la ligne 10865 sur toute les feuilles subséquentes sans avoir à déplacer mon curseur ET être prêt à insérer une autre ligne avec un nouveau résultat.
Merci d'avance
Pat