OVH Cloud OVH Cloud

sélection d'un nombre de lignes variables

5 réponses
Avatar
guimou2001
bonjour

je suis en train de m'embrouiller, je n'arrive plus =E0 =E9crire (ni =E0
retrouver) une macro pour s=E9lectionner les lignes pleines dans mon
fichier (pour les copier ailleurs) : j'ai des fichiers d'un nombre de
lignes diff=E9rents chaque jour et je ne voudrais s=E9lectionner que les
lignes avec des donn=E9es : par contre le nombre de colonnes est
identique (de A =E0 AS)
j'ai essay=E9 =E7=E0 mais ce n'est pas bon :

Range (A1:AS1)as Range (Selection, Selection.End(xlDown)).Select

Merci de votre aide, sinon je sens que le PC va passer par la fen=EAtre
(que je peux m=EAme pas ouvrir...) :))

Guillaume

5 réponses

Avatar
Daniel
Bonjour.
Range("A1", Range("S65536").End(xlUp)).Select
Si les cellules des colonnes A et AS sont également renseignées.
Cordialement.
Daniel
a écrit dans le message de news:

bonjour

je suis en train de m'embrouiller, je n'arrive plus à écrire (ni à
retrouver) une macro pour sélectionner les lignes pleines dans mon
fichier (pour les copier ailleurs) : j'ai des fichiers d'un nombre de
lignes différents chaque jour et je ne voudrais sélectionner que les
lignes avec des données : par contre le nombre de colonnes est
identique (de A à AS)
j'ai essayé çà mais ce n'est pas bon :

Range (A1:AS1)as Range (Selection, Selection.End(xlDown)).Select

Merci de votre aide, sinon je sens que le PC va passer par la fenêtre
(que je peux même pas ouvrir...) :))

Guillaume
Avatar
Elliac
Bonjour,

Sub Macro1()
Cells.SpecialCells(xlCellTypeConstants, 23).Copy
Sheets("Feuil2").Range("A1")
End Sub

Camille


bonjour

je suis en train de m'embrouiller, je n'arrive plus à écrire (ni à
retrouver) une macro pour sélectionner les lignes pleines dans mon
fichier (pour les copier ailleurs) : j'ai des fichiers d'un nombre de
lignes différents chaque jour et je ne voudrais sélectionner que les
lignes avec des données : par contre le nombre de colonnes est
identique (de A à AS)
j'ai essayé çà mais ce n'est pas bon :

Range (A1:AS1)as Range (Selection, Selection.End(xlDown)).Select

Merci de votre aide, sinon je sens que le PC va passer par la fenêtre
(que je peux même pas ouvrir...) :))

Guillaume




Avatar
guimou2001
Merci, c'est exactement çà :)

Par contre j'ai un autre souci : je colle ces données dans un classeur
où dans les colonnes AT à AZ se trouvent des formules RECHERCHEV qui
met la valeur #N/A qd les lignes sont vides (j'ai copié ces formules
sur 1000 lignes pour être sur de couvrir toutes mes données) mais je
me retrouve avec le même problème, qd je copie ces nouvelles données
en les sélectionnant comme suit
Range("A1", Range("AZ65536").End(xlUp)).Select,
je me retrouve avec les lignes vides prises en compte à cause de ces
#N/A ds les colonnes AT à AZ. Y'a t-il moyen de ne pas avoir #N/A si
la valeur recherchée n'est pas trouvée ou encore mieux,
d'incrémenter la formule uniquement si les colonnes précédentes (en
l'occurence la colonne AT) sont pleines ?

Cordialement





Bonjour.
Range("A1", Range("S65536").End(xlUp)).Select
Si les cellules des colonnes A et AS sont également renseignées.
Cordialement.
Daniel
a écrit dans le message de news:

bonjour

je suis en train de m'embrouiller, je n'arrive plus à écrire (ni à
retrouver) une macro pour sélectionner les lignes pleines dans mon
fichier (pour les copier ailleurs) : j'ai des fichiers d'un nombre de
lignes différents chaque jour et je ne voudrais sélectionner que les
lignes avec des données : par contre le nombre de colonnes est
identique (de A à AS)
j'ai essayé çà mais ce n'est pas bon :

Range (A1:AS1)as Range (Selection, Selection.End(xlDown)).Select

Merci de votre aide, sinon je sens que le PC va passer par la fenêtre
(que je peux même pas ouvrir...) :))

Guillaume


Avatar
Daniel
Bonsoir.
Y'a t-il moyen de ne pas avoir #N/A si
la valeur recherchée n'est pas trouvée ?

=SI(ESTNA(RECHERCHEV(.......);"";RECHERCHEV(.......))

Daniel
Avatar
guimou2001
merci Daniel, merci Camille.

la formule avec les SI ne fonctionne pas, je l'avais déjà essayé
mais soit çà garde le #N/A soit ds ta formule Daniel, il y a une
erreur au niveau des guillemets, j'ai essayé d'approfondir la chose
mais sans résultats..

Camille, si je comprends bien, ta macro sert à copier les cellules
avec #N/A dedans sur une autre feuille mais elle ne fonctionne pas
jusqu'au bout (erreur de compilation..).

Merci de votre aide :)



Bonjour,

Sub Macro1()
Cells.SpecialCells(xlCellTypeConstants, 23).Copy
Sheets("Feuil2").Range("A1")
End Sub

Camille


bonjour

je suis en train de m'embrouiller, je n'arrive plus à écrire (ni à
retrouver) une macro pour sélectionner les lignes pleines dans mon
fichier (pour les copier ailleurs) : j'ai des fichiers d'un nombre de
lignes différents chaque jour et je ne voudrais sélectionner que les
lignes avec des données : par contre le nombre de colonnes est
identique (de A à AS)
j'ai essayé çà mais ce n'est pas bon :

Range (A1:AS1)as Range (Selection, Selection.End(xlDown)).Select

Merci de votre aide, sinon je sens que le PC va passer par la fenêtre
(que je peux même pas ouvrir...) :))

Guillaume