Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
isabelle
bonjour Daniel,
une solution serait une fonction personnalisé,
Function Initiale(cellule As Range) As String i As Integer For i = 1 To Len(cellule) If Asc(Mid(cellule, i, 1)) < 97 Then Initiale = Initiale & Mid(cellule, i, 1) End If Next End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
bonjour Daniel,
une solution serait une fonction personnalisé,
Function Initiale(cellule As Range) As String
i As Integer
For i = 1 To Len(cellule)
If Asc(Mid(cellule, i, 1)) < 97 Then
Initiale = Initiale & Mid(cellule, i, 1)
End If
Next
End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1)
(Daniel Pelletier donne DP)
Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
Function Initiale(cellule As Range) As String i As Integer For i = 1 To Len(cellule) If Asc(Mid(cellule, i, 1)) < 97 Then Initiale = Initiale & Mid(cellule, i, 1) End If Next End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
Starwing
Bonjour Isabelle,
Faut-il pas plutôt écrire:
Dim i As Integer
;-)
Starwing
-----Message d'origine----- bonjour Daniel,
une solution serait une fonction personnalisé,
Function Initiale(cellule As Range) As String i As Integer For i = 1 To Len(cellule) If Asc(Mid(cellule, i, 1)) < 97 Then Initiale = Initiale & Mid(cellule, i, 1) End If Next End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st- Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
.
Bonjour Isabelle,
Faut-il pas plutôt écrire:
Dim i As Integer
;-)
Starwing
-----Message d'origine-----
bonjour Daniel,
une solution serait une fonction personnalisé,
Function Initiale(cellule As Range) As String
i As Integer
For i = 1 To Len(cellule)
If Asc(Mid(cellule, i, 1)) < 97 Then
Initiale = Initiale & Mid(cellule, i, 1)
End If
Next
End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et
nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1)
(Daniel Pelletier donne DP)
Comment faire quand le non d'une parsonne est Marc st-
Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les
lettre majiscule ?
Function Initiale(cellule As Range) As String i As Integer For i = 1 To Len(cellule) If Asc(Mid(cellule, i, 1)) < 97 Then Initiale = Initiale & Mid(cellule, i, 1) End If Next End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st- Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
.
isabelle
%-))) si si merci de veillez au grain Starwing, ;-)
isabelle
Bonjour Isabelle,
Faut-il pas plutôt écrire:
Dim i As Integer
;-)
Starwing
-----Message d'origine----- bonjour Daniel,
une solution serait une fonction personnalisé,
Function Initiale(cellule As Range) As String i As Integer For i = 1 To Len(cellule) If Asc(Mid(cellule, i, 1)) < 97 Then Initiale = Initiale & Mid(cellule, i, 1) End If Next End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st- Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
.
%-)))
si si merci de veillez au grain Starwing, ;-)
isabelle
Bonjour Isabelle,
Faut-il pas plutôt écrire:
Dim i As Integer
;-)
Starwing
-----Message d'origine-----
bonjour Daniel,
une solution serait une fonction personnalisé,
Function Initiale(cellule As Range) As String
i As Integer
For i = 1 To Len(cellule)
If Asc(Mid(cellule, i, 1)) < 97 Then
Initiale = Initiale & Mid(cellule, i, 1)
End If
Next
End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et
nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1)
(Daniel Pelletier donne DP)
Comment faire quand le non d'une parsonne est Marc st-
Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les
lettre majiscule ?
%-))) si si merci de veillez au grain Starwing, ;-)
isabelle
Bonjour Isabelle,
Faut-il pas plutôt écrire:
Dim i As Integer
;-)
Starwing
-----Message d'origine----- bonjour Daniel,
une solution serait une fonction personnalisé,
Function Initiale(cellule As Range) As String i As Integer For i = 1 To Len(cellule) If Asc(Mid(cellule, i, 1)) < 97 Then Initiale = Initiale & Mid(cellule, i, 1) End If Next End Function
isabelle
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st- Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
.
Daniel Pelletier
Bonsoir Isabelle
la cellule ou est mon prénom et nom est G3 la cellule ou sont les initial est J3. cette procédure je doit la copier dans ThisWorkbook ou dans la Sheet8 ?
Merci pour ta réponce rapide
"Daniel Pelletier" a écrit dans le message de news:
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
Bonsoir Isabelle
la cellule ou est mon prénom et nom est G3
la cellule ou sont les initial est J3.
cette procédure je doit la copier dans ThisWorkbook ou dans la Sheet8 ?
Merci pour ta réponce rapide
"Daniel Pelletier" <pellet15@videotron.ca> a écrit dans le message de
news:uixPhK3REHA.1448@TK2MSFTNGP11.phx.gbl...
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1)
(Daniel Pelletier donne DP)
Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
la cellule ou est mon prénom et nom est G3 la cellule ou sont les initial est J3. cette procédure je doit la copier dans ThisWorkbook ou dans la Sheet8 ?
Merci pour ta réponce rapide
"Daniel Pelletier" a écrit dans le message de news:
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
Rai
Daniel Pelletier wrote:
Bonsoir Isabelle
la cellule ou est mon prénom et nom est G3 la cellule ou sont les initial est J3. cette procédure je doit la copier dans ThisWorkbook ou dans la Sheet8 ?
Merci pour ta réponce rapide
Bonjour,
il faut la copier dans un module.
-- Cordialement,
Rai Remplacer point par la ponctuation appropriée pour répondre...
Daniel Pelletier wrote:
Bonsoir Isabelle
la cellule ou est mon prénom et nom est G3
la cellule ou sont les initial est J3.
cette procédure je doit la copier dans ThisWorkbook ou dans la
Sheet8 ?
Merci pour ta réponce rapide
Bonjour,
il faut la copier dans un module.
--
Cordialement,
Rai
Remplacer point par la ponctuation appropriée pour répondre...
la cellule ou est mon prénom et nom est G3 la cellule ou sont les initial est J3. cette procédure je doit la copier dans ThisWorkbook ou dans la Sheet8 ?
Merci pour ta réponce rapide
Bonjour,
il faut la copier dans un module.
-- Cordialement,
Rai Remplacer point par la ponctuation appropriée pour répondre...
isabelle
oui, dans un module "standart" ou bien dans un nouveau classeur que tu enregistre sous l'extention .xla comme ça tu appelle la fonction à Outils, macro complémentaire.
isabelle
Bonsoir Isabelle
la cellule ou est mon prénom et nom est G3 la cellule ou sont les initial est J3. cette procédure je doit la copier dans ThisWorkbook ou dans la Sheet8 ?
Merci pour ta réponce rapide
"Daniel Pelletier" a écrit dans le message de news:
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
oui, dans un module "standart" ou bien dans un nouveau classeur que tu
enregistre sous l'extention .xla
comme ça tu appelle la fonction à Outils, macro complémentaire.
isabelle
Bonsoir Isabelle
la cellule ou est mon prénom et nom est G3
la cellule ou sont les initial est J3.
cette procédure je doit la copier dans ThisWorkbook ou dans la Sheet8 ?
Merci pour ta réponce rapide
"Daniel Pelletier" <pellet15@videotron.ca> a écrit dans le message de
news:uixPhK3REHA.1448@TK2MSFTNGP11.phx.gbl...
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1)
(Daniel Pelletier donne DP)
Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M
St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?
oui, dans un module "standart" ou bien dans un nouveau classeur que tu enregistre sous l'extention .xla comme ça tu appelle la fonction à Outils, macro complémentaire.
isabelle
Bonsoir Isabelle
la cellule ou est mon prénom et nom est G3 la cellule ou sont les initial est J3. cette procédure je doit la copier dans ThisWorkbook ou dans la Sheet8 ?
Merci pour ta réponce rapide
"Daniel Pelletier" a écrit dans le message de news:
Bonsoir à tous
La formule suivante me donne les initial d'un prénom et nom.
=GAUCHE(G3)&STXT(G3;TROUVE(" ";G3)+1;1) (Daniel Pelletier donne DP) Comment faire quand le non d'une parsonne est Marc st-Jean (pas MS mais M St-J)
une idée = Est t'il possible d'extraire seulement les lettre majiscule ?