MacroExcel : Sélection plage de données

Résolu
estceterre Messages postés 10 Date d'inscription   Statut Membre Dernière intervention   -  
estceterre Messages postés 10 Date d'inscription   Statut Membre Dernière intervention   -
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 !

4 réponses

michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
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
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
re,
Je viens d'essayer chez moi
Sub 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
0
estceterre Messages postés 10 Date d'inscription   Statut Membre Dernière intervention  
 
ok ! Génial ! merci bcp !!

Bonne journée !!!
0
estceterre Messages postés 10 Date d'inscription   Statut Membre Dernière intervention  
 
Bonjour,

j'essaie de suite !

Merci
0
michel_m Messages postés 16602 Date d'inscription   Statut Contributeur Dernière intervention   3 314
 
erreur de message
Michel
0
estceterre Messages postés 10 Date d'inscription   Statut Membre Dernière intervention  
 
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" ...
0