[VBA] Excel : Selection de colonne totale et spécifique

[tomy]

bonjour tout le monde !

je viens de me rendre compte d'un petit probleme :
sur le fichier que j'ai creer seules les les colonnes de A à K sont copiées
Or mes infos vont jusqu'à O ????

pourriez vous me dire comment resoudre ce petit probleme.

CODE :

'On prend la feuille.
    Worksheets("BDD").Select
    'On selectionne la première cellule contenant des données.
    Range(Range("A3"), Range("A3").End(xlDown).End(xlToRight)).Select
    'on filtre suivant les critères Systeme!C1:D2
    Selection.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
     Worksheets("Systeme").Range("C1:E2"), Unique:=False
    'on selection les lignes visibles
    Selection.SpecialCells(xlCellTypeVisible).Select
    'On copie la selection
    Selection.Copy

Autre question : comment faire pour ne selectionner que les colonne A,B,C M
dans le même code.


MErci de votre aide pour toutes ces questions.

 

[nat54]

Re : [VBA] Excel : Selection de colonne totale et spécifique

bonjour tout le monde !

je viens de me rendre compte d'un petit probleme :
sur le fichier que j'ai creer seules les les colonnes de A à K sont copiées
Or mes infos vont jusqu'à O ????

Bonjour,

Sûrement qu'entre K et O tu as une colonne sans titre..

Le reste je laisse les pros faire

 

[tomy]

Re : [VBA] Excel : Selection de colonne totale et spécifique

non, toutes les colonnes sont affichées et avec des titres.

merci quand mm !

 

[tomy]

Re : [VBA] Excel : Selection de colonne totale et spécifique

Personne pour m'aider , j'avoue etre un peu despèré !!!

c'est vraiment bizar !

 

[Gorfael]

Re : [VBA] Excel : Selection de colonne totale et spécifique

Personne pour m'aider , j'avoue etre un peu despèré !!!

c'est vraiment bizar !

Salut
Donnes un fichier d'exemple, sur 10 lignes en modifiant les données confidentielles, mais en gardant leurs types (texte ou nombre). parce que je ne comprends pas le problème
A+

 

[tomy]

Re : [VBA] Excel : Selection de colonne totale et spécifique

Malheureusement c'est impossible de tout te donner .
voila juste le fichier dans lequel est fait la selection :
http://cjoint.com/?jurdmjtukD

tu as le code en haut ...

ca ne me selectionne que de A à K ....

merci pour ton aide
tomy

 

[Gorfael]

Re : [VBA] Excel : Selection de colonne totale et spécifique

Re...

'On prend la feuille.
    Worksheets("BDD").Select
    'On selectionne la première cellule contenant des données.
[b]    Range(Range("A3"), Range("A3").End(xlDown).End(xlToRight)).Select [/b]
    'on filtre suivant les critères Systeme!C1:D2
    Selection.AdvancedFilter Action:=xlFilterInPlace, CriteriaRange:= _
     Worksheets("Systeme").Range("C1:E2"), Unique:=False
    'on selection les lignes visibles
    Selection.SpecialCells(xlCellTypeVisible).Select
    'On copie la selection
    Selection.Copy

remplace par

Range(Range("A3"), Cells(Range("A3").End(xlDown).Row, Range("A3").End(xlToRight).Column)).Select

ton problème devrait se résoudre
ton code reviens à faire :
Focus en A3
Ctrl + Bas
Ctrl + droite
et tu tombes en ....... (c'est la question à 1 000 € ) K8 sur ton exemple

Autre question : comment faire pour ne selectionner que les colonne A,B,C M
dans le même code.

Columns ("1:3", "13:13").select
ou si c'est les valeurs de la zone
dim X as long
x=range("A3").end(xldown).row
range("A3:C") & x, "M3:M" & X).select

A+

 

[tomy]

Re : [VBA] Excel : Selection de colonne totale et spécifique

Merci pour toutes ces informations !

Grace à toiut ca je devrais me debrouiller !!!

Merci encore à tout et surtout à Gorfael

Bye
tomy