Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

comment trouver la dernière colonne vide ?

Créer une discussion
  • Initiateur de la discussion Initiateur de la discussion Kankrela
  • Date de début Date de début

Boostez vos compétences Excel avec notre communauté !

Rejoignez Excel Downloads, le rendez-vous des passionnés où l'entraide fait la force. Apprenez, échangez, progressez – et tout ça gratuitement ! 👉 Inscrivez-vous maintenant !

S'inscrire
K

Kankrela

Guest
Bonjour,

J'ai déjà trouver comment sélectionner la dernière ligne vide de la colonne 1 à partir de la 6ème ligne avec :
Code: 
ligne = 6
        Cells(ligne, 1).Select
        Do Until IsEmpty(Cells(ligne, 1))
        ligne = ligne + 1
        Loop
        Cells(ligne, 1).Select

Je souhaiterais maintenant sélectionner la dernière colonne vide de la ligne 5, j'ai essayer d'adapter le code précédent :
Code: 
 Cells(ligne, 1).Select
        Do Until IsEmpty(Cells(5, colonne))
            colonne = colonne + 1
        Loop

mais ça ne marche pas, si qqn à une idée je suis preneur.
Merci d'avance

Morgan
 
Trier par date Trier par votes
Re : comment trouver la dernière colonne vide ?

Bonjour Kankrela,

que vaut colonne avant la boucle ?
dans ton 1er code, tu avais bien pensé à initialiser ligne à 6, il faudrait peut-être faire la même chose pour colonne
 
Vote positif 0 Vote négatif
Re : comment trouver la dernière colonne vide ?

Bonjour Tototiti2008,
Décidement tu vas me donner un coup de main tous les jours ! Merci !
J'ai bien pensé à ça, voici le code que j'ai essayer en entier :

Code: 
colonne = 1
 Cells(ligne, 1).Select
        Do Until IsEmpty(Cells(5, colonne))
            colonne = colonne + 1
        Loop

Ca ne me sélectionne même pas une cellule...
 
Vote positif 0 Vote négatif
Re : comment trouver la dernière colonne vide ?

Je viens d'essayer, ce n'est pas concluant,
Voici mon code en entier, j'ai peut-etre fait une autre erreur

Code: 
If Ajout = True Then
     Range("F5").Select
    Selection.Copy
colonne = 1
 Cells(ligne, 1).Select
        Do Until IsEmpty(Cells(5, colonne))
            colonne = colonne + 1
        Loop
        Cells(5, colonne).Select

    ActiveSheet.Paste
                       End If
            
            UserForm1.Hide
 
Vote positif 0 Vote négatif
Re : comment trouver la dernière colonne vide ?

Bonjour Kankrela, tototiti2008

Si je comprends bien teste ceci :

Code: 
'.../...
If Ajout = True Then
   Range("F5").Copy Range("A" & ligne).End(xlToRight).Offset(0, 1).Columns
End If
'.../...

Ce code copie la cellule F5 dans la première cellule vide de la ligne dont le N° corresponde à la variable "ligne". Ce n'est pas forcément la dernière colonne vide de la ligne.

Ou celui ci

Code: 
'.../...
If Ajout = True Then
   Range("F5").Copy Range("IV" & ligne).End(xlToLeft).Offset(0, 1).Columns
End If
'.../...

Lui copie la cellule F5 dans la dernière colonne vide de la ligne, même s'il y a des cellules vides sur cette dernière.

A+
 
Vote positif 0 Vote négatif
Identifiez-vous ou inscrivez-vous pour participer.
Rejoins nos membres "Supporter XLD" et booste ton expérience Excel !
- Navigue sans publicité
- Accède à Cléa, notre assistante IA experte Excel... et pas que...
- Profite de fonctionnalités exclusives
Ton soutien permet à Excel Downloads de rester 100% gratuit et de continuer à rassembler les passionnés d'Excel.
Je deviens Supporter XLD
Assurez vous de marquer un message comme solution pour une meilleure transparence.

Discussions similaires

P
  • Question Question
XL 2010 Recopie de la date du jour jusqu'à la dernière ligne non vide
Réponses
5
Affichages
192
philmaure
P
J
  • Résolu(e)
Microsoft 365 Première cellule vide ou égal zéros dans une plage définie
Réponses
11
Affichages
461
juju91
J
N
  • Question Question
XL 2013 Utilisé deux CommandButton_Click dans la même feuil
Réponses
4
Affichages
430
patricktoulon
M
  • Résolu(e)
Microsoft 365 Trouver une valeur dans une colonne
Réponses
7
Affichages
567
mikeduff
M
S
  • Résolu(e)
XL 2016 Avis / Aide réécriture code
2 3
Réponses
38
Affichages
1 K
safranien
S
  • Résolu(e)
Microsoft 365 Découper un fichier en plusieurs fichiers
2
Réponses
24
Affichages
837
nat54
  • Question Question
XL 2021 Importer les données Access dans Excel
Réponses
2
Affichages
574
badraaliou4
J
  • Question Question
Microsoft 365 Trouver première colonne vide
Réponses
10
Affichages
623
Phil69970
W
  • Résolu(e)
XL 2016 Placer mes photos dans la colonne A, [A3], [A4],etc, jusqu'en [A99] selon le prénom et le nom colonnes B et C
2
Réponses
29
Affichages
2 K
TooFatBoy
  • Question Question
Microsoft 365 Excel VBA: manipuler des fichiers partagés via Teams / Sharepoint
Réponses
2
Affichages
135
Eric 888
  • Résolu(e)
XL 2019 macro avec fonction copié coller si rempli par la macro
Réponses
12
Affichages
646
AtTheOne
  • Résolu(e)
Microsoft 365 Récupération d'une valeur particulière dans un tableau...
Réponses
13
Affichages
417
nightswan
C
  • Résolu(e)
XL 2019 User Form qui renvoi dans un tableau avec celulle fusionnée
2
Réponses
16
Affichages
369
Piment
P
N
  • Résolu(e)
XL 2021 comment faire recherche dans une colonne et ligne
Réponses
5
Affichages
732
job75
  • Question Question
XL 2019 texte vide et bordure bouton masquer vba
6 7 8
Réponses
108
Affichages
6 K
TooFatBoy
  • Résolu(e)
XL 2010 Lire total colonne Tb structuré
Réponses
5
Affichages
435
cathodique
A
  • Résolu(e)
XL 2016 Recherche d'un mot dans une cellule et surlignage de la ligne
Réponses
4
Affichages
572
Abi23
A
S
  • Résolu(e)
XL 2016 Coller nom classeur sur plage cellules
Réponses
9
Affichages
647
safranien
S
G
  • Résolu(e)
XL 2016 Pb de tri et sous totaux
2
Réponses
27
Affichages
2 K
Gestionnaire_rh
G
  • Résolu(e)
XL 2016 Excel code vba motus
Réponses
11
Affichages
672
papychat1
Menu
Connexion
S'inscrire
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…