Récupérer la Colonne d'un Nom d'Entête

Solutions Développées sous VBA
Verrouillé
admin
Site Admin
Site Admin
Messages : 177
Enregistré le : 04 oct. 2020, 20:48
Contact :

Récupérer la Colonne d'un Nom d'Entête

Message par admin »

~ ~ ~ ~ ~ ~ ~ ~
Vous voulez récupérer la colonne (le numéro ou les lettres) d'une donnée spécifique dont le nom et la zone de recherche sont fournis.

La solution est ici: Colonne_du_Nom (clic-droit, enregistrer sous)

Mode d'emploi:
  • Intégrer la source fournie dans votre code
  • Faire l'appel à la fonction : Colonne_du_Nom (LeNom, LeRange, opt. LeType, opt. PasdInfo)
    • valeur = Colonne_du_Nom (LeNom, LeRange) :
      • valeur contiendra le numéro de la colonne répondant au critère;
      • sinon : une chaine vide et un message d'erreur.
    • valeur = Colonne_du_Nom (LeNom, LeRange, LeType:="Lettres") :
      • valeur contiendra les lettres de la colonne répondant au critère;
      • sinon : une chaine vide et un message d'erreur.
    • valeur = Colonne_du_Nom (LeNom, LeRange, PasdInfo:=vrai) :
      • Se comportera comme prévu en fonction des autres paramètres fournis;
      • mais ne retournera aucun message d'erreur en cas de recherche infructueuse.
  • Où :
    • LeNom = Chaine de Caractères contenant le Nom Exact Recherché
    • LeRange = Range de Recherche (ex. sheets("onglet").range("8:8") pour la ligne 8 dans l'onglet correspondant)
    • LeType = Chaine de Caractères optionnelle devant contenir "Lettres" pour que les lettres de colonne soient retournées au lieu du numéro de colonne
    • PasdInfo = Booléen optionnel devant être à vrai pour qu'une erreur rencontrée ne soit pas signalée
Suivi des évolutions:
  • 2012.01.14 (v1.00) : Création initiale, fournit soit le numéro de colonne, soit les lettres de la colonne.
  • 2021.03.19 (v1.10) : Remplacement de .Find() non-fonctionnelle sur colonnes masquées par une boucle For Each.

Une initialisation des Données robustes aux modifications de positionnement des données...
Modifié en dernier par admin le 24 mars 2021, 21:38, modifié 3 fois.
Verrouillé