suppression de lignes

[jojojojojojo]

Bonjour à tous,

j'ai un tableau avec plusieurs lignes biensur, et j'aimerais en fait lorsque je supprime une ligne que celles d'en dessous remonte automatiquement et ce sans être obligé de supprimer une ligne complète du tableur;

est ce possible??

 

[Pierrot93]

Re : suppression de lignes

Bonjour jojo

si j'ai bien compris, tu sélectionnes les cellules en question => click droit => supprimer => décaler les cellules vers le haut...

bon après midi
@+

 

[jojojojojojo]

Re : suppression de lignes

Ca je connaissait, il y a pas un moyen de faire ca automatiquement quand j'appuie sur le bouton supprimer sur le clavier. Je sélectionne les cellules, j'appuie sur le bouton suppr du clavier et automatiquement les cellules vont vers le haut

 

[Pierrot93]

Re : suppression de lignes

Perso pas d'autre solution...

 

[jojojojojojo]

Re : suppression de lignes

merci quand même pierrot,

j'attends des propositions

 

[Pierrot93]

Re : suppression de lignes

Re

en attendant une autre solution, si elle existe, tu peux toujours te faire une petite macro avec l'enregistreur...

@+

 

[MJ13]

Re : suppression de lignes

Bonjour Jo, Pierrot

    Rows(ActiveCell.Rows.Row & ":" & ActiveCell.Rows.Row).Delete Shift:=xlUp

 

[ROGER2327]

Re : suppression de lignes

Bonjour à tous

La procédure

[COLOR="DarkSlateGray"]Private Sub Worksheet_BeforeDoubleClick(ByVal Target As Range, Cancel As Boolean)
Dim oCel As Range, tf As Boolean
   tf = True
   For Each oCel In Rows(Target.Row).Cells
      tf = tf And IsEmpty(oCel)
   Next oCel
   If tf Then
      Rows(Target.Row).Delete Shift:=xlUp
      Cancel = True
   End If
End Sub[/COLOR]

placée dans un module de feuille efface la ligne dans laquelle on double clique, si toutes les cellules de la ligne sont vides.
A tester...​

ROGER2327

 

[Pierrot93]

Re : suppression de lignes

Re, bonjour Michel, Roger

aarf, il me semble bien que jojo ne veut pas supprimer la ligne complète :

et ce sans être obligé de supprimer une ligne complète du tableur;

si c'est le cas, la suivant devrait suffire, enfin me semble t-il...

Selection.Delete Shift:=xlUp

@+

 

[MJ13]

Re : suppression de lignes

Ah bravo Pierrot, tu es trop fort. Tu vois tout.

sinon

SendKeys ("^-~")

 

[jojojojojojo]

Re : suppression de lignes

Merci pour vos propositions mais faudrait préciser en plus du code oùu il faut le mettre même si je me doute que c'est dans le code de la feuille concernée. Et également le début et la fin du code svp?

De plus j'ai essayé toutes vos propositions mais yen a pas une qui a marché.

 

[XL_Luc]

Re : suppression de lignes

La macro de Roger (qui est complète) ce place dans l'explorateur de macro (ALT+F11) directement dans l'objet feuille (par exemple Feuil1(Feuil1) pour un nouveau classeur)

L'execution est automatique, il suffit de double cliquer sur une cellule pour supprimer toute la ligne si elle est entièrement vide.

 

[MJ13]

Re : suppression de lignes

Re:

De plus j'ai essayé toutes vos propositions mais yen a pas une qui a marché.

CQFD.