Discussion :

[bouda53]

Bonjour a vous,
je viens d'enregistrer une macro pour automatiser un calcule sur toutes le ligne de mon fichier.
ok ça marche
le problème c'est que je voudrais faire tourner cette même macro sur un autre fichier de même forme mais avec un nombre de lignes différent du premier

donc: j'aimerais savoir comment faire pour rajouter un argument au début de la macro pour dire de prendre en en considération toutes les ligne exemple ajouter "NBVAL"

Merci d'avance pour votre aide

[mercatog]

Exemple pour colorier la plage A1:Cxx avec xx le n° de la ligne de la dernière cellule remplie de la colonne A

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
Sub Test()
Dim LastLig As Long
 
 
Application.ScreenUpdating = False
With Worksheets("Feuil1")
    LastLig = .Cells(.Rows.Count, "A").End(xlUp).Row
    .Range("A1:C" & LastLig).Interior.ColorIndex = 36
End With
End Sub