Dernière colonne non vide VBA

[Hawkeye56]

Bonjour le forum,

Je rame fort pour écrire le code qui copierait la plage de cellules allant de la ligne 4 à la dernière ligne non vide de la dernière colonne non vide.

Merci de votre aide 🙂

 

[PascalXLD]

Re : Dernière colonne non vide VBA

Bonjour

cette ligne te selectionne toute la plage à partir de A1 occupée

Range("A1:" & Range("A1").SpecialCells(xlCellTypeLastCell).Address).Select

je ne sais pas si c'est ce que tu veux

 

[Hawkeye56]

Re : Dernière colonne non vide VBA

Bonjour PascalXLD,

Merci de ta réponse.
Je me suis mal exprimé.
Ce que je souhaite c'est copier la plage de cellules allant de la ligne 4 à la dernière ligne non vide (c'est une première variable) et le tout situé dans la dernière colonne non vide (encore une variable).

🙂

 

[PascalXLD]

Re : Dernière colonne non vide VBA

RE

tu veux donc ecrasé ta dernière colone non vide, par ta première colonne à partir de la ligne 4 ok ?

et c'est ta dernière colonne non vide de la ligne 4 ou cela peut être une autre ?

 

[Hawkeye56]

Re : Dernière colonne non vide VBA

Non, ce que je veux c'est copier cette plage de cellule de la dernière colonne non vide pour la recopier dans un autre classeur.

Ce qui me pose problème c'est ces 2 variables en même temps.

 

[PascalXLD]

Re : Dernière colonne non vide VBA

RE

essaies ceci mais...

maligne = Range("A4").End(xlDown).Row
macolonne = Range("A4").SpecialCells(xlCellTypeLastCell).Column
Range(Cells(4, 1), Cells(maligne, macolonne)).Copy Cells(4, macolonne + 1)

 

[Hawkeye56]

Re : Dernière colonne non vide VBA

Non ,ça ne fonctionne pas.

Je vais essayer autrement.
Peux tu me donner le code pour aller à la ligne 4 de la dernière colonne non vide?
Je ne connais pas la syntaxe mais je crois qu'il y a 256 et xltoleft... 😱

Merci de ton aide

 

[PascalXLD]

Re : Dernière colonne non vide VBA

re

macolonne=range("IV4").end(xltoleft).column

 

[Hawkeye56]

Re : Dernière colonne non vide VBA

Bonsoir le forum,

Ca ne donne pas ce que je veux...Je simplifie ma demande:
Comment copier les lignes 4 à 20 de la dernière colonne non vide ?

Merci de votre aide

 

[Hawkeye56]

Re : Dernière colonne non vide VBA

Bonsoir le forum,

Ca ne donne pas ce que je veux...Je simplifie ma demande:
Comment copier les lignes 4 à 20 de la dernière colonne non vide ?

Merci de votre aide

Vraiment personne pour me débloquer?🙂

 

[PascalXLD]

Re : Dernière colonne non vide VBA

re

excuses moi mais fais un petit exemple de ce que tu as et de ce que tu veux car là on risque de tourner en rond longtemps 😱

 

[Hawkeye56]

Re : Dernière colonne non vide VBA

Pas de problème. 🙂

Voici une partie de mon document. L'objectif est de gérer les mouvements d'une liste d'objets. A chaque sortie d'objets je vais créer une colonne dans laquelle figurera la quantité des objets sortis.

Cette quantité (qui figurera donc dans la dernière colonne non vide) je souhaite la copier dans un autre onglet ou elle sera remise en forme pour être imprimée sous forme de fiche.

Voilà, j'espère avoir été plus clair 🙂

 

[PascalXLD]

Re : Dernière colonne non vide VBA

RE

voici avec la macro1

cela te copie la première colonne de désignation avec la dernière colonne de Quantité sur la feuille2

 

[Hawkeye56]

Re : Dernière colonne non vide VBA

Merci beaucoup, c'est exactement ce que je souhaitais avoir.

Comme quoi, quand on s'exprime clairement...😱

Bonne journée 🙂

 

[PascalXLD]

Re : Dernière colonne non vide VBA

RE

De rien bon courage

Au fait ma tante habite Muzillac pas trop loin de chez toi

Super coin avec Damgan Billiers ...