> Tous les forums > Forum Bureautique
 supprimer les cellules videsSujet résolu
Ajouter un message à la discussion
Page : [1] 
Page 1 sur 1
JPDH
  Posté le 02/03/2014 @ 09:16 
Aller en bas de la page 
Petit astucien

Bonjour,

en VBA excell quelles instructions utiliser pour supprimer les cellules vides d'une colonne sélectionnée

Meri d'avance

JPDH

Publicité
poussebois
 Posté le 02/03/2014 à 09:50 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Bonjour ,

Qu'entends-tu par "supprimer les cellules vides" ?

Est-ce décaler les cellules vers le haut ? Et jusqu'où faut-il aller (taille de la colonne) ?

Si oui, ce n'est pas difficile.

@ +



Modifié par poussebois le 02/03/2014 09:55
JPDH
 Posté le 02/03/2014 à 10:16 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Bonjour petit astucien,

de fait, je n'ai pas été assez précis

Je voudrais supprimer toute les rangées si la cellule A de cette rangée est vide

pour ce qui est de la taille de la colonne je la détermine via "currentregion"

merci

JPDH

ferrand
 Posté le 02/03/2014 à 11:28 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Bonjour,

Quelque chose comme ça peut-être :

Sub SupprimLignes()
n = Selection.CurrentRegion.Offset(1, 0).Row
With ActiveSheet.UsedRange
n = .Row + .Rows.Count
End With

For i = n To 1 Step -1
If Cells(i, 1).Value = "" Then Rows(i).Delete
Next i
End Sub

edit : la partie en rouge me paraît préférable à la ligne rayée qu'elle remplace



Modifié par ferrand le 02/03/2014 11:52
poussebois
 Posté le 02/03/2014 à 12:33 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Bonjour ,

Absent durant 2 heures, je m'aperçois, à mon retour, que ferrand a répondu comme il faut, me semble t-il.

@ +

JPDH
 Posté le 02/03/2014 à 15:12 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
Petit astucien

Un grand merci aux 2 astuciens qui ont résolu mon problème

Tout est au point maintenant

ferrand
 Posté le 02/03/2014 à 16:16 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Astucien

Désolé Poussebois, Je suis tombé dessus et cela m'a permis un break sur un autre problème !

J'ai eu quelques hésitations car je me méfie des "CurrentRegion" et "UsedRange" (et quelques autres) un peu trop dépendants de l'environnement à mon goût !

poussebois
 Posté le 02/03/2014 à 17:05 
Aller en bas de la page Revenir au message précédent Revenir en haut de la page
  Grand Maître astucien

Bonsoir ,

JPDH : je ne mérite aucun remerciement : c'est ferrand qui a fait le boulot

J'en profite pour dire que, concernant Excel, je ne lui arrive pas à la cheville .

Page : [1] 
Page 1 sur 1

Vous devez être connecté pour participer à la discussion.
Cliquez ici pour vous identifier.

Vous n'avez pas de compte ? Créez-en un gratuitement !
Recevoir PC Astuces par e-mail


La Lettre quotidienne +226 000 inscrits
Avec l'actu, des logiciels, des applis, des astuces, des bons plans, ...

Les bonnes affaires
Une fois par semaine, un récap des meilleurs offres.

Les fonds d'écran
De jolies photos pour personnaliser votre bureau. Une fois par semaine.

Les nouveaux Bons Plans
Des notifications pour ne pas rater les bons plans publiés sur le site.

Les bons plans du moment PC Astuces

Tous les Bons Plans
155,40 €LEGO 10274 Creator Expert ECTO-1 SOS Fantômes à 155,40 € livré
Valable jusqu'au 25 Juin

Amazon Allemagne fait une promotion sur le LEGO 10274 Creator Expert ECTO-1 SOS Fantômes qui passe à 146,21 € (avec la TVA ajustée). Comptez 9,07 € pour la livraison en France soit un total de 155,40 € livré au lieu de 199,99 €. Idéal pour les fans de SOS Fantômes et les passionnés de LEGO, ce modèle ECTO propose des heures de plaisir et une expérience de construction enrichissante pour les adultes. Le véhicule ECTO-1, qui mesure plus de 22,5 cm de haut, 47 cm de long et 16,5 cm de large, déborde de détails authentiques. Le set comporte 2352 pièces.


> Voir l'offre
34,74 €Carte mémoire Samsung 256 Go MicroSDXC Evo Select U3 (130 Mo/s) à 34,74 €
Valable jusqu'au 25 Juin

Amazon fait une promotion sur la carte mémoire Samsung 256 Go MicroSDXC Evo Select U3 qui passe à 34,74 €. Une bonne affaire pour cette carte que l'on trouve ailleurs à partir de 50 € et qui offre des vitesses de 130 Mo/s en lecture et 110 Mo/s en écriture.  Elle est idéale pour les téléphones, caméras et appareils photo 4K. Elle est étanche, anti-choc et résiste aux rayons X et aux champs magnétiques. Elle est garantie 10 ans.


> Voir l'offre
139,99 €Ecran PC 24 pouces Samsung C24RG50 (incurvé, FHD, 144 Hz, 4 ms) à 139,99 €
Valable jusqu'au 25 Juin

Cdiscount fait une promotion sur l'écran PC 24 pouces Samsung C24RG50 qui passe à 139,99 € alors qu'on le trouve ailleurs à partir de 160 €. Cet écran incurvé possède une dalle VA FullHD (1920x1080) avec un rafraichissement de 144 Hz et un temps de réponse de 4 ms. Un très bon écran dédié aux joueurs.


> Voir l'offre

Sujets relatifs
Suppression des cellules vides dans une colonne.
Peut on supprimer les vides dans un fichier PDF ?
Supprimer x caractères dans plusieurs cellules
LA MFC sous excel 2007 pour des cellules vides
Supprimer les lignes vides dans Excel
Excell: Cellules vides non vides!
Cellules vides mais avec une formule?
Outlook - règle pour supprimer les messages vides
Impossible de supprimer la couleur de qlq cellules
supprimer lignes vides
Plus de sujets relatifs à supprimer les cellules vides
 > Tous les forums > Forum Bureautique