Sélectionner une partie d'un tableau

[siocnarf]

Bonjour,

J'ai un tableau qui s'étant des colonnes a à F. Je souhaite sélectionner tout mon tableau sauf la colonne A. Comment faire?

Merci,

 

[phlaurent55]

Re : Sélectionner une partie d'un tableau

Bonjour siocnarf,

Clique sur la colonne B et fais glisser vers la droite en maintenant le bouton de la souris enfoncé
à+

 

[siocnarf]

Re : Sélectionner une partie d'un tableau

Bonjour,

Je m'excuse pour mon imprécision. Comment on le fait en vba?

Merci,

 

[phlaurent55]

Re : Sélectionner une partie d'un tableau

Re,

comme ceci:

Columns("B:F").Select

à+

 

[siocnarf]

Re : Sélectionner une partie d'un tableau

Bonjour,

Actuellement mon tableau s'arrête à la colonne F mais dans une autre génération automatique, il pourrait débuter ailleur qu'en colonne A et se terminer plus loin ou moin loin que la colonne F. Je peux mesurer l'emplacement de mon tableau et donc l'emplacement de la seconde colonne mais pas la dernière colonne.

Il me faut donc faire le tout en relatif.

J'ai testé: ActiveSheet.UsedRange.Columns("17:" & ActiveSheet.UsedRange.Columns.Count).Select

Mais cela génère une erreur...

Merci,

 

[phlaurent55]

Re : Sélectionner une partie d'un tableau

Re,

pas sûr d'avoir tout compris,

essaie de remplacer ("17: &" & par (17+

Ps: je serai absent jusqu'à demain soir
à+

 

[siocnarf]

Re : Sélectionner une partie d'un tableau

Je ne suis pas certain de bien suivre. Ici dans cet exemple la première colonne a sélectionner (soit la seconde de mon tableau) est la colonne 17.

ActiveSheet.UsedRange.Columns(17 + ActiveSheet.UsedRange.Columns.Count).Select

Cela génère une erreur.

 

[siocnarf]

Re : Sélectionner une partie d'un tableau

Bonjour,

Finalement, j'ai fait un peu de code comme ceci.

'On sélectionne la seconde cellule de mon tableau
Sheets(AL_VFeuilStatData(0)).Cells(2, IntDebutTableau + 1).Select
'On compte combien j'ai de colonne en tout.
IntFinalColStat = Sheets(AL_VFeuilStatData(0)).Cells(2, Application.Columns.Count).End(xlToLeft).Column
'On calcul un range à partir de ma seconde colonne sélectionné jusqu'à la dernière colonne.
Sheets(AL_VFeuilStatData(1)).Range(Selection, Selection.Columns(IntFinalColStat)).EntireColumn.Select

Merci,