Ceci est une page optimisée pour les mobiles. Cliquez sur ce texte pour afficher la vraie page.

XL 2021 Afficher la nr col avec un lettre alpha combiner pour crée un tableau

hermann

XLDnaute Junior
Supporter XLD
Bonsoir Mesdames & Messieurs

Svp

Je voudrais récupéré la 1. lettre de cellule suivant + donne un 1 pour la première ligne pour crée un tableau

Merci pour votre aide
Arnold
 

job75

XLDnaute Barbatruc
Bonjour à tous,

On peut bien sûr se passer de la colonne I, formule en A3 :
Code:
=GAUCHE(B3) &" "&LIGNE()-2
Et en A10 :
Code:
=GAUCHE(B10) &" "&LIGNE()-9
A+
 

Pièces jointes

  • lettre-Q.xlsx
    10.5 KB · Affichages: 2

SAMUAL_2023

XLDnaute Nouveau
Bonjour à tous,

On peut bien sûr se passer de la colonne I, formule en A3 :
Code:
=GAUCHE(B3) &" "&LIGNE()-2
Et en A10 :
Code:
=GAUCHE(B10) &" "&LIGNE()-9
A+
Bessere auf Deutsch in VBA. Siehe unten dem Programmierverfahren:

Public Sub mOnAction_Test()

Dim strValue1$, strValue2$

With oSh1
Let strValue1 = VBA.Strings.Left(.[B3]) & _
VBA.Strings.Space(1) & _ (.Rows.Count - 2)

Let strValue2 = VBA.Strings.Left(.[B10]) & _
VBA.Strings.Space(1) & _ (.Rows.Count - 9)
' --- Hier der Rest der Anleitung:
End With

End Sub
 
Dernière édition:

job75

XLDnaute Barbatruc
D'accord Bernard, en effet chez moi ce code fonctionne :
VB:
Public Sub mOnAction_Test()
Dim strValue1$, strValue2$
With Feuil1
    Let strValue1 = VBA.Strings.Left(.[B3], 1) & _
    VBA.Strings.Space(1) & (.Rows.Count - 2)
    Let strValue2 = VBA.Strings.Left(.[B10], 1) & _
    VBA.Strings.Space(1) & (.Rows.Count - 9)
    ' --- Hier der Rest der Anleitung:
End With
MsgBox strValue1
MsgBox strValue2
End Sub
Mais ça n'a pas beaucoup plus de sens...
 
Dernière édition:

hermann

XLDnaute Junior
Supporter XLD
Messieurs

Merci pour vos assistances

Pour simplifier: j'ai transforme la colonne en txt pure, et a partie de la je peut effectuer les fréquences pour chaque colonne. (6)

Chaque colonne:
- je peut obtenir un vue séquentielle en nombre et une autre un index.

- Nom de famille
- Prénom (F/M)
- Leur activité de son Temps
- Les quartier de son époque
- Les noms de rue
- Les nr des rue

En préparât. un col; F/M

Merci pour toute
Bonne journée
Arnold

Nota bene:
Usage mode :
- Séquentielle
- Index

une page xml ci-joint
 

Pièces jointes

  • charlemagne.xlsx
    69.8 KB · Affichages: 2

Discussions similaires

  • Résolu(e)
Microsoft 365 Code de tri
Réponses
22
Affichages
657
Les cookies sont requis pour utiliser ce site. Vous devez les accepter pour continuer à utiliser le site. En savoir plus…