Forum |  HardWare.fr | News | Articles | PC | S'identifier | S'inscrire | Shop Recherche
1066 connectés 

  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Suppresion d'un bloc de ligne dans Excel

 


 Mot :   Pseudo :  
 
Bas de page
Auteur Sujet :

Suppresion d'un bloc de ligne dans Excel

n°2116912
aculy
Posté le 16-12-2011 à 11:33:08  profilanswer
 

Bonjour,
j ai un ensemble de fichiers qui sortent tous les mois  
 
j'aimerais :
- supprimer les premieres lignes à chaque fois ainsi que 2 autres lignes
   exemple les lignes allant de 1 à 24 (inclut) puis les 26 et 27 (avant toutes suppressions)
- insérer une ligne entre chaque article (en colonne A)
   avec dans la colonne A le mot "Sous-Total" et des sommes dans les colonnes I et J
 
Si quelqu'un pouvait m'aider à créer une macro pouvant faire ses 2 choses
 
Merci

mood
Publicité
Posté le 16-12-2011 à 11:33:08  profilanswer
 

n°2117190
aculy
Posté le 19-12-2011 à 10:46:33  profilanswer
 

pour l insertion j utilisais y a longtemps le code suivant qui ressemble un peut a ce que je veux faire:
 
AdrCel = 3
Do Until IsEmpty(Cells(AdrCel, 1))
  If Cells(AdrCel, 1) <> Cells(AdrCel - 1, 1) Then
    Rows(AdrCel).Insert Shift:=xlDown
    Range(Cells(AdrCel, 1), Cells(AdrCel, NbCol)).Interior.ColorIndex = 48
    AdrCel = AdrCel + 1
  End If
Loop
 
ActiveWorkbook.SaveAs Filename:="C:\test.xls"
 
Application.ScreenUpdating = True
 
mais je ne le comprends plus  
je me souviens de ce qu il faisait
mais impossible d en comprendre le sens

n°2117194
olivthill
Posté le 19-12-2011 à 11:10:25  profilanswer
 

Pour voir la syntaxe pour insérer ou pour supprimer, le plus simple est d'enregistrer une macro quand on fait l'opération manuellement, puis de voir le code généré et de l'adapter éventuellement.
 
Pour la question sur l'explication du code, quelle ligne ne comprenez-vous pas ?
En résumé, il s'agit d'une boucle tant qu'il y n'y a pas de cellule vide.
Si la la cellule est différente de la cellule précédente, alors il y insertion et mise en couleur.

n°2117198
aculy
Posté le 19-12-2011 à 11:28:11  profilanswer
 

Merci de la reponse
pour l enregistrement de macro j ai essaye mais je suis vide depasser je ne retrouve plus mes bouquins sur le VBA alors je farfouille sur le net.
 
en fait je ne comprends pas sur quel colonne il se base pour sa recherche et comment la modifier cette colonne
et peut on inserer ce que l on veut automatiquement????

n°2117201
olivthill
Posté le 19-12-2011 à 11:37:58  profilanswer
 

C'est ...cells(numero_de_ligne, numero_de_colonne)
 
Donc, dans le programme ci-dessus, c'est toujours la première colonne qui est considérée.

n°2117205
aculy
Posté le 19-12-2011 à 11:49:02  profilanswer
 

et AdrCel = 3  
je ne vois pas ce qu elle signifie

n°2117250
olivthill
Posté le 19-12-2011 à 14:38:32  profilanswer
 

AdrCel = 3 signifie la ligne numéro 3, puisque AdrCel est mis dans le premier paramètre de Cells(AdrCel, 1).
C'est pas compliqué, non ?

n°2117253
aculy
Posté le 19-12-2011 à 14:43:07  profilanswer
 

ok
Merci de l'infos

n°2117931
aculy
Posté le 22-12-2011 à 14:51:29  profilanswer
 

me suis debrouille autrement pour les lignes
(j ai virer les lignes dans mon modele de base)
 
Merci


Aller à :
Ajouter une réponse
  FORUM HardWare.fr
  Programmation
  VB/VBA/VBS

  Suppresion d'un bloc de ligne dans Excel

 

Sujets relatifs
Macro pour copier le contenu d'un document excel vers un autre[VBA Excel] Problème vlookup ne rappatriant que des zéros (RESOLU !)
Macro excel supprimer une ligne sous conditions[Résolu][Bash] Recherche ligne par ligne dans un fichier .gz
Calculs financiers avec vba excelCalcul financiers avec VBA excel
Log : récupérer le numéro de la ligne d’exécution.selection listbox - excel 2007
Plus de sujets relatifs à : Suppresion d'un bloc de ligne dans Excel


Copyright © 1997-2022 Hardware.fr SARL (Signaler un contenu illicite / Données personnelles) / Groupe LDLC / Shop HFR