MacroExcel : Sélection plage de données
Résolu
estceterre
Messages postés
11
Statut
Membre
-
estceterre Messages postés 11 Statut Membre -
estceterre Messages postés 11 Statut Membre -
Bonjour à tous,
Je suis en train de travailler sur une macro excel et je souhaite connaitre le code pour sélectionner une plage de cellules de taille variable : sur un même feuillet, la sélection des cellules peut être de 10 lignes puis de 20 lignes, etc... Cela dépend du nombre de lignes d'affilé où apparaît le nom du client. La manip d'après consiste à insérer une ligne après cette sélection et sommer le CA réalisé par ce client.
Quelqu'un peut il m'aider ??
Je vous remerciiiiiie par avance !!
Bonne journée !
Je suis en train de travailler sur une macro excel et je souhaite connaitre le code pour sélectionner une plage de cellules de taille variable : sur un même feuillet, la sélection des cellules peut être de 10 lignes puis de 20 lignes, etc... Cela dépend du nombre de lignes d'affilé où apparaît le nom du client. La manip d'après consiste à insérer une ligne après cette sélection et sommer le CA réalisé par ce client.
Quelqu'un peut il m'aider ??
Je vous remerciiiiiie par avance !!
Bonne journée !
4 réponses
-
bonjour,
par ex:tes clients en colonne A les CA en colonne B
ligne 1 réservée aux étiquettes
plusieurs manières possibles; en voici une
derlig=cells(cells.rows.count,1).end(xlup).row range("C" & derlig+1)=application.sum(range(B2:B & derlig))
Michel-
re,
Je viens d'essayer chez moiSub test() derlig = Cells(Cells.Rows.Count, 1).End(xlUp).Row Range("B" & derlig + 1) = Application.Sum(Range("B2:B" & derlig)) End Sub
ca marche (il y avait des étourderiesdans la 2° ligne)
autre méthode à déclencher avant de saisir un nouveau client
Sub test2() derlig = Cells(Cells.Rows.Count, 1).End(xlUp).Row Rows(derlig + 1).Insert Range("B" & derlig + 2) = Application.Sum(Range("B2:B" & derlig)) End Sub
tu peux aussi mettre le total des CA au dessus de ta liste et écrire en C1 (en A1: clients et B1: CA)
=SOMME(B2:B1000)
tu as une présentation style comptable -
-
-
-
erreur de message
Michel -
Je viens d'essayer et j'ai un message d'erreur de compilation qui s'affiche pour la end(xlup) :
"instruction incorrecte à l'extérieur d'une procédure" ...