Microsoft 365 vba excel

INIME-

XLDnaute Nouveau
Bonjour les Exceleurs,

J'espère que vous allez tous bien,


Peut-on récupérer une colonne entière à partir de l'en-tête.
Je m'explique, j'ai une base initiale dont les colonnes sont en un ordre par défaut fourni par le CRM.
Tous mes reportings ont été établis sur l'ordre de cette base. Tout d'un coup, on eu un changement d'ordre dans les colonnes.
Ma question est de pouvoir récupérer la colonne souhaité juste à partir de son entête, c'est-à-dire au lieu de refaire les 1000 reporting, je voudrais mettre dans un onglet dans un onglet la base initiale, et mes reportings reprennent les colonnes sur la base des entête, je mets uniuqement le bon intitulé de l'entête et puis Excel recupère tout seul la colonne entière.

Est ce que c'est faisable uniquement par des formules ou non ?


Merci à tous
 

GALOUGALOU

XLDnaute Accro
re inime
une solution par macro, dans une variable récupérer le numéro de colonne correspondant à l'en-tête
voir la solution jointe
VB:
 Sub TROUVE_COLONNE()
Dim cellule As Range, d As String, col As Long
d = "MAISON"
On Error Resume Next
For Each cellule In Sheets("Feuil1").Range("C1:Z1")
If cellule = d Then
col = cellule.Column
MsgBox "la colonne se trouve à la position " & col ' ici votre procédure
End If
Next cellule
End Sub
cdt
galougalou
 

Pièces jointes

  • TROUVE_COLONNE.xlsm
    18.1 KB · Affichages: 3

INIME-

XLDnaute Nouveau
re inime
une solution par macro, dans une variable récupérer le numéro de colonne correspondant à l'en-tête
voir la solution jointe
VB:
 Sub TROUVE_COLONNE()
Dim cellule As Range, d As String, col As Long
d = "MAISON"
On Error Resume Next
For Each cellule In Sheets("Feuil1").Range("C1:Z1")
If cellule = d Then
col = cellule.Column
MsgBox "la colonne se trouve à la position " & col ' ici votre procédure
End If
Next cellule
End Sub
cdt
galougal

Merci à vous tous,


voici mon reporting en PJ, je vourdrais alimenté les colonnes de la feuille 2 à partir de la base initiale.

Excel trouve l'entête, et recopie colle toute la colonne.


Merci !
 

Pièces jointes

  • base (1).xlsm
    599.7 KB · Affichages: 1

Discussions similaires

Réponses
7
Affichages
361

Statistiques des forums

Discussions
312 282
Messages
2 086 765
Membres
103 389
dernier inscrit
DEDE86