[VBA] Rapides et simples question :)

Salut,

J’ai deux ptites questions qui me tracassent beaucoup, merci d’avance a ceux
qui pourront m’aider…

J’ai pour le moment une feuille excel avec des colonnes, et un code du type

Columns ("E:E").Select
Selection.Cut
Columns ("A:A").Select
ActiveSheet.Paste

Le probleme c’est que si un jour l’ordre de mes colonnes changent et donc que ma colonne E devient F par exemple eh bien ca marche plus… donc au lieu de selectonioner la colonne “E” j’aimerai selectionner la colonne par son titre comme “Benefice” par exemple. Est ce possible? :slight_smile:

Aussi,

J’ai une instruction du type: Selection.AutoFill Destination:Range(“B2:B17”)

comment faire pour que la fonction autofill aille jusqu’en bas du tableau et non jusqu’a une ligne donnee… genre ne pas ecrire “B17” mais que ca tombe automatiquement jusqu’a la derniere ligne de mon tableau…

Merci BEAUCOUP pour vos reponses, c’est tres important pour moi…

D.

Tu fais une boucle qui teste le nom de ta colonne, c’est tout :neutre:

Utilise la propriété “xldown”, fait une recherche dans l’aide pour plus de détails…

:hello:

Bonjour,
de ce que j’ai pu en comprendre, on ne peut pas nommer une ou des colonnes, mais un ensemble de cellules correspondant à ces colonnes.
Donc si j’ai bien compris, ça fonctionne comme avec des cellules:


    Dim sheet As Worksheet
    Set sheet = ActiveWorkbook.ActiveSheet
    sheet.Range("col3").Select

J’ai testé ça avec succès en appliquant le nom “col3” à ma colonne “C”.

hmm merci de vos reponses de 1.

Par contre j’ai essaye le code Deltree mais ca me met une erreur quand je lance la maccro. Au lieu du code initial que j’avais cite j’ai mis:

Dim sheet As Worksheet
Set sheet = ActiveWorkbook.ActiveSheet
sheet.Range("Business Units").Select
Selection.Cut
Columns("A:A").Select
ActiveSheet.Paste

(Sachant que ma colonne s’appelle Business Units) Et l’erreur me dit Object variable or With block variable not set… et de toute facon range me selectionne qu’une cellule et pas ma colonne entiere non?

J’ai essaye d’autre combine mais sans succes…

@ Takama:

Thanks j’ai trouve :slight_smile: