Discussion :

[vinc391]

Bonjour à tous
je suis nouveau sur le forum.
J'utilise un macro pour faire l'inventaire de mon parc informatique.
J'utilise la fonction NB.SI
Actuellement ma plage est E2:E112
Je voudrais savoir comment sélectionner ma plage pour dire que je veux la plage E2: fin de la colonne de mon tableau.
Je m'explique si je crée par exemple 3 lignes ma plage ne sera plus E2:E112 mais E2:E115.
Ma macro ne prendra donc pas en compte les 3 cellules supplémentaires.

[Krovax]

Bonjour,
Une version de ta macro actuelle aurait été pratique sans elle il va faloir te contenter ce qui va suivre

utilise

Code :

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

range("E2:E" & DerniereLigne)

(peut être sans le range)

pour définir DerniereLigne c'est ici

[vinc391]

bonjour
en effet voici ma macro
calcul le total du matériel informatique

Code :

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

1
2
3
4
5
6
7
8
9
    Range("B2").Select
    ActiveCell.FormulaR1C1 = "=COUNTIF('materiel info'!R2C5:R112C5,RC[-1])"
    Range("B2").Select
    Selection.AutoFill Destination:=Range("B2:B11"), Type:=xlFillDefault
    Range("B2:B11").Select
    Range("B12").Select
    ActiveCell.FormulaR1C1 = "=SUM(R[-10]C:R[-1]C)"
    Range("B13").Select
End Sub

sur la ligne suivante

Code :

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

ActiveCell.FormulaR1C1 = "=COUNTIF('materiel info'!R2C5:R112C5,RC[-1])"

je souhaite aller à la fin mon tableau

[Krovax]

Bonjour,
une remarqueles select c'est pas top en règle générale tu peux remplacer

Code :

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

1
2
3
4
AAAA.select
selection.BBBBBB
ou
activecell.BBBBBB

par

Code :

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

 AAAA.BBBBB

Ton code devient

Code :

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

1
2
3
4
 
    Range("B2").FormulaR1C1 = "=COUNTIF('materiel info'!R2C5:R112C5,RC[-1])"
    Range("B2").AutoFill Destination:=Range("B2:B11"), Type:=xlFillDefault
    ("B12").FormulaR1C1 = "=SUM(R[-10]C:R[-1]C)"

Pour ta question
utilise

Code :

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

"=COUNTIF('materiel info'!R2C5:R" & derniereligne & "C5,RC[-1])"

Bon perso je n'utilise pas els formule avec R1C1 je préfère mettre directement l'addresse du coup il peux y avoir un petit décalage a toi de corriger.

[vinc391]

bonjour
j'ai essayé de copier ta formule mais cela ne fonctionne pas
j'ai 2 feuilles
la première nommé materiel info avec 112 lignes
En colonne E la référence de mes PC (exemple Dell 4600, Dell 3100, Dell 4100)
j'ai plusieurs PC qui ont la même référence
la deuxième feuille récapitulatif
Colonne A la référence des PC de la colonne E
Colonne B je fais une fonction NB.SI avec la plage de la colonne E de la feuille materiel info et comme critère la cellule de la colonne A
ma macro
je me place en B2 d ela feuille récapitulatif
j'insére la fonction NB.SI =NB.SI('materiel info'!$E$2:$E$112;A2)
Je mets les $ à la cellule E2 E112
je recopie la formule jusqu'à la cellule B11
en B12 je fais la somme automatique de B2:B11
et j'arrête la macro