Le principe est simple, on mesure la longueur de la chaîne de :activedocument.Bookmarks("MonSignet").Range.Text, on retranche 8 pour FORMTEXT et ce nombre est utilisé pour extraire la partie de droite de la chaîne de caractère.
Le principe est simple, on mesure la longueur de la chaîne de
:activedocument.Bookmarks("MonSignet").Range.Text, on retranche 8 pour
FORMTEXT et ce nombre est utilisé pour extraire la partie de droite de la
chaîne de caractère.
Le principe est simple, on mesure la longueur de la chaîne de :activedocument.Bookmarks("MonSignet").Range.Text, on retranche 8 pour FORMTEXT et ce nombre est utilisé pour extraire la partie de droite de la chaîne de caractère.
Vous pouvez jouer la sécurité en ne supprimant les 8 premiers caractères que s'ils sont égaux à "FORMTEXT"
with activedocument.Bookmarks("MonSignet").Range if left(.text, 8) = "FORMTEXT" then MaUserForm.MaTextBox.value = mid(.Text,9) else MaUserForm.MaTextBox.value = .Text end if end with
Sauf erreur de frappe de ma part.
-- A+
Bonjour
Cela fonctionne sauf que devant le texte se trouve la mention "FORMTEXT".
Comment puis-je la supprimer ?
Je ne sais pas trop d'où ça sort, c'est un champ de formulaire ?
vous affichez les valeurs où les codes champs ?
Vous pouvez toujours utiliser une formule du genre :
Vous pouvez jouer la sécurité en ne supprimant les 8 premiers
caractères que s'ils sont égaux à "FORMTEXT"
with activedocument.Bookmarks("MonSignet").Range
if left(.text, 8) = "FORMTEXT" then
MaUserForm.MaTextBox.value = mid(.Text,9)
else
MaUserForm.MaTextBox.value = .Text
end if
end with
Vous pouvez jouer la sécurité en ne supprimant les 8 premiers caractères que s'ils sont égaux à "FORMTEXT"
with activedocument.Bookmarks("MonSignet").Range if left(.text, 8) = "FORMTEXT" then MaUserForm.MaTextBox.value = mid(.Text,9) else MaUserForm.MaTextBox.value = .Text end if end with
Sauf erreur de frappe de ma part.
-- A+
jepac
Merci
Salut,
Si c'est toujours la même mention, un fonction Right() de VBA devrait en venir à bout.
Le principe est simple, on mesure la longueur de la chaîne de :activedocument.Bookmarks("MonSignet").Range.Text, on retranche 8 pour FORMTEXT et ce nombre est utilisé pour extraire la partie de droite de la chaîne de caractère.
Le principe est simple, on mesure la longueur de la chaîne de
:activedocument.Bookmarks("MonSignet").Range.Text, on retranche 8 pour
FORMTEXT et ce nombre est utilisé pour extraire la partie de droite de la
chaîne de caractère.
Le principe est simple, on mesure la longueur de la chaîne de :activedocument.Bookmarks("MonSignet").Range.Text, on retranche 8 pour FORMTEXT et ce nombre est utilisé pour extraire la partie de droite de la chaîne de caractère.