sous.total en VB

Le
Jean-François LEGRAS
Encore bonsoir à vous chers amis,


Nouvelle question mais indépendante de la précédente, donc je préfère poster
un nouveau message.

Je n'arrive pas à créer un code en VB pour faire un sous.total 3 lignes
en-dessous de la dernière ligne du tableau. C'est idiot mais j'ai essayé
avec End(xlUp) et impossible de trouver la bonne formule :

La formule ci-dessous par exemple ne fonctionne pas

Range("N65535").End(xlUp).Offset(3, 0).Select
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,N4:R[-3]C)"



Pourriez-vous m'aider svp ?

Merci d'avance !

Et bonne nuit, vais me coucher.

JF
Vidéos High-Tech et Jeu Vidéo
Téléchargements
Vos réponses
Gagnez chaque mois un abonnement Premium avec GNT : Inscrivez-vous !
Trier par : date / pertinence
Daniel.C
Le #5165741
Si tu mets Formula R1C1, il faut convertir N4 en coordonnées L1C1 :
Range("N65535").End(xlUp).Offset(3, 0).Select
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,R14C4:R[-3]C)"
Daniel
"Jean-François LEGRAS"
Encore bonsoir à vous chers amis,


Nouvelle question mais indépendante de la précédente, donc je préfère
poster un nouveau message.

Je n'arrive pas à créer un code en VB pour faire un sous.total 3 lignes
en-dessous de la dernière ligne du tableau. C'est idiot mais j'ai essayé
avec End(xlUp) et impossible de trouver la bonne formule :

La formule ci-dessous par exemple ne fonctionne pas...

Range("N65535").End(xlUp).Offset(3, 0).Select
ActiveCell.FormulaR1C1 = "=SUBTOTAL(9,N4:R[-3]C)"



Pourriez-vous m'aider svp ?

Merci d'avance !

Et bonne nuit, vais me coucher.

JF



Publicité
Poster une réponse
Anonyme