Extraction du mot dans une cellule excel
Résolu
mahefa
-
Patrice33740 Messages postés 8561 Date d'inscription Statut Membre Dernière intervention -
Patrice33740 Messages postés 8561 Date d'inscription Statut Membre Dernière intervention -
Bonjour,
J'ai un ptit problème avec l'utilisation de la fonction :
Function pf(lc, Optional last)
'Application.Volatile
ligne = lc.Row
col = lc.Column
tmp = Trim(Cells(ligne, col))
tab1 = Split(tmp, " ")
If IsMissing(last) Then
tab1(UBound(tab1)) = ""
pf = RTrim(Join(tab1, " "))
Else
pf = tab1(UBound(tab1))
End If
End Function
Cette fonction marche avec une seule cellule mais mon problème est :
- J'ai 2 fichiers nommés FichierSource et FichierTemp : je veux copier directement la cellule A5 du FichierSource dans FichierTemp en utilisation cette fonction ci-dessus mais ça ne marche pas.
Est-ce que quelqu'un peut m'aider ?
Merci d'avance.
J'ai un ptit problème avec l'utilisation de la fonction :
Function pf(lc, Optional last)
'Application.Volatile
ligne = lc.Row
col = lc.Column
tmp = Trim(Cells(ligne, col))
tab1 = Split(tmp, " ")
If IsMissing(last) Then
tab1(UBound(tab1)) = ""
pf = RTrim(Join(tab1, " "))
Else
pf = tab1(UBound(tab1))
End If
End Function
Cette fonction marche avec une seule cellule mais mon problème est :
- J'ai 2 fichiers nommés FichierSource et FichierTemp : je veux copier directement la cellule A5 du FichierSource dans FichierTemp en utilisation cette fonction ci-dessus mais ça ne marche pas.
Est-ce que quelqu'un peut m'aider ?
Merci d'avance.
A voir également:
- Extraction du mot dans une cellule excel
- Aller à la ligne dans une cellule excel - Guide
- Excel cellule couleur si condition texte - Guide
- Liste déroulante excel - Guide
- Proteger cellule excel - Guide
- Déplacer une colonne excel - Guide
